1
0

city_industrial_train.qsrc 8.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262
  1. # city_industrial_train
  2. if $ARGS[0] = 'inside':
  3. $loc_arg = 'inside'
  4. $loc = 'city_industrial_train'
  5. $menu_loc = 'city_industrial_train'
  6. $menu_arg = 'inside'
  7. menu_off = 0
  8. $location_type = 'public_indoors'
  9. killvar '$locclass'
  10. CLOSE ALL
  11. if sound = 0:PLAY 'sound/vokzal.mp3',30
  12. *clr & cla
  13. gs'stat'
  14. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalholle.jpg" ></center>'
  15. 'There is a <a href="exec:gt ''city_lake_path''">path</a> leading off in to the distance, in the direction of the lake.'
  16. act 'Leave the station': minut += 2 & gt 'city_industrial_train', 'outside'
  17. *nl
  18. if Trainpass_day > daystart:
  19. 'You have <<Trainpass_day - daystart>> days left on your train pass.'
  20. act 'Go to the platforms': gt 'city_industrial_train', 'platform'
  21. else
  22. act 'Go to the ticket office': minut += 1 & gt 'city_industrial_train', 'ticket'
  23. end
  24. act 'Go to the restrooms': minut += 1 & gt 'city_industrial_train', 'toilet'
  25. end
  26. if $ARGS[0] = 'outside':
  27. $loc_arg = 'outside'
  28. $loc = 'city_industrial_train'
  29. $menu_loc = 'city_industrial_train'
  30. $menu_arg = 'outside'
  31. menu_off = 0
  32. $location_type = 'public_outdoors'
  33. *clr & cla
  34. gs'stat'
  35. '<center><B>Railway station</B></center>'
  36. if month >= 11 or month <= 3:
  37. if hour >= 9 and hour <= 16:
  38. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_winter_day.jpg"></center>'
  39. else
  40. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_winter_night.jpg"></center>'
  41. end
  42. else
  43. if hour >= 7 and hour <= 18:
  44. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_day.jpg"></center>'
  45. else
  46. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/pavtrainstation_night.jpg"></center>'
  47. end
  48. end
  49. if car > 0 and cardrive = 19:
  50. cardrive = 19
  51. 'In the parking lot is <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
  52. end
  53. if rand(1,100) > 70:
  54. 'You see a <a href="exec:gt ''etoexhib'',''pos54''">suspicious character</a>.'
  55. !fakes use 2 for aware of need for, 1 for have, otherwise 0
  56. if fakepassport = 2 or func('uniutil', 'fake_diploma', 'aware_needed'):
  57. 'When you pass by the suspicious character, he whispers to you: "I have what you want, miss"'
  58. end
  59. end
  60. act 'Go to the city industrial region': minut += 15 & gt'city_industrial'
  61. act 'Enter the station building': minut += 2 & gt'city_industrial_train', 'inside'
  62. end
  63. if $ARGS[0] = 'platform':
  64. $loc_arg = 'platform'
  65. $loc = 'city_industrial_train'
  66. $menu_loc = 'city_industrial_train'
  67. $menu_arg = 'inside'
  68. menu_off = 0
  69. $location_type = 'public_outdoors'
  70. *clr & cla
  71. gs 'stat'
  72. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzalper.jpg" ></center>'
  73. 'When you arrive at the platform, you can''t help but notice it bustling with activity. Lots of passengers are coming and going, all carrying large bags. It feels like it is always busy here, no matter at what time of the day you are here.'
  74. act 'Return to the station': minut += 5 & gt 'city_industrial_train', 'inside'
  75. if Trainpass_day > daystart:
  76. act 'Take a train to the city center': gt 'city_industrial_train', 'centre'
  77. act 'Take a train to the old platform by the communal village': gt 'city_industrial_train', 'communal'
  78. act 'Take a train to the village of Gadukino': gt 'city_industrial_train', 'village'
  79. act 'Take a train to Pavlovsk': gt 'city_industrial_train', 'pavlovsk'
  80. end
  81. end
  82. if $ARGS[0] = 'toilet':
  83. $locM_arg = 'toilet'
  84. $locM = 'city_industrial_train'
  85. $loc_arg = 'toilet'
  86. $loc = 'city_industrial_train'
  87. $menu_loc = 'city_industrial_train'
  88. $menu_arg = 'inside'
  89. menu_off = 0
  90. $location_type = 'bathroom'
  91. $locclass = 'restroom'
  92. *clr & cla
  93. gs'stat'
  94. gs 'themes', 'indoors'
  95. '<center><img <<$set_imgh>> src="images/locations/shared/bathroom/publictoilet.jpg"></center>'
  96. act 'Return to the station': minut += 1 & gt 'city_industrial_train', 'inside'
  97. act 'Look in the mirror': gt 'mirror', 'start'
  98. if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
  99. dynamic $tampon
  100. dynamic $quickwash
  101. dynamic $basin
  102. dynamic $publicpan
  103. end
  104. if $ARGS[0] = 'ticket':
  105. $menu_loc = 'city_industrial_train'
  106. $menu_arg = 'ticket'
  107. menu_off = 0
  108. *clr & cla
  109. gs 'stat'
  110. '<center><h4>Ticket office</h4></center>'
  111. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/ticketoffice.jpg"></center>'
  112. act 'Leave the ticket office':minut += 1 & gt 'city_industrial_train', 'inside'
  113. if money >= 50:
  114. act 'Buy a ticket':
  115. cla
  116. gs 'city_industrial_train', 'buy_ticket'
  117. end
  118. end
  119. if money >= 1500 and Trainpass_day <= daystart:
  120. act 'Buy a weekly pass (7 days - 1500 <b>₽</b>) ':
  121. cla
  122. money -= 1500
  123. Trainpass_day = daystart + 7
  124. act 'Return': gt 'city_industrial_train', 'inside'
  125. end
  126. end
  127. if money >= 5500 and Trainpass_day <= daystart:
  128. act 'Buy a monthly pass (30day - 5500 <b>₽</b>)':
  129. cla
  130. money -= 5500
  131. Trainpass_day = daystart + 30
  132. act 'Return': gt 'city_industrial_train', 'inside'
  133. end
  134. end
  135. end
  136. if $ARGS[0] = 'buy_ticket':
  137. $menu_loc = 'city_industrial_train'
  138. $menu_arg = 'buy_ticket'
  139. menu_off = 0
  140. act 'Leave the ticket office': gt 'city_industrial_train', 'inside'
  141. if money >= 50:
  142. act 'Buy a ticket to the city center (50 <b>₽</b>)':
  143. money -= 50
  144. gt 'city_industrial_train', 'centre'
  145. end
  146. end
  147. if money >= 50:
  148. act 'Buy a ticket to the old platform by the communal village (50 <b>₽</b>)':
  149. money -= 100
  150. gt 'city_industrial_train', 'communal'
  151. end
  152. end
  153. if money >= 75:
  154. act 'Buy a ticket to the village of Gadukino (75 <b>₽</b>)':
  155. money -= 75
  156. gt 'city_industrial_train', 'village'
  157. end
  158. end
  159. if money >= 125:
  160. act 'Buy a ticket to Pavlovsk (125 <b>₽</b>)':
  161. money -= 125
  162. gt 'city_industrial_train', 'pavlovsk'
  163. end
  164. end
  165. end
  166. if $ARGS[0] = 'centre':
  167. $loc = 'city_train'
  168. $loc_arg = 'inside'
  169. menu_off = 1
  170. *clr & cla
  171. minut += 5
  172. gs 'stat'
  173. '<center><img <<$set_imgh>> src="images/locations/shared/train/electri' + rand(1,5) + '.jpg"></center>'
  174. 'You pay for the ticket and board the next train going to the city center.'
  175. 'After 5 minutes, you see the office blocks and shops at the heart of the city. The train stops at its final destination, the busy station in the city center.'
  176. act 'Get off the train at this station':
  177. if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
  178. gt 'city_train', 'inside'
  179. end
  180. end
  181. if $ARGS[0] = 'communal':
  182. $loc = 'train'
  183. $loc_arg = 'communal'
  184. menu_off = 1
  185. minut += 10
  186. if rand(1, 100) < 20: gt 'train', 'events'
  187. gs 'stat'
  188. '<center><img <<$set_imgh>> src="images/locations/shared/train/oldplat.jpg" ></center>'
  189. 'After 10 minutes you arrive at an old railway platform near the communal village.'
  190. act 'Get off the train':
  191. if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
  192. gt 'train', 'communal'
  193. end
  194. end
  195. if $ARGS[0] = 'village':
  196. $loc = 'train'
  197. $loc_arg = 'village'
  198. menu_off = 1
  199. minut += 20
  200. if rand(1, 100) <= 10: gt 'train_incidental', 'events'
  201. if rand(1, 100) < 20: gt 'train', 'events'
  202. gs 'stat'
  203. '<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
  204. 'After 20 minutes, the train stops at the small station near the village of Gadukino.'
  205. act 'Get off the train':
  206. if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
  207. gt 'train', 'village'
  208. end
  209. end
  210. if $ARGS[0] = 'pavlovsk':
  211. $loc = 'pav_train_hall'
  212. $loc_arg = 'platform'
  213. menu_off = 1
  214. minut += 35
  215. if rand(1, 100) < 15: gt 'train', 'private'
  216. if rand(1, 100) < 30: gt 'train', 'Gopnik'
  217. if rand(1, 100) <= 10: gt 'train_incidental', 'events'
  218. if rand(1, 100) <= 20: gt 'train', 'events'
  219. gs 'stat'
  220. '<center><img <<$set_imgh>> src="images/locations/shared/train/pavplat.jpg" ></center>'
  221. 'After 35 minutes, you see the town of Pavlovsk approaching. Pavlovsk Castle is an impressive sight, even from a long distance. The train stops at its final destination, a platform in Pavlovsk station.'
  222. act 'Get off the train':
  223. if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
  224. gt 'pav_train_hall', 'platform'
  225. end
  226. end
  227. --- city_industrial_train ---------------------------------