1
0

zaprF.qsrc 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128
  1. # zaprF
  2. if $ARGS[0] = 'start':
  3. $metka = 'start'
  4. $loc = 'zaprF'
  5. $menu_loc = 'zaprF'
  6. $menu_arg = 'start'
  7. menu_off = 0
  8. $location_type = 'public_outdoors'
  9. cla & *clr
  10. gs 'stat'
  11. '<center><b>Gas Station</b></center>'
  12. if hour < 8 or hour > 21:
  13. '<center><img <<$set_imgh>> src="images/locations/shared/gas/gazprom_night.jpg"></center>'
  14. else
  15. '<center><img <<$set_imgh>> src="images/locations/shared/gas/gazprom_day.jpg"></center>'
  16. end
  17. 'The local gas station, the cheap pumps are limited in functionality and will always fill the tank up completely.'
  18. *nl
  19. 'When the weather is nice sometimes girls will offer a car washing service for some tips, there''s no structure to it so you could always try it.'
  20. 'The petrol price is 30 <b>₽</b> per liter.'
  21. *nl
  22. if temper < 10:
  23. 'It''s too cold outside to wash cars. You''re more likely to get ill than make money. Maybe try again when the weather is warmer?'
  24. elseif sunWeather = 0:
  25. 'You can''t wash cars if it''s raining outside! Maybe try again on a sunny day?'
  26. elseif hour < 8:
  27. 'It''s too early to wash cars.'
  28. elseif hour >= 21:
  29. 'It''s too late to wash cars.'
  30. else
  31. act 'Wash car windows (1:00)':gt 'zaprFWash', 'start'
  32. end
  33. act 'Go to the toilet':gt 'zaprF', 'toilet'
  34. if car > 0:
  35. if cardrive = 6 or cardrive = 21:'Your <a href="exec:GS ''carF'', ''start''"><<$car>></a> is parked here.'
  36. end
  37. zprbenz = 40 - benz
  38. if benz < 40 and car > 0 and cardrive = 6 or benz < 40 and car > 0 and cardrive = 21:
  39. zprbenz = 40 - benz
  40. if zprbenz * 30 <= money:
  41. act 'Fill the tank with petrol':
  42. cla
  43. *clr
  44. benz = 40
  45. zprpay = zprbenz * 30
  46. money -= zprpay
  47. ! WD: Uninitialised ~ 'pol'
  48. ! if pol > 0:'<center><img <<$set_imgh>> src="images/locations/shared/gas/zapr1.jpg"></center>'
  49. '<center><img <<$set_imgh>> src="images/locations/shared/gas/zapr1.jpg"></center>'
  50. 'You filled the tank and paid <<zprpay>> <b>₽</b>.'
  51. act 'Disengage from the pump':gt 'zaprF', 'start'
  52. end
  53. else
  54. 'You do not have enough money to refuel.'
  55. end
  56. end
  57. if car > 0:
  58. act 'Buy a canister able to contain up to 5 liters of gasoline for 150 <b>₽</b>':
  59. cla
  60. kanistra += 1
  61. money -= 150
  62. 'You bought a canister of gasoline. (It was automatically put in the trunk)'
  63. act 'Disengage from the pump':gt 'zaprF', 'start'
  64. end
  65. end
  66. act 'Leave':
  67. if cardrive = 6:
  68. minut += 5
  69. gt 'nord'
  70. elseif cardrive = 21:
  71. minut += 5
  72. gt 'pavCommercial'
  73. elseif litltown = 0:
  74. minut += 5
  75. gt 'nord'
  76. elseif litltown = 1:
  77. minut += 5
  78. gt 'pavCommercial'
  79. end
  80. end
  81. end
  82. if $ARGS[0] = 'toilet':
  83. CLOSE ALL
  84. gs 'themes', 'indoors'
  85. cla & *clr
  86. $metka = 'toilet'
  87. $loc = 'zaprF'
  88. $location_type = 'bathroom'
  89. $locM = 'zaprF'
  90. $metkaM = 'toilet'
  91. minut += 2
  92. $menu_loc = 'zaprF'
  93. $menu_arg = 'toilet'
  94. menu_off = 0
  95. gs 'stat'
  96. '<center><h4>Gas station toilet</h4></center>'
  97. '<center><img <<$set_imgh>> src="images/locations/shared/bathroom/toilet.jpg"></center>'
  98. 'You are in a dirty gas station toilet. At least it provides some privacy.'
  99. act 'Leave the restroom':gt 'zaprF', 'start'
  100. act 'Look in the mirror': gt 'mirror', 'start'
  101. if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
  102. dynamic $tampon
  103. dynamic $quickwash
  104. dynamic $basin
  105. dynamic $removepan
  106. end
  107. --- zaprF ---------------------------------