1
0

zaprF.qsrc 3.1 KB

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