1
0

city_train.qsrc 3.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596
  1. # city_train
  2. if $ARGS[0] = 'start':
  3. $loc_arg = 'start'
  4. $loc = 'city_train'
  5. $location_type = 'public_outdoors'
  6. $menu_loc = 'city_train'
  7. $menu_arg = 'start'
  8. menu_off = 0
  9. *clr & cla
  10. gs'stat'
  11. '<center><B>City center railway station</B></center>'
  12. '<center><img <<$set_imgh>> src="images/locations/city/shared/trainstation/central_station_inside.jpg"></center>'
  13. 'The grand old station in the city center is an impressive building. It is busy and has a number of shops and bars as well as all the platforms and trains. '
  14. *nl
  15. if car > 0 and cardrive = 2:
  16. 'In the parking lot is <a href="exec:GS ''carF'',''start''">your <<$car>></a>.'
  17. end
  18. act 'Walk to the city center (0:05)':minut += 5 & gt 'city_center'
  19. if transportVars['trainpass_day'] > daystart:
  20. func('transport_functions', 'display_trainpass_time')
  21. act 'Go to the platforms': gt 'city_train', 'platform'
  22. else
  23. act 'Go to the ticket office': gt 'city_train', 'tickets'
  24. end
  25. end
  26. if $ARGS[0] = 'tickets':
  27. $menu_loc = 'city_train'
  28. $menu_arg = 'tickets'
  29. menu_off = 0
  30. *clr & cla
  31. gs 'stat'
  32. '<center><h4>Ticket office</h4></center>'
  33. '<center><img <<$set_imgh>> src="images/locations/shared/train/kassa.jpg" ></center>'
  34. *nl
  35. gs 'transport_functions', 'set_train_wait_time', 'center'
  36. 'The next train in the direction of Pavlovsk ' + iif(temp_transportVars['train_wait_pavlovsk'] = 0, 'is leaving now!', 'leaves in <<temp_transportVars[''train_wait_pavlovsk'']>> minutes.')
  37. act 'Leave the ticket office': minut += 1 & gt 'city_train', 'start'
  38. act 'Look at the train schedule':
  39. *clr & cla
  40. gs 'transport_functions', 'display_train_schedule'
  41. act 'Stop looking at the schedule': gt 'city_train', 'tickets'
  42. end
  43. act 'Buy a ticket':
  44. cla
  45. gs 'city_train', 'buy_ticket'
  46. end
  47. gs 'transport_functions', 'buy_train_pass'
  48. end
  49. if $ARGS[0] = 'buy_ticket':
  50. $menu_loc = 'city_train'
  51. $menu_arg = 'buy_ticket'
  52. menu_off = 0
  53. act 'Leave the ticket office': minut += 1 & gt 'city_train', 'start'
  54. gs 'transport_functions', 'buy_train_ticket', 'center'
  55. end
  56. if $ARGS[0] = 'platform':
  57. $location_type = 'public_outdoors'
  58. $menu_loc = 'city_train'
  59. $menu_arg = 'platform'
  60. menu_off = 0
  61. gs 'stat'
  62. '<center><img <<$set_imgh>> src="images/locations/shared/train/indusplat.jpg" ></center>'
  63. '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 shopping bags. It feels like it is always busy here, no matter at what time of the day it is.'
  64. *nl
  65. gs 'transport_functions', 'set_train_wait_time', 'center'
  66. 'The next train in the direction of Pavlovsk ' + iif(temp_transportVars['train_wait_pavlovsk'] = 0, 'is leaving now!', 'leaves in <<temp_transportVars[''train_wait_pavlovsk'']>> minutes.')
  67. act 'Return to the station hall': gt 'city_train', 'start'
  68. act 'Look at the train schedule':
  69. *clr & cla
  70. gs 'transport_functions', 'display_train_schedule'
  71. act 'Stop looking at the schedule': gt 'city_train', 'platform'
  72. end
  73. act 'Take a train to the city industrial area (<<func(''transport_functions'', ''display_train_timecost'', ''center'', ''ind'')>>)': gt 'train', 'center_ind'
  74. act 'Take a train to the old platform by the communal village (<<func(''transport_functions'', ''display_train_timecost'', ''center'', ''communal'')>>)': gt 'train', 'center_communal'
  75. act 'Take a train to the village of Gadukino (<<func(''transport_functions'', ''display_train_timecost'', ''center'', ''gadukino'')>>)': gt 'train', 'center_gadukino'
  76. act 'Take a train to Pavlovsk (<<func(''transport_functions'', ''display_train_timecost'', ''center'', ''pavlovsk'')>>)': gt 'train', 'center_pavlovsk'
  77. end
  78. killvar 'temp_transportVars'
  79. --- city_train ---------------------------------