1
0

city_house_res_misc.qsrc 11 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356
  1. # city_house_res_misc
  2. !!Small frontyard
  3. if $ARGS[0] = 'fronty':
  4. $loc = 'city_house_res_misc'
  5. $loc_arg = 'fronty'
  6. $menu_loc = 'city_house_res_misc'
  7. $menu_arg = 'fronty'
  8. $location_type = 'public_outdoors'
  9. killvar '$locclass'
  10. menu_off = 0
  11. minut += 1
  12. gs 'stat'
  13. if sound = 0:
  14. if month >=11 and month <= 12 or month >=1 and month <=3:
  15. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/zima.mp3',30
  16. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  17. else
  18. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/street_leto.mp3',30
  19. if hour >= 0 and hour <= 7: PLAY 'sound/street_night_leto.mp3' & PLAY 'sound/street_night.mp3',30
  20. end
  21. end
  22. *clr & cla
  23. '<center><b><font color="maroon">Living Room</font></b></center>'
  24. '<center><img <<$set_imgh>> src="images/locations/city/residential/house/crh_fronty.jpg"></center>'
  25. 'Your small two story house sits on the edge of the residential area. Despite that, your neighbors are pretty close and the sounds of the street fill the air.'
  26. *nl
  27. if car > 0 and cardrive = 8: '<a href="exec:GS ''carF'', ''start''">Your <<$car>></a> is in the driveway.'
  28. act 'Go inside': gt 'city_house_res_misc', 'hallw'
  29. act 'Go to the city':
  30. minut += 10
  31. gt 'city_residential'
  32. end
  33. if curr_home ! 15:
  34. act 'Set this house as your main home':gs 'set_home', 15 & gt 'city_house_res_misc', 'fronty'
  35. end
  36. end
  37. if $ARGS[0] = 'hallw':
  38. CLOSE ALL
  39. $loc = 'city_house_res_misc'
  40. $loc_arg = 'hallw'
  41. $menu_loc = 'city_house_res_misc'
  42. $menu_arg = 'hallw'
  43. $locM = 'city_house_res_misc'
  44. $locM_arg = 'hallw'
  45. $location_type = 'private'
  46. killvar '$locclass'
  47. menu_off = 0
  48. minut += 1
  49. gs 'stat'
  50. gs 'themes', 'indoors'
  51. if frost > 0: frost = 0
  52. *clr & cla
  53. '<center><b><font color="maroon">Hallway</font></b></center>'
  54. '<center><img <<$set_imgh>> src="images/locations/city/residential/house/crh_hallway.jpg"></center>'
  55. if courtletter_date <= daystart and courtletter_date ! 0: gt 'sentence', 'letter'
  56. act 'Go out front':
  57. if $clothingworntype ! 'nude':
  58. minut += 1
  59. gt 'city_house_res_misc', 'fronty'
  60. else
  61. msg'<b><font color = red>You need to get dressed.</font></b>'
  62. gt 'city_house_res_misc', 'hallw'
  63. end
  64. end
  65. 'The main hallway of your house. You can visit the different rooms from here.'
  66. 'There''s a <a href="exec:gt ''mirror'', ''start''">mirror</a> hanging on the wall.'
  67. if umbrella > 0:'There''s an umbrella hanging on a hook by the door.'
  68. act 'Go to your bedroom': gt 'city_house_res_bedr', 'bedro'
  69. act 'Go to your bathroom': gt 'city_house_res_bathr', 'bathr'
  70. act 'Go to your kitchen': gt 'city_house_res_kitch', 'kitch'
  71. act 'Go to your living room': gt 'city_house_res_misc', 'livroom'
  72. act 'Go to your backyard': gt 'city_house_res_misc', 'backy'
  73. end
  74. !!Small backyard for outdoor working out or maybe gardening?
  75. if $ARGS[0] = 'backy':
  76. $loc = 'city_house_res_misc'
  77. $loc_arg = 'backy'
  78. $menu_loc = 'city_house_res_misc'
  79. $menu_arg = 'backy'
  80. $location_type = 'secluded'
  81. menu_off = 0
  82. minut += 1
  83. gs 'stat'
  84. *clr & cla
  85. '<center><b><font color="maroon">Living Room</font></b></center>'
  86. '<center><img <<$set_imgh>> src="images/locations/city/residential/house/crh_backy.jpg"></center>'
  87. 'Your small backyard is fenced in, with a few plots intended for gardening.'
  88. act 'Go inside': gt 'city_house_res_misc', 'hallw'
  89. if sunWeather = 1:
  90. if pcs_stam >=15 or (pcs_stam >= 10 and bookYog + obruch > 0):
  91. if $clothingworntype = 'danilovich_outfits' and $shoeworntype = 'danilovich':
  92. *nl
  93. 'You can do some exercises here.'
  94. act 'Exercise': gt 'exercise', 'workout'
  95. else
  96. *nl
  97. 'You could do some exercises here if you were wearing exercise clothes.'
  98. end
  99. end
  100. end
  101. end
  102. if $ARGS[0] = 'livroom':
  103. $loc = 'city_house_res_misc'
  104. $loc_arg = 'livroom'
  105. $menu_loc = 'city_house_res_misc'
  106. $menu_arg = 'livroom'
  107. $location_type = 'private'
  108. $locclass = 'livingr'
  109. menu_off = 0
  110. minut += 1
  111. gs 'stat'
  112. *clr & cla
  113. '<center><b><font color="maroon">Living Room</font></b></center>'
  114. '<center><img <<$set_imgh>> src="images/locations/city/residential/house/crh_living.jpg"></center>'
  115. act 'Leave the room': gt 'city_house_res_misc', 'hallw'
  116. 'A place where you can watch <a href="exec:gt ''TV'',''start''">TV</a>, or relax on your <a href="exec:gt ''divan'', ''start''">sofa</a>.'
  117. if komp = 1:
  118. 'There''s a <a href="exec:gt ''Komp'', ''start''">computer</a> sitting on your <a href="exec:gt ''stol'', ''start''">desk</a>.'
  119. else
  120. 'A small <a href="exec:gt ''stol'', ''start''">desk</a> is against the wall.'
  121. end
  122. 'There is enough space to workout.'
  123. gs 'exercise', 'start'
  124. gs 'subkid'
  125. if ml_guitar['carried'] = 1:
  126. act 'Place the guitar next to your desk':
  127. ml_guitar['carried'] = 0
  128. $ml_guitar['location'] = $curloc
  129. gt $loc, $loc_arg
  130. end
  131. elseif $ml_guitar['location'] = $curloc:
  132. act 'Pick up the guitar':
  133. ml_guitar['carried'] = 1
  134. $ml_guitar['location'] = ''
  135. gt $loc, $loc_arg
  136. end
  137. end
  138. if ml_online['account'] = 0 and internet > 0:
  139. act 'Set up an online music account': gt 'music_onlinemusic', 'setupAccount'
  140. end
  141. !!Uploading recorded music if there are any not uploaded yet
  142. if ml_uploadablemusic > 0 and internet > 0 and ml_online['account'] = 1:
  143. if pcs_inhib < 30:
  144. if pcs_inhib < 10:
  145. $diff = 'hard'
  146. elseif pcs_inhib < 20:
  147. $diff = 'medium'
  148. else
  149. $diff = 'easy'
  150. end
  151. gs 'willpower', 'skill', 'self', $diff
  152. will_cost = (will_cost * 2) - (pcs_perform)
  153. if will_cost <= pcs_willpwr:
  154. act 'Upload music (<<will_cost>> Willpower)': gt 'music_onlinemusic', 'uploadmusic'
  155. else
  156. 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>'
  157. end
  158. end
  159. act 'Upload music': gt 'music_onlinemusic', 'uploadallmusic'
  160. end
  161. if ml_uploadablemusic > 0:
  162. act 'Delete old recordings': gt 'music_onlinemusic', 'deleteoldmusic'
  163. end
  164. if hour > 8 and hour < 22:
  165. if ml_guitar['hasguitar'] = 1:
  166. act 'Play something on the guitar':
  167. pcs_mood += 10
  168. minut += 10
  169. gs 'stat'
  170. 'You pick up your guitar and start to play some songs you know, just for your own entertainment.'
  171. 'You hum along to the tune, relaxing into the music and enjoying it. When you look up, 10 minutes has passed and you are in a much better mood.'
  172. end
  173. end
  174. 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:
  175. if pcs_inhib < 30:
  176. if pcs_inhib < 10:
  177. $diff = 'hard'
  178. elseif pcs_inhib < 20:
  179. $diff = 'medium'
  180. else
  181. $diff = 'easy'
  182. end
  183. gs 'willpower', 'skill', 'self', $diff
  184. will_cost = (will_cost * 3) - (pcs_perform)
  185. if will_cost <= pcs_willpwr:
  186. act 'Practice guitar (<<will_cost>> Willpower)':
  187. inhib_exp += rand(1,2)
  188. gs 'willpower', 'pay', 'self'
  189. gs 'stat'
  190. gt 'music_bedroomPractice', 'guitar'
  191. end
  192. else
  193. 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>'
  194. end
  195. else
  196. act 'Practice guitar': gt 'music_bedroomPractice', 'guitar'
  197. end
  198. end
  199. !! Streaming music
  200. if ml_guitar['hasguitar'] = 1 and ml_online['account'] = 1 and internet > 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:
  201. ml_streamtime = min((ml_performance['max_perform_minutes']-ml_performance['performed_minutes']), 60)
  202. if pcs_inhib < 30:
  203. if pcs_inhib < 10:
  204. $diff = 'hard'
  205. elseif pcs_inhib < 20:
  206. $diff = 'medium'
  207. else
  208. $diff = 'easy'
  209. end
  210. gs 'willpower', 'skill', 'self', $diff
  211. will_cost = (will_cost * 3) - (pcs_perform)
  212. if will_cost <= pcs_willpwr:
  213. act 'Live stream (<<ml_streamtime>> minutes) (<<will_cost>> Willpower)':
  214. inhib_exp += rand(1,3)
  215. gs 'willpower', 'pay', 'self'
  216. gs 'stat'
  217. gt 'music_onlinemusic', 'liveStream'
  218. end
  219. else
  220. 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>'
  221. end
  222. else
  223. act 'Live stream (<<ml_streamtime>> minutes)': gt 'music_onlinemusic', 'liveStream'
  224. end
  225. end
  226. !! Recording music
  227. if ml_guitar['hasguitar'] = 1 and ml_performance['performed_minutes'] < ml_performance['max_perform_minutes'] and alko < 5:
  228. if pcs_inhib < 20:
  229. if pcs_inhib < 10:
  230. $diff = 'medium'
  231. elseif pcs_inhib < 20:
  232. $diff = 'easy'
  233. end
  234. gs 'willpower', 'skill', 'self', $diff
  235. if will_cost <= pcs_willpwr:
  236. act 'Record a song with your phone (<<will_cost>> Willpower)':
  237. inhib_exp += rand(1,2)
  238. gs 'willpower', 'pay', 'self'
  239. gs 'stat'
  240. gt 'music_onlinemusic', 'recordSong'
  241. end
  242. if komp = 1 and webcamera = 1 and ml_studio['scarlet-3rd-gen'] = 1:
  243. act 'Record and edit a song (<<will_cost>> Willpower)':
  244. inhib_exp += rand(1,2)
  245. gs 'willpower', 'pay', 'self'
  246. gs 'stat'
  247. gt 'music_onlinemusic', 'recordAndEditSong'
  248. end
  249. end
  250. else
  251. act 'Record a song (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  252. act 'Record and edit a song (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  253. end
  254. else
  255. act 'Record a song with your phone': gt 'music_onlinemusic', 'recordSong'
  256. if komp = 1 and webcamera = 1 and ml_studio['scarlet-3rd-gen'] = 1:
  257. act 'Record and edit a song': gt 'music_onlinemusic', 'recordAndEditSong'
  258. end
  259. end
  260. end
  261. end
  262. if sewing_kit = 1:
  263. 'Your <a href="exec:gt ''sewing'',''start''">sewing kit</a> is stored next to your favorite chair.'
  264. *nl
  265. if gobelen > 0:
  266. 'You have completed <<gobelen>> tapestries.'
  267. *nl
  268. end
  269. if tkan <= 0:
  270. 'You do not have any fabric.'
  271. else
  272. if pcs_sewng < 40:
  273. 'You have <<tkan>> pieces of sewing fabric left.'
  274. elseif pcs_sewng < 80:
  275. 'You have enough fabric for <<tkan>> lessons.'
  276. else
  277. if newgobelen = 0:
  278. act'Start a new tapestry (00:15)':
  279. *clr & cla
  280. menu_off = 1
  281. tkan -= 1
  282. newgobelen = 1
  283. minut += 15
  284. gs'stat'
  285. 'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
  286. act'Set the tapestry aside':gt $curloc
  287. end
  288. end
  289. end
  290. end
  291. if newgobelen >= 1:
  292. 'Your tapestry is <<newgobelen/10>> percent finished.'
  293. act'Work on the tapestry (01:00)':
  294. *clr & cla
  295. menu_off = 1
  296. minut += 60
  297. sewng_exp += rand(pcs_intel/10, pcs_intel/5)
  298. gobramax = (pcs_sewng - 70) * 6
  299. gobramin = (pcs_sewng - 70) * 2
  300. newgobelen += rand(gobramin,gobramax)
  301. gs'stat'
  302. if newgobelen < 1000:'You spend an hour working on your tapestry, which is now <<newgobelen/10>> percent finished.'
  303. if newgobelen >= 1000:
  304. newgobelen = 0
  305. gobelen += 1
  306. 'Your work on the tapestry is done.'
  307. end
  308. act'Set the tapestry aside':gt $curloc
  309. end
  310. end
  311. end
  312. end
  313. --- city_house_res_misc ---------------------------------