vokzalholle 2.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108
  1. # vokzalholle
  2. if $ARGS[0] = '':
  3. $metka = $ARGS[0]
  4. $loc = $CURLOC
  5. $location_type = 'public_indoors'
  6. CLOSE ALL
  7. if sound = 0:PLAY 'sound/vokzal.mp3',30
  8. cls
  9. gs'stat'
  10. '<center><img src="images/locations/shared/train/vokzalholle.jpg" ></center>'
  11. 'Go to the <a href="exec:GT ''vokzalper''">platforms</a>'
  12. act 'Leave the station building':gt 'vokzal' & minut+=5
  13. act 'Got to the ticket office': gt 'vokzalholle', 'ticket'
  14. act 'Go to the restrooms':gt 'vokzaltoilet' & minut+=5
  15. end
  16. if $ARGS[0] = 'ticket':
  17. cls
  18. !! This is a lie, but a useful one don''t change the $loc and $metka
  19. $loc = 'vokzalholle'
  20. $metka = 'cottages'
  21. gs 'stat'
  22. '<center><h4>Ticket office</h4></center>'
  23. '<center><img src="images/locations/shared/train/kassa.jpg"></center>'
  24. if money >= 50:
  25. act 'Buy a ticket to the city center (50 <b>₽</b>)':
  26. $loc = 'cityTrain'
  27. $metka = 'inside'
  28. cls
  29. money -= 50
  30. minut += 5
  31. gs 'stat'
  32. '<center><img src="images/locations/shared/train/electri.jpg"></center>'
  33. 'You pay for the ticket and board the next train going to the city center.'
  34. '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.'
  35. act 'Get off the train at this station':
  36. if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
  37. gt 'cityTrain', 'inside'
  38. end
  39. end
  40. end
  41. if money >= 50:
  42. act 'Buy a ticket to the old platform by the communal cottages (50 <b>₽</b>)':
  43. train_event = 0
  44. money -= 100
  45. train_dir = 2
  46. train_dest = 3
  47. gt 'vokzalholle', 'cottages'
  48. end
  49. end
  50. if money >= 75:
  51. act 'Buy a ticket to the village of Gadyukino (75 <b>₽</b>)':
  52. train_event = 0
  53. money -= 75
  54. train_dir = 2
  55. train_dest = 4
  56. gt 'vokzalholle', 'cottages'
  57. end
  58. end
  59. if money >= 100:
  60. act 'Buy a ticket to the old town (100 <b>₽</b>)':
  61. train_event = 0
  62. money -= 100
  63. train_dir = 2
  64. train_dest = 5
  65. gt 'vokzalholle', 'cottages'
  66. end
  67. end
  68. if money >= 125:
  69. act 'Buy a ticket to Pavlovsk (125 <b>₽</b>)':
  70. train_event = 0
  71. money -= 125
  72. train_dir = 2
  73. train_dest = 6
  74. if rand(1, 100) < 15: gt 'train', 'private'
  75. gt 'vokzalholle', 'cottages'
  76. end
  77. end
  78. end
  79. if $ARGS[0] = 'cottages':
  80. cls
  81. minut += 10
  82. gs'stat'
  83. '<center><img src="images/locations/shared/train/electri.jpg" ></center>'
  84. 'After 10 minutes the train stops at a small station. It''s abandoned, and there is not much activity outside.'
  85. act 'Get off the train at this station':
  86. $loc = 'train'
  87. $metka = 'old_platform'
  88. if train_event = 0 and rand(1, 100) <= 5: gt 'train_incidental', 'end'
  89. gt 'train', 'old_platform'
  90. end
  91. if train_dest > 3:
  92. act 'Continue your journey':
  93. gt 'train', 'communalS'
  94. end
  95. end
  96. end
  97. --- vokzalholle ---------------------------------