1
0

city_industrial.qsrc 9.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204
  1. # city_industrial
  2. if $ARGS[0] = '':
  3. $loc_arg = ''
  4. $loc = 'city_industrial'
  5. $location_type = 'public_outdoors'
  6. $menu_loc = 'city_industrial'
  7. $menu_arg = ''
  8. menu_off = 0
  9. CLOSE ALL
  10. if sound = 0:
  11. if month >=11 and month <= 12 or month >=1 and month <=3:
  12. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/zima.mp3',30
  13. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  14. else
  15. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/street_leto.mp3',30
  16. if hour >= 0 and hour <= 7: PLAY 'sound/street_night_leto.mp3' & PLAY 'sound/street_night.mp3',30
  17. end
  18. end
  19. gs 'stat'
  20. !call random events from [street_events], and display them before show location.
  21. if streetevent_hour + 2 < hour: gt 'street_event','city_industrial', 'main'
  22. '<center><h2>St. Petersburg</h2></center>'
  23. '<center><b>Industrial Region</b></center>'
  24. if month >= 11 or month <= 3:
  25. if hour >= 8 and hour <= 21:
  26. '<center><img <<$set_imgh>> src="images/locations/city/industrial/industw.jpg"></center>'
  27. else
  28. '<center><img <<$set_imgh>> src="images/locations/city/industrial/industwn.jpg"></center>'
  29. end
  30. else
  31. if hour >= 8 and hour <= 21:
  32. '<center><img <<$set_imgh>> src="images/locations/city/industrial/nord.jpg"></center>'
  33. else
  34. '<center><img <<$set_imgh>> src="images/locations/city/industrial/nord2.jpg"></center>'
  35. end
  36. end
  37. gs'street_event','city_industrial', 'extras'
  38. act 'Walk to the main road to Pavlovsk (0:15)': minut += 15 & nroad = 0 & gt'road'
  39. act 'Visit the Red Light District (0:05)': minut += 5 & gt 'city_industrial', 'redlight'
  40. act 'Wait':gs 'obj_din', 'wait'
  41. gs 'taxi'
  42. if car > 0:
  43. if wrek = 0 and ((cardrive = 7 and func('autoservisF', 'is_open') = 0) or (cardrive = 9 and func('autotraidF', 'is_open') = 0)):
  44. 'It looks like the ' + iif(cardrive = 7, 'repair shop', 'car dealership') + ' moved your car outside before they closed.'
  45. cardrive = 3
  46. end
  47. if cardrive = 3 or cardrive = 6 or (cardrive = 7 and func('autoservisF', 'is_open')) or (cardrive = 9 and func('autotraidF', 'is_open')) or cardrive = 27:
  48. 'In the parking stands your <a href="exec:' + iif(cardrive = 3, '', 'minut += 5 & ') + 'gs ''carF'', ''start''"><<$car>></a>.'
  49. end
  50. end
  51. 'The town''s <a href="exec:minut += 60 & gt ''city_park'', ''start''">central park</a> is a one hour walk from here.'
  52. if hour > 7 and hour < 23:
  53. 'You can see the <a href="exec:$loc = ''city_industrial'' & minut += 1 & gt ''kiosk'', ''start''">kiosk</a> selling cigarettes and magazines.'
  54. else
  55. 'The kiosk is closed between 23:00 and 07:00.'
  56. end
  57. 'At the center of the industrial region is a <a href="exec:minut += 15 & gt ''city_industrial_train'', ''outside''">train station</a>.'
  58. if week = 3 or hour < 16:
  59. 'The "Rabotnik" bar is here, but it seems to be closed. A sign by the door tells you that it''s open every day (except Wednesday) between 16:00 and midnight...'
  60. else
  61. 'The <a href="exec: minut += 5 & gt ''qwBarPolet''">Bar "Rabotnik"</a> seems to be open.'
  62. end
  63. ![slavaQW - Related to Glory; references to bar "Flight" have to be fixed - requirement to access the bar has been removed for now, since content not related - Variable not used by anything else at the moment]
  64. litltown = 0
  65. 'There is a <a href="exec: minut += 5 & gt ''zaprF'', ''start''">gas station</a> near the street'
  66. if hour >= 5 and hour <= 23:
  67. 'The <a href="exec: minut += 5 & gt ''metro'', ''start''">metro station</a> is within a 5 minute walk from here.'
  68. else
  69. 'The metro station is within a 5 minute walk from here. The metro system is closed between midnight and 05:00.'
  70. end
  71. if func('autotraidF', 'is_open'):
  72. 'A <a href="exec: minut += 5 & gt ''autotraidF'', ''start''">car dealership</a> is nearby.'
  73. else
  74. 'A car dealership is nearby' + iif(week = 1, ', but it''s closed on Mondays.', '. It''s currently closed and will open between 09:00 and 18:00.') + iif(car > 0 and cardrive = 9, ' Your <<$car>> is currently locked inside.', '')
  75. end
  76. if func('autoservisF', 'is_open'):
  77. 'Next to the car dealership is a <a href="exec: minut += 5 & gt ''autoservisF'', ''start''">repair shop</a>.'
  78. else
  79. 'Next to the car dealership is a repair shop.' + iif(week = 7, 'It''s closed on Sundays.', 'It will be open between 09:00 and 20:00.') + iif(car > 0 and cardrive = 7, ' Your <<$car>> is currently locked inside.', '')
  80. end
  81. if hour >= 9 and hour < 17 and week < 6:
  82. 'The <a href="exec: minut += 5 & gt ''dk'', ''start''">community centre</a> is currently open.'
  83. else
  84. 'The community centre is currently closed. It''s only open during the week between 09:00 and 17:00.'
  85. end
  86. if hour >= 9 and hour <= 17 and (StoryLine = 1 and SchoolAtestat = 0) or bumtolik > 3:
  87. '<a href="exec: gt ''buklinik'',''start''">Mercy clinic</a> is open.'
  88. elseif (hour < 9 or hour > 17) and (StoryLine = 1 and SchoolAtestat = 0) or bumtolik > 3:
  89. 'Mercy clinic is closed.'
  90. end
  91. if hour >= 8 and hour <= 20:
  92. 'The parking lot, which is engulfed in bright lights, belongs to a <a href="exec: minut += 2 & gt ''shop'', ''start''">supermarket</a>.'
  93. else
  94. 'The empty parking lot, which is engulfed in bright lights, belongs to a supermarket that is open between 08:00 and 20:00'
  95. end
  96. if hour >= 12 and hour <= 19:
  97. 'Above the door to a basement room is a bright neon sign for the <a href="exec: minut += 5 & gt ''pirsingsalon'', ''start''">Tattoo & Piercing parlor</a>.'
  98. else
  99. 'Above the door to a basement room is a bright neon sign for the Tattoo & Piercing parlor. The opening hours are 12:00 to 20:00'
  100. end
  101. if tobiQW >= 1:'The old mansion, home to <a href="exec:gt ''kakuzu'', ''start''">Kakuzu</a>'
  102. 'There is a huge building, with bright lights, which houses a <a href="exec: minut += 10 & gt ''casino'', ''outside''">Casino</a>.'
  103. if hour >= 14 or hour < 4:
  104. 'Located far away from the buildings is a <a href="exec: minut += 2 & gt ''lakecafe'', ''main''">barbecue</a>.'
  105. else
  106. 'Located far away from the buildings is a barbecue. It''ll be open between 14:00 and 04:00'
  107. end
  108. if jouryResult = 10:'You can go to one of the apartment blocks and visit <a href="exec:gt ''youry'',''start''">Yuri''s</a> flat'
  109. if BurgerQW['IvanQWTatianaHelp'] > 0:'In one of these building is <a href="exec:gt ''ivanRoom''">Manager Ivans</a> apartment'
  110. 'A long and high fence, which is build around the <a href="exec:gt ''Terminal''">storage terminal</a>'
  111. end
  112. if $ARGS[0] = 'redlight':
  113. $loc_arg = 'redlight'
  114. $loc = 'city_industrial'
  115. $location_type = 'public_outdoors'
  116. $menu_loc = 'city_industrial'
  117. $menu_arg = 'redlight'
  118. menu_off = 0
  119. CLOSE ALL
  120. if sound = 0:
  121. if month >=11 and month <= 12 or month >=1 and month <=3:
  122. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/zima.mp3',30
  123. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  124. else
  125. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/street_leto.mp3',30
  126. if hour >= 0 and hour <= 7: PLAY 'sound/street_night_leto.mp3' & PLAY 'sound/street_night.mp3',30
  127. end
  128. end
  129. gs 'stat'
  130. '<center><h2>St. Petersburg</h2></center>'
  131. '<center><b>Red Light District</b></center>'
  132. if hour >= 18 or hour < 2:
  133. 'The <a href="exec:gt ''stripclub'', ''start''">Strip Clubs</a> red lights, attracting men from all over the city.'
  134. else
  135. 'The <a href="exec:msg ''The Strip Club is closed for the day and will reopen at 18:00''">Strip Clubs</a> red lights, attracting men from all over the city.'
  136. end
  137. if pornstudio >= 1 and hour >= 10 and hour < 22:
  138. 'At the <a href="exec:gt ''pornstudio'', ''start''">Porn Studio</a>, where a variety of adult movies are created.'
  139. elseif pornstudio >= 1 and (hour < 10 or hour >= 22):
  140. 'At the <a href="exec:msg ''The Porn Studio is closed for the day and will reopen at 10:00''">Porn Studio</a>, where a variety of adult movies are created.'
  141. end
  142. if hour < 3 or hour >= 11:
  143. 'A shop for <a href="exec:minut += 5 & gt ''sexshop'', ''start''">Sex Toys</a> is open for perverts from all around the city to browse its stock.'
  144. else
  145. 'A shop that sells sex toys. It is currently closed and will open at 11:00.'
  146. end
  147. if bordel > 0 and func('bordel', 'is_open'):'Inside the courtyard is the entrance to the <a href="exec:gt ''bordel''">brothel</a>.'
  148. act 'Return to the Industrial Region (0:05)': minut += 5 & gt 'city_industrial'
  149. act 'Wait':gs 'obj_din', 'wait'
  150. gs 'taxi'
  151. if car > 0:
  152. if wrek = 0 and ((cardrive = 7 and func('autoservisF', 'is_open') = 0) or (cardrive = 9 and func('autotraidF', 'is_open') = 0)):
  153. 'It looks like the ' + iif(cardrive = 7, 'repair shop', 'car dealership') + ' moved your car outside before they closed.'
  154. cardrive = 3
  155. end
  156. if cardrive = 3 or cardrive = 6 or (cardrive = 7 and func('autoservisF', 'is_open')) or (cardrive = 9 and func('autotraidF', 'is_open')) or cardrive = 27:
  157. 'In the parking stands your <a href="exec:' + iif(cardrive = 27, '', 'minut += 5 & ') + 'gs ''carF'', ''start''"><<$car>></a>.'
  158. end
  159. end
  160. if hour >= 20 or hour <= 4:
  161. *nl
  162. 'There are prostitutes working in places near here.'
  163. if pcs_makeup > 2 and PCloStyle = 4 and pcs_inhib >= 40:
  164. act 'Prostitute yourself': gt 'street_walker', 'work'
  165. elseif pcs_inhib >= 40:
  166. *nl
  167. 'You could work as a prostitute, but you need to wear appropriate clothes and more than a little bit of makeup.'
  168. else
  169. *nl
  170. 'You could work as a prostitute, but you aren''t comfortable with the idea.'
  171. end
  172. end
  173. end
  174. --- city_industrial ---------------------------------