vokzalGin.qsrc 9.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320
  1. # vokzalGin
  2. if $ARGS[0] = '':
  3. $metka = ''
  4. $loc = 'vokzalGin'
  5. $location_type = 'public_indoors'
  6. CLOSE ALL
  7. if sound = 0:PLAY 'sound/vokzal2.mp3',30
  8. clr
  9. frost = 0
  10. poezddalsled = 0
  11. gs 'vokdin'
  12. gs 'stat'
  13. if night_mode = 1:
  14. fcolor = rgb(255, 255, 255)
  15. bcolor = rgb(0, 0, 0)
  16. lcolor = rgb(106, 90, 205)
  17. else
  18. fcolor = rgb(0, 0, 0)
  19. bcolor = rgb(255, 255, 255)
  20. lcolor = rgb(106, 90, 205)
  21. end
  22. '<center><h4>Pavlovsk train station interior</h4></center>'
  23. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzal.jpg"></center>'
  24. 'The center of the station building is a large waiting room, where passengers can wait until their train arrives. Opposite to that you can find the <a href="exec:dynamic $din_vokzalg_kabinet">station manager''s office</a>, and the <a href="exec:minut += 1 & gt ''vokmantoiev'', ''start''">toilets</a> on the other end of the building.'
  25. 'The long-distance trains are at the station platforms between 11:00-11:30 and 18:00-18:30.'
  26. *nl
  27. if katalkinSexOnce = 1:'There is a small <a href="exec:minut += 5 & gt ''katalkin''">police station</a> inside the station building.'
  28. *nl
  29. if StoryLine = 1 and SchoolAtestat = 0:
  30. if (sunWeather = 0 or temper <= 0) and hour >= 18 and hour < 20 and week < 6:
  31. 'You see your classmates <a href="exec:minut += 3 & gt ''gopskver''">Vitek, Dan and Vasily</a> hanging around here.'
  32. end
  33. end
  34. if podbros = 0:
  35. podrand = rand(0, 1)
  36. if money >= 1000 and hour >= 8 and hour <= 20 and podrand = 0:'As you walk through the station building, you notice a man''s thick <a href="exec:dynamic $din_vokzalg_podbros">wallet</a> dropping from his pocket, not far away from you.'
  37. *nl
  38. end
  39. act 'Leave the station building':minut += 3 & gt 'vokzalG'
  40. if Trainpass_day > daystart:
  41. 'You have <<Trainpass_day - daystart>> days left on your train pass.'
  42. act 'Go to the platforms': gt 'vokzalperG', 'start'
  43. else
  44. act 'Go to the ticket office': gt 'vokzalGin', 'ticket'
  45. end
  46. if vokzalVork >= 1:
  47. if cleZalDay ! daystart or cleMTDay ! daystart or cleWTDay ! daystart:
  48. act 'Work': gt 'vokzalGin', 'work'
  49. elseif cleZarplatDay ! daystart:
  50. act 'Collect your salary':
  51. *clr & cla
  52. '<center><h4>Pavlovsk train station interior</h4></center>'
  53. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzal.jpg"></center>'
  54. cleZarplatDay = daystart
  55. vokzalVork += 1
  56. money += 130
  57. minut += 3
  58. gs 'stat'
  59. 'When you are done cleaning all the places you were told to clean, you go to the cashier and collect your well-earned salary.'
  60. act 'Continue':minut += 1 & gt 'vokzalGin'
  61. end
  62. end
  63. end
  64. *nl
  65. if hour = 11 and minut = 0:
  66. poezddalsled = 1
  67. 'The 11:30 long-distance train is currently approaching the platform.'
  68. elseif hour = 11 and minut > 0 and minut < 30:
  69. poezddalsled = 1
  70. 'The 11:30 long-distance train is currently waiting at the platform.'
  71. elseif hour = 11 and minut = 30:
  72. poezddalsled = 1
  73. 'The 11:30 long-distance train is currently leaving the station.'
  74. elseif hour = 18 and minut = 0:
  75. poezddalsled = 1
  76. 'The 18:30 long-distance train is currently approaching the platform.'
  77. elseif hour = 18 and minut > 0 and minut < 30:
  78. poezddalsled = 1
  79. 'The 18:30 long-distance train is currently waiting at the platform.'
  80. elseif hour = 18 and minut = 30:
  81. poezddalsled = 1
  82. 'The 18:30 long-distance train is currently leaving the station.'
  83. end
  84. if poezddalsled = 1:
  85. 'The platform is bustling with passengers that are entering or leaving the currently waiting train, carrying their heavy bags with them. Several police officers are patrolling the platforms while the train is here, keeping an eye out for any unruly activities.'
  86. if tovarL > 0:
  87. act 'Sell your goods to passengers':gt 'vokzaltorg'
  88. end
  89. end
  90. act 'Wait':
  91. cla
  92. waiting = input ("How long would you like to wait? (Not more than 120 minutes)")
  93. if waiting <= 0 or waiting > 120:
  94. minut += 15
  95. elseif waiting > 0 and waiting <= 120:
  96. minut += waiting
  97. end
  98. act 'Take a look at the clock':gt 'vokzalGin'
  99. end
  100. end
  101. if $ARGS[0] = 'work':
  102. *clr & cla
  103. '<center><h4>Pavlovsk train station interior</h4></center>'
  104. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/trainstation/vokzal.jpg"></center>'
  105. if cleZalDay ! daystart:
  106. act 'Mop the waiting room floor (1:00)':
  107. cls
  108. cleZalDay = daystart
  109. gs 'exercise', 'tier1', 60, 'stren_exp', 'vital_exp'
  110. pcs_mood -= 6
  111. gs 'stat'
  112. '<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
  113. 'You take some cleaning supplies from the maintenance closet, pour some water and soap into a bucket and wash the floor in the waiting room.'
  114. act 'Continue':minut += 1 & gt 'vokzalGin', 'work'
  115. end
  116. end
  117. if cleMTDay ! daystart:
  118. act 'Clean the men''s restroom (0:30)':
  119. cls
  120. cleMTDay = daystart
  121. gs 'exercise', 'tier1', 30, 'stren_exp', 'vital_exp'
  122. pcs_mood -= 6
  123. gs 'stat'
  124. '<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
  125. 'You take some cleaning supplies from the maintenance closet, pour some water and soap into a bucket and go to the men''s room.'
  126. gs 'vokmantoiev', 'toilet_event'
  127. !!'You began to wash the floor in the men''s room, and then began to scrub toilets.'
  128. act 'Leave restroom':minut += 1 & gt 'vokzalGin', 'work'
  129. end
  130. end
  131. if cleWTDay ! daystart:
  132. act 'Clean the women''s restroom (0:30)':
  133. cls
  134. cleWTDay = daystart
  135. gs 'exercise', 'tier1', 30, 'stren_exp', 'vital_exp'
  136. pcs_mood -= 6
  137. gs 'stat'
  138. '<center><img <<$set_imgh>> src="images/locations/city/residential/office/clener1.jpg"></center>'
  139. 'You take some cleaning supplies from the maintenance closet, pour some water and soap into a bucket and scrub the toilets in the ladies'' room before mopping the floor.'
  140. gs 'vokdinvera'
  141. act 'Leave restroom':minut += 1 & gt 'vokzalGin', 'work'
  142. end
  143. end
  144. act 'Return': gt 'vokzalGin'
  145. end
  146. if $ARGS[0] = 'ticket':
  147. cls
  148. gs 'stat'
  149. '<center><h4>Ticket office</h4></center>'
  150. '<center><img <<$set_imgh>> src="images/locations/shared/train/kassa.jpg"></center>'
  151. if money >= 50:
  152. act 'Buy a ticket':
  153. cla
  154. gs 'vokzalGin', 'buy_ticket'
  155. end
  156. end
  157. if money >= 1500 and Trainpass_day <= daystart:
  158. act 'Buy a weekly pass (7 days - 1500 <b>₽</b>) ':
  159. cla
  160. money -= 1500
  161. Trainpass_day = daystart + 7
  162. act 'Return': gt 'vokzalGin'
  163. end
  164. end
  165. if money >= 5500 and Trainpass_day <= daystart:
  166. act 'Buy a monthly pass (30day - 5500 <b>₽</b>)':
  167. cla
  168. money -= 5500
  169. Trainpass_day = daystart + 30
  170. act 'Return': gt 'vokzalGin'
  171. end
  172. end
  173. act 'Leave the ticket office':minut += 1 & gt 'vokzalGin'
  174. end
  175. if $ARGS[0] = 'buy_ticket':
  176. if money >= 50:
  177. act 'Buy a ticket to the old town (50 <b>₽</b>)':
  178. money -= 50
  179. gt 'vokzalGin', 'oldtown'
  180. end
  181. end
  182. if money >= 75:
  183. act 'Buy a ticket to the village of Gadyukino (75 <b>₽</b>)':
  184. money -= 75
  185. gt 'vokzalGin', 'village'
  186. end
  187. end
  188. if money >= 100:
  189. act 'Buy a ticket to the the communal village (100 <b>₽</b>)':
  190. money -= 100
  191. gt 'vokzalGin', 'communal'
  192. end
  193. end
  194. if money >= 125:
  195. act 'Buy a ticket to city industrial area (125 <b>₽</b>)':
  196. money -= 125
  197. gt 'vokzalGin', 'ind'
  198. end
  199. end
  200. if money >= 150:
  201. act 'Buy a ticket to city center (150 <b>₽</b>)':
  202. money -= 150
  203. gt 'vokzalGin', 'centre'
  204. end
  205. end
  206. act 'Leave the ticket office':minut += 1 & gt 'vokzalGin'
  207. end
  208. if $ARGS[0] = 'oldtown':
  209. $loc = 'train'
  210. $metka = 'oldtown'
  211. minut += 5
  212. if rand(1, 100) < 20: gt 'train', 'events'
  213. gs 'stat'
  214. '<center><img <<$set_imgh>> src="images/locations/shared/train/pushplat.jpg" ></center>'
  215. 'After 5 minutes, the train stops at old platform by the old town of Pushkin. Famous for its extensive park and old historic buildings, the locals are known to be eccentric but that adds to the charm.'
  216. act 'Get off the train':
  217. if rand(1, 100) <= 5: gt 'train_incidental', 'end'
  218. gt 'train', 'oldtown'
  219. end
  220. end
  221. if $ARGS[0] = 'village':
  222. $loc = 'train'
  223. $metka = 'village'
  224. minut += 15
  225. if rand(1, 100) <= 10: gt 'train_incidental', 'events'
  226. if rand(1, 100) < 20: gt 'train', 'events'
  227. gs 'stat'
  228. '<center><img <<$set_imgh>> src="images/locations/shared/train/gadplat.jpg" ></center>'
  229. 'After 15 minutes, the train stops at the small station near the village of Gadyukino.'
  230. act 'Get off the train':
  231. if rand(1, 100) <= 5: gt 'train_incidental', 'end'
  232. gt 'train', 'village'
  233. end
  234. end
  235. if $ARGS[0] = 'communal':
  236. $loc = 'train'
  237. $metka = 'communal'
  238. minut += 25
  239. if rand(1, 100) <= 10: gt 'train_incidental', 'events'
  240. if rand(1, 100) <= 20: gt 'train', 'events'
  241. gs 'stat'
  242. '<center><img <<$set_imgh>> src="images/locations/shared/train/oldplat.jpg" ></center>'
  243. 'After 20 minutes you arrive at an old railway platform near the communal village.'
  244. act 'Get off the train':
  245. if rand(1, 100) <= 5: gt 'train_incidental', 'end'
  246. gt 'train', 'communal'
  247. end
  248. end
  249. if $ARGS[0] = 'ind':
  250. $loc = 'vokzalholle'
  251. $metka = ''
  252. minut += 35
  253. if rand(1, 100) < 15: gt 'train', 'private'
  254. if rand(1, 100) < 30: gt 'train', 'Gopnik'
  255. if rand(1, 100) <= 10: gt 'train_incidental', 'events'
  256. if rand(1, 100) <= 20: gt 'train', 'events'
  257. gs 'stat'
  258. '<center><img <<$set_imgh>> src="images/locations/shared/train/indusplat.jpg" ></center>'
  259. 'After 35 minutes, the train stops at the St. Petersburg city industrial area station.'
  260. act 'Get off the train':
  261. if rand(1, 100) <= 5: gt 'train_incidental', 'end'
  262. gt 'vokzalholle'
  263. end
  264. end
  265. if $ARGS[0] = 'centre':
  266. $loc = 'cityTrain'
  267. $metka = 'inside'
  268. minut += 40
  269. if rand(1, 100) < 15: gt 'train', 'private'
  270. if rand(1, 100) < 30: gt 'train', 'Gopnik'
  271. if rand(1, 100) <= 10: gt 'train_incidental', 'events'
  272. if rand(1, 100) <= 20: gt 'train', 'events'
  273. gs 'stat'
  274. '<center><img <<$set_imgh>> src="images/locations/shared/train/cityplat.jpg" ></center>'
  275. 'After 40 minutes, the train stops at the St. Petersburg city center station. The large office blocks and shopping centers fill your view.'
  276. act 'Get off the train':
  277. if rand(1, 100) <= 5: gt 'train_incidental', 'end'
  278. gt 'cityTrain', 'inside'
  279. end
  280. end
  281. --- vokzalGin ---------------------------------