pavCommercial.qsrc 8.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175
  1. # pavCommercial
  2. CLOSE ALL
  3. $metka = ''
  4. $loc = 'pavCommercial'
  5. $location_type = 'public_outdoors'
  6. $metkaStreet = ''
  7. $locStreet = 'pavCommercial'
  8. $menu_loc = 'pavCommercial'
  9. $menu_arg = ''
  10. menu_off = 0
  11. if sound = 0:
  12. if month >=11 and month <= 12 or month >=1 and month <=3:
  13. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/zima.mp3',30
  14. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  15. else
  16. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street_leto.mp3',30
  17. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  18. end
  19. end
  20. cla
  21. *clr
  22. litltown = 1
  23. alkoblock = 0
  24. boynumBlock = 0
  25. !!sets the return location for bank and post office
  26. bankloc = 0
  27. !call random events from [street_events], and display them before show location.
  28. if streetevent_hour + 2 < hour:gt'street_event','pavCommercial', 'main'
  29. '<center><h2>Pavlovsk</h2></center>'
  30. if month >= 11 or month <= 3:
  31. if hour >= 8 and hour <= 21:
  32. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodokw.jpg"></center>'
  33. else
  34. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavbuswn.jpg"></center>'
  35. end
  36. else
  37. if hour >= 8 and hour <= 21:
  38. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
  39. else
  40. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavbusn.jpg"></center>'
  41. end
  42. end
  43. *nl
  44. 'Pavlovsk can be split into four regions, the commercial hub here, the residential suburbs, the industrial region and the Five Eight estate of Soviet era apartment blocks.'
  45. *nl
  46. 'While the commerical hub of Pavlovsk is better maintained and a bit cleaner looking than other areas, it is still very much rural like the rest of the town, and even from here, you can still easily access the old <a href="exec:view''images/locations/pavlovsk/palace/pav_palace.jpg''">Imperial Palace</a> built by Catherine the Great, and the remodeled <a href="exec:view''images/locations/pavlovsk/fortress/bip_hotel.png''">Bip fortress</a> which now operates as a luxury hotel and restaurant.'
  47. *nl
  48. 'A short distance away you can clearly see the golden domes of the <a href="exec:minut += 10 & gt ''ParChurch'',''start''">Church of St Nikolas</a>. It''s only a 10 minute walk to get there from here.'
  49. *nl
  50. 'The nearby residential area is next to the lake and the town surrounds the old palace grounds which are now a large <a href="exec:minut += 5 & gt ''gskver'', ''start''">public park</a>.'
  51. gs'street_event','pavCommercial', 'extras'
  52. if AlbFather >= 1:
  53. if AlbFaterBlackTime = 0:AlbFaterBlackTime = totminut + 2880
  54. 'You can see election posters on the walls all over town. They say: "Vote for Boris Barlovsky!" Wait a minute... isn''t that Albina''s father?'
  55. end
  56. if AlbFaterBlackTime > 0 and AlbFaterBlackTime <= totminut and hour >= 14 and AlbFather = 1:gt 'AlbFatherQW'
  57. if hour >= 14 and hour <= 22 and AlbFather = 2 and AlbZaDay + 30 < daystart and year > 2015:
  58. gt 'AlbStarsEnd'
  59. end
  60. if StoryLine > 0 and hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1:
  61. motherWorry = 1
  62. end
  63. if rand(1, 5) >= 4 and pav_slut >= 50:
  64. if pav_slut < 75:
  65. '<br>You catch people staring at you intently, as if they''re supposed to know who you are but can''t quite remember why. You sincerely hope they don''t realize your promiscuous adventures are the reason why. The occasional person chuckling and pointing at you crushes those hopes, and you quickly keep walking before they get a chance to say anything.'
  66. elseif pav_slut < 100:
  67. '<br>People look at you with lewd grins on their faces, some of them even making vulgar gestures. Looks like they know what you''ve been up to.'
  68. else
  69. '<br>Everywhere you go, people recognize you as a whore. Some even come over and slap you on the ass, claiming they know you like it when they do, or claiming they want to sample your goods. An elderly woman sitting on a bench calls out to you, loudly calling you a slut and a whore. You hide your face and run away as fast as you can, before she can draw too much attention to you.'
  70. end
  71. end
  72. gs 'stat'
  73. if car > 0 and cardrive = 24:
  74. cardrive = 24
  75. 'Your <a href="exec:gs ''carF'', ''start''"><<$car>></a> is parked in the street.'
  76. end
  77. if hour >= 8 and hour <= 20:
  78. $Pharmname = 'For easy access, there''s even a <a href="exec: minut += 5 & gt ''gaptek'', ''start''">pharmacy</a> attached to it.'
  79. else
  80. $Pharmname = 'For easy access, there''s even a pharmacy attached to it but it''s currently closed for the day.'
  81. end
  82. '<br>Centered along the main street is the <a href="exec:minut += 15 & gt ''pavtrain''">train station</a> that is always open and running. For those with a car, the end of the street leads to a <a href="exec:minut += 5 & gt ''zaprF'', ''start''">gas station</a> which is usually the last stop people make before heading out onto the nearby highway.'
  83. if week < 6 and hour >= 9 and hour <= 18:
  84. $desc_txt4 = '<a href="exec:minut += 3 & gt ''postoffice'', ''start''">post office</a>'
  85. elseif week = 6 and hour >= 10 and hour <= 18:
  86. $desc_txt4 = '<a href="exec:minut += 3 & gt ''postoffice'', ''start''">post office</a>'
  87. else
  88. $desc_txt4 = '<a href="exec:msg ''post office, which is closed right now. It will reopen again at 9:00 and at 10:00 on saturdays.''">post office</a>'
  89. end
  90. if (week < 6 and hour >= 9 and hour <= 16) or (week = 6 and hour >= 9 and hour <= 13):
  91. $desc_txt5 = '<a href="exec:gt ''bank'', ''start''">VTB Bank</a>'
  92. else
  93. $desc_txt5 = '<a href="exec:msg ''VTB Bank, which is closed right now. It will reopen again at 9:00''">VTB Bank</a>'
  94. end
  95. '<br>On the street across from the station is a small <a href="exec:minut += 5 & gt ''gpoli''">Avicenna clinic</a>. <<$Pharmname>> The building next door is shared by the local <<$desc_txt4>> and a <<$desc_txt5>>.'
  96. if hour >= 8 and hour <= 20:
  97. $desc_txt3 = '<a href="exec:minut += 2 & gt ''shop'', ''start''">Pyaterochka</a>, a popular discount supermarket chain'
  98. else
  99. $desc_txt3 = '<a href="exec:msg ''Pyaterochka, which is closed right now. It will reopen again at 8:00''">Pyaterochka</a>, a popular discount supermarket chain'
  100. end
  101. '<br>Of course, right after you visit the bank, you can spend your money at <<$desc_txt3>>.'
  102. if hour >= 8 and hour <= 17:
  103. $desc_txt1 = '<a href="exec: minut += 3 & gt ''barbershop'', ''start''">A Cut Above</a>, the only barber shop in the area'
  104. else
  105. $desc_txt1 = '<a href="exec:msg ''A Cut Above, which is closed right now. It will reopen again at 8:00''">A Cut Above</a>'
  106. end
  107. '<br>The rest of the street is filled with smaller locally owned businesses, most notable being <<$desc_txt1>>.'
  108. if leonidSlave = 1:
  109. '<br>Near the town hall there is an old <a href="exec:minut += 15 & gt ''pavCommercialOffices''">office building</a>.'
  110. end
  111. if hour >= 7 and hour <= 18:
  112. $desc_txt2 = 'a <a href="exec:minut += 15 & gt ''etoexhib'', ''pos20''">vocational school</a>, where young adults can learn a trade.'
  113. else
  114. $desc_txt2 = '<a href="exec:msg ''vocational school, which is closed right now. It will reopen again at 7:00''">vocational school</a>.'
  115. end
  116. '<br>If you continue past the shops, you''ll eventually find a <<$desc_txt2>>.'
  117. if workPTU > 2:act '<b>Go to the hostel</b>':gt 'etoexhib', 'pos40'
  118. act 'Walk to the residential area':minut += 5 & gt 'pavResidential'
  119. act 'Walk to the Industrial region':minut += 5 & gt 'pavIndustrial'
  120. act 'Walk to the Five Eight estate':minut += 2 & gt 'pavcomplex', 'start'
  121. act 'Walk to the train station':minut += 15 & gt 'pavtrain'
  122. act 'Walk to the city highway':minut += 15 & nroad = 20 & gt 'road'
  123. act 'Wait':gs 'obj_din', 'wait'
  124. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  125. if npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week = 7:
  126. cla & *clr
  127. daybelisex = daystart
  128. minut += 5
  129. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  130. 'As you walk through Pavlovsk, Vadim Belys Mitsubishi Pajero stops near you.'
  131. act 'Go to the jeep': return_residential = 0 & gt 'belgang', 'payday'
  132. elseif npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week ! 7 and belgangPayWeek >= 300 and belgangProstitute = 1 and rand (0,2) = 0:
  133. cla & *clr
  134. daybelisex = daystart
  135. minut += 5
  136. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  137. 'You see the by now familiar old Mitsubishi Pajero driving through the streets with Vadim Bely and his gang. Your heart skips a beat as you notice one of them pointing at you, and soon they pull over.'
  138. act 'Go to the jeep': return_residential = 0 & gt 'belgang', 'workofdebt'
  139. end
  140. --- pavCommercial ---------------------------------