city_mansion_residence_2.qsrc 9.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278
  1. # city_mansion_residence_2
  2. if $ARGS[0] = 'yliving':
  3. $loc = 'city_mansion_residence_2'
  4. $loc_arg = 'yliving'
  5. $menu_loc = 'city_mansion_residence_2'
  6. $menu_arg = 'yliving'
  7. $location_type = 'private'
  8. $locclass = 'livingr'
  9. menu_off = 0
  10. minut += 1
  11. gs 'stat'
  12. gs 'music_actions', 'clear_restrictions'
  13. *clr & cla
  14. '<center><b><font color="maroon">Living Room</font></b></center>'
  15. if ymanrem[7] = 2:
  16. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/y_living.jpg"></center>'
  17. elseif ymanrem[7] = 1:
  18. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_finished.jpg"></center>'
  19. else
  20. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_unfinished.jpg"></center>'
  21. end
  22. act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
  23. if ymanrem[7] = 2:
  24. 'A large room where you can watch <a href="exec:gt ''TV'',''start''">TV</a>, or relax on your luxury <a href="exec:gt ''divan'', ''start''">leather sofa</a>.'
  25. if $ml_guitar['location'] = $loc: 'Your guitar rests on its stand next to the sofa.'
  26. gs 'subkid'
  27. gs 'music_actions', 'start'
  28. end
  29. end
  30. if $ARGS[0] = 'ylounge':
  31. $loc = 'city_mansion_residence_2'
  32. $loc_arg = 'ylounge'
  33. $menu_loc = 'city_mansion_residence_2'
  34. $menu_arg = 'ylounge'
  35. $location_type = 'private'
  36. menu_off = 0
  37. minut += 1
  38. gs 'stat'
  39. *clr & cla
  40. '<center><b><font color="maroon">Lounge</font></b></center>'
  41. if ymanrem[8] = 2:
  42. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/y_lounge.jpg"></center>'
  43. elseif ymanrem[8] = 1:
  44. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_finished.jpg"></center>'
  45. else
  46. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_unfinished.jpg"></center>'
  47. end
  48. act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
  49. if ymanrem[8] = 2:
  50. 'The lounge, where you can work on your tapestries and relax in front of the fireplace.'
  51. if mc_inventory['sewing_kit'] = 1:
  52. 'Your <a href="exec:gt ''sewing'',''start''">sewing kit</a> is stored next to your favorite chair.'
  53. *nl
  54. if mc_inventory['sewing_fabric'] <= 0:'You do not have any fabric.'
  55. *nl
  56. if pcs_sewng >= 80:
  57. if newgobelen = 0 and mc_inventory['sewing_fabric'] > 0:
  58. act'Start a new tapestry':gt 'sewing', 'tapestry'
  59. elseif newgobelen >= 1:
  60. 'Your tapestry is <<newgobelen/10>> percent finished.'
  61. act 'Work on the tapestry':gt 'sewing', 'tapestry'
  62. end
  63. end
  64. if mc_inventory['tapestry'] > 0: 'You have <<mc_inventory[''tapestry'']>> completed tapestries.'
  65. end
  66. end
  67. end
  68. if $ARGS[0] = 'ylibrary':
  69. $loc = 'city_mansion_residence_2'
  70. $loc_arg = 'ylibrary'
  71. $menu_loc = 'city_mansion_residence_2'
  72. $menu_arg = 'ylibrary'
  73. $location_type = 'private'
  74. menu_off = 0
  75. minut += 1
  76. gs 'stat'
  77. *clr & cla
  78. '<center><b><font color="maroon">Library</font></b></center>'
  79. if ymanrem[10] = 2:
  80. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/y_library.jpg"></center>'
  81. elseif ymanrem[10] = 1:
  82. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_finished.jpg"></center>'
  83. else
  84. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_unfinished.jpg"></center>'
  85. end
  86. act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
  87. if ymanrem[10] = 2:
  88. killvar '$downlibrary'
  89. $downlibrary['read'] = {
  90. *clr & cla
  91. menu_off = 1
  92. if blizoruk = 500 or glassqw = 1:
  93. glassqw = 1
  94. msg ' The text blurs across the page. It seems you have poor eyesight. Maybe you should visit an ophthalmologist?'
  95. gt 'city_mansion_residence_2', 'ylibrary'
  96. end
  97. if pcs_nerd > 0:
  98. lastread = totminut
  99. lastreadday = daystart
  100. pcs_nerd += 1
  101. end
  102. minut += 60
  103. blizoruk += 1
  104. }
  105. 'A huge collection of books are neatly placed on the bookshelves.'
  106. act 'Read a book on science (1:00)':
  107. dynamic $downlibrary['read']
  108. gs 'exp_gain', 'intel', rand(3,6) + rand(0, drugVars['mentats_dose'])
  109. grupvalue[3] +=1
  110. gs 'stat'
  111. '<center><img <<$set_imgh>> src="images/pc/items/accessories/books/science1.jpg"></center>'
  112. 'You spend an hour reading, trying to make sense of all the clever propositions writen inside and to finally understand the subject it describes.'
  113. act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
  114. end
  115. act 'Read an adventure novel (1:00)':
  116. dynamic $downlibrary['read']
  117. pcs_mood = 100
  118. grupvalue[3] +=1
  119. gs 'stat'
  120. '<center><img <<$set_imgh>> src="images/pc/items/accessories/books/fiction' + rand(1,2) + '.jpg"></center>'
  121. 'You spend an hour reading an adventure novel, immersing yourself in daring deeds and awesome twists.'
  122. act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
  123. end
  124. act 'Read a fantasy novel (1:00)':
  125. dynamic $downlibrary['read']
  126. pcs_mood = 100
  127. grupvalue[3] +=1
  128. gs 'stat'
  129. '<center><img <<$set_imgh>> src="images/pc/items/accessories/books/fantasy' + rand(1,9) + '.jpg"></center>'
  130. 'You spend an hour reading a fantasy novel, rescuing damsels from dragons, digging for jewels with dwarves and performing word changing magic alongside elves and druids.'
  131. act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
  132. end
  133. act 'Read a science fiction novel (1:00)':
  134. dynamic $downlibrary['read']
  135. pcs_mood = 100
  136. grupvalue[3] += 1
  137. gs 'stat'
  138. '<center><img <<$set_imgh>> src="images/pc/items/accessories/books/scifi' + rand(1,6) + '.jpg"></center>'
  139. 'You spend an hour reading a science fiction novel - flying off into space, travelling though time, running from rogue AI''s and creating monsters with your hunchbacked assistant.'
  140. act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
  141. end
  142. act 'Read a romance novel (1:00)':
  143. dynamic $downlibrary['read']
  144. pcs_mood = 100
  145. pcs_horny += 20
  146. gs 'stat'
  147. '<center><img <<$set_imgh>> src="images/pc/items/accessories/books/romance' + rand(1,20) + '.jpg"></center>'
  148. 'You spend a very short hour reading a romance novel - choosing between a vampire or a werewolf, falling in love with an obscenely wealthy Grey... several of the scenes are very steamy and you find yourself getting quite aroused.'
  149. act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
  150. end
  151. temp = pcs_intel * 2 + pcs_sprt
  152. if temp < 100:
  153. $diff = 'hard'
  154. elseif temp < 150:
  155. $diff = 'medium'
  156. else
  157. $diff = 'easy'
  158. end
  159. gs 'willpower', 'misc', 'self', $diff
  160. if will_cost <= pcs_willpwr:
  161. act 'Read from the collected works of Leo Tolstoy (1:00) (<<will_cost>> Willpower)':
  162. gs 'willpower', 'pay', 'self'
  163. killvar 'will_cost'
  164. dynamic $downlibrary['read']
  165. gs 'exp_gain', 'sprt', rand(3,6)
  166. grupvalue[3] += 2
  167. gs 'stat'
  168. '<center><img <<$set_imgh>> src="images/pc/items/accessories/books/tolstoy.jpg"></center>'
  169. 'You read the book for an hour. Tolstoy is certainly a classic writer, no one denies this, but he used a shit-load of words.'
  170. act 'Put the book back': gt 'city_mansion_residence_2', 'ylibrary'
  171. end
  172. else
  173. act 'Read from the collected works of Leo Tolstoy (1:00) (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  174. end
  175. end
  176. end
  177. if $ARGS[0] = 'yoffice':
  178. $loc = 'city_mansion_residence_2'
  179. $loc_arg = 'yoffice'
  180. $menu_loc = 'city_mansion_residence_2'
  181. $menu_arg = 'yoffice'
  182. $locM = 'city_mansion_residence_2'
  183. $locM_arg = 'yoffice'
  184. $location_type = 'private'
  185. menu_off = 0
  186. minut += 1
  187. gs 'stat'
  188. gs 'music_actions', 'clear_restrictions'
  189. *clr & cla
  190. '<center><b><font color="maroon">Office</font></b></center>'
  191. if ymanrem[12] = 2:
  192. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/y_office.jpg"></center>'
  193. elseif ymanrem[12] = 1:
  194. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_finished.jpg"></center>'
  195. else
  196. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_unfinished.jpg"></center>'
  197. end
  198. act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
  199. if ymanrem[12] = 2:
  200. 'Your work room where you spend most of the time signing important papers and handling your business needs.'
  201. !!TODO: Code to check if Sveta is not alone
  202. gs 'internet_mobile', 'get_access'
  203. 'There''s a <a href="exec:gt ''Komp'', ''start''">computer</a> sitting on your antique <a href="exec:gt ''stol'', ''start''">desk</a>.'
  204. !! IMPORTANT: if there is anything added later that could mean that others are in the room, gs 'music_actions', 'not_alone' should be added with the correct conditions.
  205. gs 'music_actions', 'start'
  206. end
  207. end
  208. if $ARGS[0] = 'ynursery':
  209. $loc = 'city_mansion_residence_2'
  210. $loc_arg = 'ynursery'
  211. $menu_loc = 'city_mansion_residence_2'
  212. $menu_arg = 'ynursery'
  213. $location_type = 'private'
  214. menu_off = 0
  215. minut += 1
  216. gs 'stat'
  217. *clr & cla
  218. '<center><b><font color="maroon">Nursery</font></b></center>'
  219. if ymanrem[9] = 2:
  220. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/y_nursery.jpg"></center>'
  221. '<center>The neatly designed nursery room, only the best for your children.</center>'
  222. elseif ymanrem[9] = 1:
  223. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_finished.jpg"></center>'
  224. else
  225. '<center><img <<$set_imgh>> src="images/locations/city/suburb/mansion/i_unfinished.jpg"></center>'
  226. end
  227. act 'Leave the room': gt 'city_mansion_residence_1', 'yfoyer'
  228. if ymanrem[9] = 2: gs 'subkid'
  229. end
  230. --- city_mansion_residence_2 ---------------------------------