1
0

pavCommercial.qsrc 7.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163
  1. # pavCommercial
  2. !{Change log
  3. 25 March 2016
  4. Fixed diplaced period after church link
  5. Fixed visting links to look the same
  6. Added start of Andrei kidnapping
  7. }
  8. $location_type = 'public_outdoors'
  9. $metka = ''
  10. $loc = 'pavCommercial'
  11. $metkaStreet = ''
  12. $locStreet = 'pavCommercial'
  13. CLOSE ALL
  14. if sound = 0:
  15. if month >=11 and month <= 12 or month >=1 and month <=3:
  16. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/zima.mp3',30
  17. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  18. else
  19. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street_leto.mp3',30
  20. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  21. end
  22. end
  23. cla
  24. *clr
  25. litltown = 1
  26. alkoblock = 0
  27. boynumBlock = 0
  28. !!sets the return location for bank and post office
  29. bankloc = 0
  30. !call random events from [street_events], and display them before show location.
  31. if streetevent_hour + 2 < hour:gt'street_event','pavCommercial', 'main'
  32. '<center><h2>Pavlovsk</h2></center>'
  33. if Enable_towntable = 1 : $_str = '<center><table><tr><td>' else $_str = ''
  34. if month >= 11 or month <= 3:
  35. if hour >= 8 and hour <= 21:
  36. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodokw.jpg"></center>'
  37. else
  38. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavbuswn.jpg"></center>'
  39. end
  40. else
  41. if hour >= 8 and hour <= 21:
  42. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/gorodok.jpg"></center>'
  43. else
  44. $_str += '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pavbusn.jpg"></center>'
  45. end
  46. end
  47. if Enable_towntable = 1 : $_str += '</td><td>'
  48. $_str += '<center>The high street of a provincial town in a rural area of Russia. Population: about 15000 inhabitants.</center>'
  49. $_str += '<center>Apart from the old <a href="exec:view''images/locations/pavlovsk/palace/pav_palace.jpg''">Imperial palace</a> with its surrounding gardens and forest, built by Catherine the Great, and the recently rebuilt <a href="exec:view''images/locations/pavlovsk/fortress/bip_hotel.png''">Bip fortress</a> (which is now a Luxury hotel and restaurant), it looks much like all the other towns in the region.</a></center> '
  50. $_str += '<center>The tallest building in town is the <a href="exec:minut += 10 & gt ''ParChurch'',''start''">church of St Nikolas.</a></center>'
  51. if Enable_towntable = 1 : $_str += '</td></tr><table></center>'
  52. *nl $_str
  53. killvar '$_str'
  54. ''
  55. gs'street_event','pavCommercial', 'extras'
  56. if AlbFather >= 1:
  57. if AlbFaterBlackTime = 0:AlbFaterBlackTime = totminut + 2880
  58. '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?'
  59. end
  60. if AlbFaterBlackTime > 0 and AlbFaterBlackTime <= totminut and hour >= 14 and AlbFather = 1:gt 'AlbFatherQW'
  61. if hour >= 14 and hour <= 22 and AlbFather = 2 and AlbZaDay + 30 < daystart and year > 2015:
  62. gt 'AlbStarsEnd'
  63. end
  64. if StoryLine > 0 and hour < 4 and motherWorry = 0 and SchoolAtestat = 0 and age < 18 and home_owned[2] = 1:
  65. motherWorry = 1
  66. end
  67. if rand(1, 5) >= 4 and pav_slut >= 50:
  68. if pav_slut < 75:
  69. '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.'
  70. elseif pav_slut < 100:
  71. '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.'
  72. else
  73. '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.'
  74. end
  75. end
  76. gs 'stat'
  77. if car > 0 and cardrive = 24:
  78. cardrive = 24
  79. 'Your <a href="exec:gs ''carF'', ''start''">car<<$car>></a> is parked in the street.'
  80. end
  81. if hour >= 8 and hour <= 20:
  82. $Pharmname = ', and the <a href="exec: minut += 5 & gt ''gaptek'', ''start''">pharmacy</a> is right across the street.'
  83. else
  84. $Pharmname = '.'
  85. end
  86. 'You are on the high street, at one end is the <a href="exec:minut += 15 & gt ''vokzalG''">train station</a> and access to the highway. Near the highway you can also find a <a href="exec:minut += 5 & gt ''zaprF'', ''start''">gas station</a>.'
  87. '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'', ''park''">public park</a>.'
  88. 'There is a small <a href="exec:minut += 5 & gt ''gpoli''">clinic</a><<$Pharmname>>'
  89. if leonidSlave = 1:
  90. 'Near the town hall there is an old <a href="exec:minut += 15 & gt ''pavCommercialOffices''">office building</a>.'
  91. end
  92. if hour >= 8 and hour <= 17:'The local <a href="exec: minut += 3 & gt ''barbershop'', ''start''">barbershop</a> is within walking distance, merely a few minutes away.'
  93. if hour >= 7 and hour <= 18:'Pavlovsk has a <a href="exec:minut += 15 & gt ''etoexhib'', ''pos20''">vocational school</a>, where young adults can learn a trade.'
  94. if hour >= 8 and hour <= 20:'There is a big chain <a href="exec:minut += 2 & gt ''shop'', ''start''">supermarket</a> nearby.'
  95. if week < 6 and hour >= 9 and hour <= 18:'You can see the most important <a href="exec:gt ''bank'', ''start''">Bank</a> in the city from here.'
  96. if (week < 6 and hour >= 9 and hour <= 16) or (week = 6 and hour >= 9 and hour <= 13):'The local <a href="exec:minut += 3 & gt ''postoffice'', ''start''">post office</a> branch is open.'
  97. 'A <a href="exec:minut += 15 & gt ''Gshveyfab'', ''start''">garment factory</a> named Paris Commune is situated in the industrial area on the outskirts of town, close to the highway.'
  98. ''
  99. if workPTU > 2:act '<b>Go to the hostel</b>':gt 'etoexhib', 'pos40'
  100. act 'Go to the residential area':minut += 5 & gt 'pavResidential'
  101. act 'Walk to the city highway':minut += 15 & nroad = 20 & gt 'road'
  102. act 'Wait':
  103. cla
  104. waiting = input ("How long would you like to wait? (Not more than 120 minutes)")
  105. if waiting <= 0 or waiting > 120:
  106. minut += 15
  107. elseif waiting > 0 and waiting <= 120:
  108. minut += waiting
  109. end
  110. act 'Check the time':gt $curloc
  111. end
  112. if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
  113. if npc_QW['A113'] = 1 and daybelisex ! daystart and hour >= 9 and hour <= 23 and week = 7:
  114. cla & *clr
  115. daybelisex = daystart
  116. minut += 5
  117. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  118. 'As you walk through Pavlovsk, Vadim Belys Mitsubishi Pajero stops near you.'
  119. act 'Go to the jeep': gt 'belgang', 'payday', 'commercial'
  120. 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:
  121. cla & *clr
  122. daybelisex = daystart
  123. minut += 5
  124. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belyjeep.jpg"></center>'
  125. '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.'
  126. act 'Go to the jeep': gt 'belgang', 'workofdebt', 'commercial'
  127. end
  128. --- pavCommercial ---------------------------------