zaprF.qsrc 3.2 KB

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