2
0

pav_commercial.qsrc 10.0 KB

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