1
0

nichBedroomServant.qsrc 8.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230
  1. # nichBedroomServant
  2. CLOSE ALL
  3. $metka = ''
  4. $loc = 'nichBedroomServant'
  5. $locM = $loc
  6. $nichLoc = 'servant'
  7. $metkaM = ''
  8. $location_type = 'private'
  9. $locclass = 'bedr'
  10. $menu_loc = 'nichBedroomServant'
  11. $menu_arg = ''
  12. menu_off = 0
  13. tanhouse1 = 1
  14. !! Has to happen before there is any output
  15. if nichWork = 2:
  16. if nichLastWorkDay ! daystart: gs 'nichUtil', 'startWorkday'
  17. !! this code has to be include everywhere where PC can change clothes or enter the apartment
  18. gs 'nichUtil', 'checkOutfit'
  19. end
  20. !! Argument return: PC has been in the room before, dont perform actions meant to be executed before or as she enters the room.
  21. if $ARGS[0] = '' or $ARGS[0] = 'start' or $ARGS[0] = 'return':
  22. gs 'stat'
  23. '<center><b>Your Bedroom in Nicholas'' Apartment</b></center>'
  24. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/nichApartment/bedroomServant.jpg"></center>'
  25. 'Your bedroom is fairly large, considering you''re only an employee. There is a small <a href="exec:gt ''bed'', ''start''">double bed</a> and an <a href="exec:gt ''budilnik'', ''start''">alarm clock</a>.'
  26. 'Half a wall is taken up by an expensive-looking <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> (where you can choose outfits and organize your clothing). There''s a make-up table with a <a href="exec:gt ''mirror'', ''start''">mirror</a> next to it.'
  27. if komp = 1:
  28. $komp = ' with your <a href="exec:gt ''Komp'', ''start''">laptop</a>.'
  29. else
  30. $komp = '.'
  31. end
  32. 'A luxurious <a href="exec:gt ''divan'', ''start''">leather sofa</a> is also part of the ensemble. Mounted on the wall opposite the sofa is a big flat <a href="exec:gt ''TV'', ''start''">TV</a>. Under the window, you see a brand-new <a href="exec:gt ''nichBedroomServant'', ''desk''">desk</a><<$komp>>'
  33. if obruch > 0:'<br>Your hula hoop stands in a corner of the room. '
  34. if skak > 0:'Your jump rope is sitting on a shelf. '
  35. if bookYog > 0:'A yoga mat is rolled up in a corner next to the wardrobe. '
  36. if mishka > 0:'On one of the shelves, you''ve placed your <<mishka>> teddy bear.'
  37. gs 'exercise', 'start'
  38. if nichSalaryOutstanding > 0:
  39. *nl
  40. 'On top of your desk lies your paycheck over <<nichSalaryOutstanding>> <b>?</b>(<a href="exec:gt ''nichBedroomServant'', ''redeemSalary''">redeem</a>).'
  41. end
  42. act 'Go to the hallway':
  43. if nichEvtGalaTele1 = 1 and nichGalaOpinion = 1 and (rand(1,100) <= 40 or nichDebug = 1):
  44. gt 'nichBedroomServant', 'evtBodyguardIntim1'
  45. elseif nichGalaOpponent = 31 and (rand(1,100) <= 10 or nichDebug = 1):
  46. !!Todo: Sveta gets abducted
  47. else
  48. if $clothingworntype ! 'nude':
  49. minut += 1
  50. gt 'nichApartment'
  51. else
  52. msg'<b><font color = red>You probably shouldn''t walk around naked, especially not at your workplace. You need to get dressed.</font></b>'
  53. gt $CURLOC
  54. end
  55. end
  56. end
  57. act 'Go to the servant bathroom':
  58. gt 'nichBathServant'
  59. end
  60. act 'Study (2:00)':
  61. *clr & cla
  62. menu_off = 1
  63. minut += 120
  64. intel_exp += 1
  65. '<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
  66. 'You spend two hours studying and feel a little smarter now.'
  67. act 'Finish':gt $loc
  68. end
  69. if student > 0 and kursovik < 100:
  70. act 'Write course work (1:00)':
  71. *clr & cla
  72. menu_off = 1
  73. minut += 60
  74. kursovik += rand(pcs_intel / 20, pcs_intel / 10)
  75. if kursovik > 100:kursovik = 100
  76. pcs_mood -= 10
  77. '<center><img <<$set_imgh>> src="images/pc/activities/study.jpg"></center>'
  78. 'You work on your course work and have now completed <<kursovik>> percent.'
  79. act 'Finish':gt $loc
  80. end
  81. end
  82. gs 'events', 'read'
  83. if pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0:gt'tobiQW','start'
  84. if sick >= 1:
  85. act 'Get some bed rest (illness)':
  86. *clr & cla
  87. menu_off = 1
  88. minut += 240
  89. sick -= 1
  90. if sick < 0:sick = 0
  91. gs'stat'
  92. '<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/sick'+rand(11,17)+'.jpg"></center>'
  93. 'You lie in bed, coughing, sneezing, blowing your nose... and, as if that wasn''t enough, you also think you might be getting a headache.'
  94. 'Drifting in and out of sleep, you spend about 4 hours tossing and turning, trying to sweat out the illness, and you actually feel better when you decide to stretch your legs.'
  95. act 'Get up': gt 'bedr'
  96. end
  97. end
  98. if pcs_horny >= 50: act 'Masturbate': gt'selfplay', 'start'
  99. if pornMagazine > 0:'You hide a porn magazine under your mattress.' & dynamic $d_read_porn
  100. if dur > 0:'You have hidden <<dur>> doses of Pale Lady behind your wardrobe.'
  101. if dur > 0 and narkday ! daystart:
  102. act 'Take some cocaine (0:05)':
  103. *clr & cla
  104. menu_off = 1
  105. minut += 5
  106. narkday = daystart
  107. gs 'drugs', 'cocaine'
  108. '<center><img <<$set_imgh>> src="images/shared/drugs/dur.jpg"></center>'
  109. 'You take a small dose of coke and not long after, you start to feel great, as if you could do anything, <b>be</b> anything - but you''re also starting to feel incredibly horny.'
  110. act 'Leave':gt $curloc
  111. end
  112. end
  113. if nichWork = 2:
  114. gs 'nichChore','inspect','servant'
  115. end
  116. elseif $ARGS[0] = 'evtBodyguardIntim1':
  117. *clr & cla
  118. '<center><img <<$set_imgh>> src="images/characters/city/taras/encounter1.jpg"></center>'
  119. 'Before you have the chance to leave your room you get pushed back inside by a man you don''t know yet.'
  120. 'Taken by surpise you can only gasp as he painfully turns your right arm around, forcing you into a bent over position.'
  121. 'He obviously knows what he is doing. He has expertly fixated you with just one hand, leaving you next to no room to move.'
  122. '"Let me introduce myself. My name is Taras, but you will call me Sir. I am the bodyguard of Mistress Gala. I am responsible for protecting not only her life and health, but also the good reputation of her family."'
  123. '"She told me that her husband hired a little skank as his new maid."'
  124. 'You gasp in surprise as he pulls up your skirt leaving your butt exposed.'
  125. '"And from the looks of it she is right. Not that I would have doubted her word."'
  126. 'He smacks your left buttock painfully.'
  127. '"Of course that can''t be accepted."'
  128. 'He smacks your other buttock.'
  129. '"Consider this your first and only warning. If you whore around this house, if you make Mistress Gala unhappy in any way, you will regret it."'
  130. 'He smacks your left buttock again.'
  131. '"Do you understand?"'
  132. !! Todo: Disagree
  133. 'Unable to resist in you current position you meekly nod your head "Yes."'
  134. 'The right buttock again.'
  135. '"Yes what?"'
  136. '"Yes sir, I understand."'
  137. 'He waits for another few seconds before gently stroking your hair and then releasing you.'
  138. '"Good girl. I would hate to actually hurt you." with this obvious lie he leaves your room.'
  139. gs 'pain', 3, 'asscheeks', 'spank'
  140. nichGalaOpinion = 2
  141. act 'Return':
  142. gt $loc
  143. end
  144. elseif $ARGS[0] = 'desk':
  145. if nichGalaOpponent = 21:
  146. '<center><img <<$set_imgh>> src="images/characters/city/gala/necklace.jpg"></center>'
  147. 'You open your desk. Something doesn''t seem to be right. After closer investigation you find Galas missing necklace hidden under some of your items.'
  148. act 'Leave it there':
  149. gt 'stol','start'
  150. end
  151. act 'Bring it back to where it belongs':
  152. minut += 3
  153. nichGalaOpponent = 22
  154. gt 'nichBedroomServant', 'return'
  155. end
  156. else
  157. gt 'stol','start'
  158. end
  159. elseif $ARGS[0] = 'redeemSalary':
  160. *clr & cla
  161. karta += nichSalaryOutstanding
  162. nichSalaryOutstanding = 0
  163. 'Your salary of <<nichSalaryOutstanding>> <b>?</b> is transferred to your bank account.'
  164. act 'Back': gt 'nichBedroomServant', 'return'
  165. elseif $ARGS[0] = 'sleepEvents':
  166. if ARGS[1] = 0:
  167. if nichGalaOpponent = 30 and hour <= 23 and hour >= 19:
  168. gt 'nichBedroomServant','sleepEvents', 1000
  169. end
  170. elseif ARGS[1] = 1000:
  171. hour = 23
  172. minut += 180
  173. 'In the middle of the night you wake up from your sleep. You have the feeling as if somebody is in your room watching you. You look around but there is nobody to be seen.'
  174. *nl
  175. 'Maybe you are just paranoid?'
  176. *nl
  177. 'You decide to get back to sleep. You close your eyes and rest your head back on your pillow.'
  178. *nl
  179. 'Suddenly you feel a strong hand grabbing your face, sealing your mouth and nose shut while another hand pins you down by your hip.'
  180. *nl
  181. 'You try to scream put you can''t get a single sound out. The last thing you notice before you lose consciousness is a sweetish smell.'
  182. !!WIP Notice
  183. *nl
  184. '<font color = red><b>Warning: This part of the story is currently not finished and most likely ends in a dead end. Click ignore to pass it.</b></font>'
  185. act 'Everything turns black':
  186. gt 'nichTaras','abdIntro'
  187. end
  188. act 'Ignore':
  189. nichGalaOpponent = 31
  190. menu_off = 0
  191. InSleep = 0
  192. gt 'nichBedroomServant'
  193. end
  194. end
  195. end
  196. --- nickBedroomServant ---------------------------------