pav_commercial.qsrc 9.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185
  1. # pav_commercial
  2. CLOSE ALL
  3. $loc_arg = ''
  4. $loc = 'pav_commercial'
  5. $region = 'pav'
  6. $location_type = 'public_outdoors'
  7. $menu_loc = 'pav_commercial'
  8. $menu_arg = ''
  9. menu_off = 0
  10. if sound = 0:
  11. if month >=11 and month <= 12 or month >=1 and month <=3:
  12. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/zima.mp3',30
  13. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  14. else
  15. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street_leto.mp3',30
  16. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  17. end
  18. end
  19. cla
  20. *clr
  21. litltown = 1
  22. alkoblock = 0
  23. boynumBlock = 0
  24. !call random events from [street_events], and display them before show location.
  25. if streetevent_hour + 2 < hour:gt'street_event','pav_commercial', 'main'
  26. '<center><h2>Pavlovsk</h2></center>'
  27. if month >= 11 or month <= 3:
  28. if daystage = 2 or daystage = 3:
  29. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodokw.jpg"></center>'
  30. else
  31. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavbuswn.jpg"></center>'
  32. end
  33. else
  34. if daystage = 2 or daystage = 3:
  35. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
  36. else
  37. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavbusn.jpg"></center>'
  38. end
  39. end
  40. *nl
  41. '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.'
  42. *nl
  43. 'While the commercial 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.'
  44. *nl
  45. 'A short distance away you can clearly see the golden domes of the <a href="exec:minut += 10 & gt ''pav_church'',''start''">Church of St. Nikolas</a>. It''s only a 10 minute walk to get there from here.'
  46. *nl
  47. '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 ''pav_park'', ''start''">public park</a>.'
  48. gs'street_event','pav_commercial', 'extras'
  49. if ((month = 9 and day > 16) or month >= 10) and (AlbinaQW['StarletsShutDown'] = 0 or AlbinaQW['Chernov'] = 0): '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?'
  50. if AlbinaQW['StarletsJoined'] > 0 and AlbinaQW['StarletsShutDown'] = 0 and npc_pregtalk['A23'] = 0 and AlbinaQW['Chernov'] = 0 and ((month = 11 and day > 18) or month = 12) and hour >= 14:gt 'albina_election_events', 'start'
  51. if mid($start_type,1,2) = 'sg' and hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and func('homes_properties', 'has_access', 'parents_home'):
  52. motherWorry = 1
  53. end
  54. if rand(1, 5) >= 4 and fame['pav_slut'] >= 100:
  55. if fame['pav_slut'] < 150:
  56. '<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.'
  57. elseif fame['pav_slut'] < 200:
  58. '<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.'
  59. else
  60. '<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.'
  61. end
  62. end
  63. gs 'stat'
  64. if car > 0 and cardrive = 24:
  65. cardrive = 24
  66. 'Your <a href="exec:gs ''carF'', ''start''"><<$car>></a> is parked in the street.'
  67. end
  68. if hour >= 8 and hour <= 20:
  69. $Pharmname = 'For easy access, there''s even a <a href="exec: minut += 1 & gt ''pav_pharmacy'', ''start''">pharmacy</a> attached to it.'
  70. else
  71. $Pharmname = 'For easy access, there''s even a pharmacy attached to it but it''s currently closed for the day.'
  72. end
  73. '<br>Centered along the main street is the <a href="exec:minut += 10 & gt ''pav_market''">Market square</a> with the <a href="exec:minut += 10 & gt ''pav_train_hall''">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.'
  74. if week < 6 and hour >= 9 and hour <= 18:
  75. $desc_txt4 = '<a href="exec:minut += 3 & gt ''post_office'', ''start''">post office</a>'
  76. elseif week = 6 and hour >= 10 and hour <= 18:
  77. $desc_txt4 = '<a href="exec:minut += 3 & gt ''post_office'', ''start''">post office</a>'
  78. else
  79. $desc_txt4 = '<a href="exec:msg ''The post office, which is closed right now, will reopen again at 9:00 and at 10:00 on Saturdays.''">post office</a>'
  80. end
  81. if (week < 6 and hour >= 9 and hour <= 16) or (week = 6 and hour >= 9 and hour <= 13):
  82. $desc_txt5 = '<a href="exec:gt ''bank'', ''start''">VTB Bank</a>'
  83. else
  84. $desc_txt5 = '<a href="exec:msg ''VTB Bank, which is closed right now. It will reopen again at 9:00''">VTB Bank</a>'
  85. end
  86. '<br>On the street across from the station is a small <a href="exec:minut += 1 & gt ''pav_clinic''">Avicenna clinic</a>. <<$Pharmname>> The building next door is shared by the local <<$desc_txt4>> and a <<$desc_txt5>>.'
  87. if hour >= 8 and hour <= 20:
  88. $desc_txt3 = '<a href="exec:minut += 2 & gt ''shop'', ''start''">Pyaterochka</a>, a popular discount supermarket chain'
  89. else
  90. $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'
  91. end
  92. '<br>Of course, right after you visit the bank, you can spend your money at <<$desc_txt3>>.'
  93. if hour >= 8 and hour <= 17:
  94. $desc_txt1 = '<a href="exec: minut += 3 & gt ''barbershop'', ''start''">A Cut Above</a>, the only barber shop in the area, <a href="exec: minut += 3 & gt ''shop_coco_carmen'', ''start''">Coco Carmen</a> the trendy clothes shop and <a href="exec: minut += 3 & gt ''shop_allure'', ''start''">Allure</a> the swimwear chain'
  95. else
  96. $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>, the only barber shop in the area, <a href="exec:msg ''Coco Carmen, which is closed right now. It will reopen again at 8:00''">Coco Carmen</a> the trendy clothes shop and <a href="exec:msg ''Allure, which is closed right now. It will reopen again at 8:00''">Allure</a> the swimwear chain'
  97. end
  98. '<br>The rest of the street is filled with smaller locally owned businesses, most notable being <<$desc_txt1>>.'
  99. if (week = 7 and hour >= 14 and hour <= 17) or (week = 6 and hour >= 12 and hour <= 17) and lari_gm ! daystart:
  100. if rand(0, 4) = 0: 'You see <a href="exec: gt ''gschool_socialchg1'',''lariska_gm_1''">Lariska</a> going inside Coco Carmen.'
  101. end
  102. if leonidSlave = 1:
  103. '<br>Near the town hall there is an old <a href="exec:minut += 15 & gt ''pav_commercial_offices''">office building</a>.'
  104. end
  105. if hour >= 7 and hour <= 18:
  106. $desc_txt2 = '<a href="exec:minut += 15 & gt ''etoexhib'', ''pos20''">vocational school</a>, where young adults can learn a trade.'
  107. else
  108. $desc_txt2 = '<a href="exec:msg ''vocational school, which is closed right now. It will reopen again at 7:00''">vocational school</a>.'
  109. end
  110. '<br>If you continue past the shops, you''ll eventually find a <<$desc_txt2>>'
  111. if workPTU > 2:act '<b>Go to the hostel</b>':gt 'etoexhib', 'pos40'
  112. if hypnoSchedule = 1:
  113. if therapist_weekly_block = 0 and week = 4 and therapistday ! daystart:
  114. if hour >= 18 and hour < 19:
  115. act '<b>Go see your therapist (1:00)</b>': minut += 5 & gt 'therapist'
  116. end
  117. end
  118. end
  119. act 'Walk to the Residential area (0:05)':minut += 5 & gt 'pav_residential'
  120. act 'Walk to the Industrial region (0:05)':minut += 5 & gt 'pav_industrial'
  121. act 'Walk to the Five Eight estate (0:05)':minut += 5 & gt 'pav_complex', 'start'
  122. act 'Walk to the Market (0:10)':minut += 10 & gt 'pav_market'
  123. act 'Walk to the park (0:05)':minut += 5 & gt 'pav_park', 'start'
  124. act 'Walk to the train station (0:10)':minut += 10 & gt 'pav_train_hall'
  125. act 'Walk to the highway (0:15)':minut += 15 & nroad = 20 & gt 'road'
  126. act 'Walk to Pushkin (0:25)':minut += 25 & gt 'pushkin'
  127. gs 'music_actions', 'music_icon'
  128. act 'Wait':gs 'obj_din', 'wait'
  129. !!if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  130. if npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week = 7:
  131. cla & *clr
  132. daybelisex = daystart
  133. minut += 1
  134. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  135. 'As you walk through Pavlovsk, Vadim Belys Mitsubishi Pajero stops near you.'
  136. act 'Go to the jeep': gt 'belgang', 'payday'
  137. 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:
  138. cla & *clr
  139. daybelisex = daystart
  140. minut += 1
  141. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  142. '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.'
  143. act 'Go to the jeep': gt 'belgang', 'workofdebt'
  144. end
  145. !-- Random prostitution solicitation check ------------------------
  146. gs 'prostitution_functions', 'check_solicitation_event'
  147. --- pav_commercial ---------------------------------