zaprF.qsrc 3.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127
  1. # zaprF
  2. if $ARGS[0] = 'start':
  3. $loc_arg = '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 'city_industrial'
  26. elseif cardrive = 21:
  27. minut += 5
  28. gt 'pav_commercial'
  29. elseif litltown = 0:
  30. minut += 5
  31. gt 'city_industrial'
  32. elseif litltown = 1:
  33. minut += 5
  34. gt 'pav_commercial'
  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:
  50. if cardrive = 6 or cardrive = 21: 'Your <a href="exec: gs ''carF'', ''start''"><<$car>></a> is parked here.'
  51. if kanistra < 5:
  52. act 'Buy a canister and fill it with 5 liters of gasoline for 150 <b>₽</b>':
  53. cla
  54. kanistra += 1
  55. money -= 150
  56. 'You buy a canister of gasoline. (It will automatically be put in the trunk of your car)'
  57. act 'Disengage from the pump':gt 'zaprF', 'start'
  58. end
  59. end
  60. if benz < 50 and (cardrive = 6 or cardrive = 21):
  61. zprbenz = 50 - benz
  62. if zprbenz * 30 <= money:
  63. act 'Fill the tank with petrol':
  64. cla
  65. *clr
  66. benz = 50
  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 fill the tank and pay <<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 your car.'
  77. end
  78. end
  79. end
  80. end
  81. if $ARGS[0] = 'toilet':
  82. CLOSE ALL
  83. gs 'themes', 'indoors'
  84. cla & *clr
  85. $loc_arg = 'toilet'
  86. $loc = 'zaprF'
  87. $location_type = 'bathroom'
  88. $locM = 'zaprF'
  89. $locM_arg = 'toilet'
  90. minut += 2
  91. $menu_loc = 'zaprF'
  92. $menu_arg = 'toilet'
  93. menu_off = 0
  94. gs 'stat'
  95. '<center><h4>Gas station toilet</h4></center>'
  96. '<center><img <<$set_imgh>> src="images/locations/shared/bathroom/toilet.jpg"></center>'
  97. 'You are in a dirty gas station toilet. At least it provides some privacy.'
  98. act 'Leave the restroom':gt 'zaprF', 'start'
  99. act 'Look in the mirror': gt 'mirror', 'start'
  100. if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'
  101. dynamic $tampon
  102. dynamic $quickwash
  103. dynamic $basin
  104. dynamic $publicpan
  105. gs 'din_van', 'pblc_pee'
  106. end
  107. --- zaprF ---------------------------------