Nord.qsrc 8.2 KB

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