1
0

city_residential.qsrc 9.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201
  1. # city_residential
  2. ! 14-09-22 Added Metro link to navigation line 88
  3. music_loop = 0
  4. CLOSE ALL
  5. gs 'shortgs', 'setloc', 'city_residential', ''
  6. $location_type = 'public_outdoors'
  7. $region = 'city'
  8. menu_off = 0
  9. killvar '$locclass'
  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/street7.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/street7.mp3', 30 & PLAY 'sound/street_leto.mp3', 30
  16. if hour >= 0 and hour <= 7: PLAY 'sound/street_night_leto.mp3' & PLAY 'sound/street_night.mp3', 30
  17. end
  18. end
  19. !all random events move to [street_events], and display them before show location. by illume
  20. if streetevent_hour + 2 < hour:gt 'street_event', 'city_residential', 'main'
  21. '<center><h2>St. Petersburg</h2></center>'
  22. '<center><b>Residential Area</b></center>'
  23. if month >= 11 or month <= 3:
  24. if daystage = 2 or daystage = 3:
  25. '<center><img <<$set_imgh>> src="images/locations/city/residential/streetw.jpg"></center>'
  26. else
  27. '<center><img <<$set_imgh>> src="images/locations/city/residential/streetwn.jpg"></center>'
  28. end
  29. else
  30. if daystage = 2 or daystage = 3:
  31. '<center><img <<$set_imgh>> src="images/locations/city/residential/street.jpg"></center>'
  32. else
  33. '<center><img <<$set_imgh>> src="images/locations/city/residential/street_night.jpg"></center>'
  34. end
  35. end
  36. gs 'street_event','city_residential', 'extras'
  37. if opusk > 0 or gnewQW = 5:
  38. if rand(0,9) = 0:gt 'gopnew', 'start5'
  39. if func('homes_properties', 'has_access', 'city_apartment'):'Something is written on the wall near the entrance to your building. It reads:<b>"<<$pcs_firstname>> <<$pcs_lastname>> from apartment 69 is a cheap slut!"</b>'
  40. end
  41. gs 'stat'
  42. if gopdeath = 1 and vsehsdaladay ! daystart:
  43. gt 'gameover', 'force', 6
  44. end
  45. if mother['kickedout_timer'] ! 0 and mother['kickedout_timer'] + 3 <= daystart and hour > 6 and hour <= 15 and cumloc[11] = 0:
  46. gs 'mother_chats', 'reconciliation_talk'
  47. exit
  48. end
  49. if car > 0 and cardrive = 1 or cardrive = 8:
  50. if cardrive = 8:
  51. '<a href="exec: minut += 10 & gs ''carF'', ''start''">Your <<$car>></a> is in your driveway.'
  52. else
  53. '<a href="exec:gs ''carF'', ''start''">Your <<$car>></a> is in the parking lot.'
  54. end
  55. end
  56. if func('homes_properties', 'is_property_of_status', 'owned', 'city_house'):
  57. 'Your <a href="exec: minut += 10 & gs ''city_house_res_misc'', ''fronty''">house</a> is within walking distance.'
  58. act '<b>Go to your house</b>':
  59. minut += 10
  60. gt 'city_house_res_misc', 'fronty'
  61. end
  62. end
  63. if func('homes_properties', 'has_access', 'city_apartment'):
  64. act '<b>Go to your apartment</b>':
  65. gorand = rand(0, 100)
  66. if (loh > 0 or gnewQW = 7) and gopdolg > 0 and hour >= 20 and gorand >= 80:
  67. gt 'gopnew', 'start'
  68. end
  69. if (opusk > 0 or gnewQW = 5) and hour >= 20 and gorand >= 80 and gopopusday ! daystart:
  70. gt 'gopnew', 'start'
  71. end
  72. minut += 1
  73. gt 'korr'
  74. end
  75. end
  76. if hour >= 4 and hour < 23:
  77. act 'Walk to the Metro': minut += 5 & gt 'metro', 'start'
  78. end
  79. act 'Walk to the central park (0:20)': minut += 20 & gt 'city_park', 'start'
  80. act 'Walk to the lake': minut += 40 & gt 'city_lake', 'start'
  81. if evt_chk = 1:
  82. !! We've got an event today, check it's location:
  83. gs 'emp_functions', 'disp_evt', 3
  84. end
  85. gs 'taxi'
  86. if hour >= 8 and hour <= 22:'You can see the <a href="exec:$loc = ''city_residential'' & minut += 1 & gt ''kiosk'', ''start''">kiosk</a> selling cigarettes and magazines.'
  87. if Enable_tablemap = 0:
  88. if katkey = 1:'<a href="exec:gt ''katspalnya'', ''start''">Kat''s</a> apartment'
  89. if IrinaQW >= 1:'<a href="exec:gt ''city_irinaroom'', ''start''">Irene''s</a> apartment is not far from yours.'
  90. if hour >= 16 and hour < 22 and dimaQW > 0:'<a href="exec:gt ''city_dima'', ''start''">Dima''s</a> apartment'
  91. if klofQW >= 2:'<a href="exec:gt ''city_jorahouse'', ''start''">Jora''s</a> apartment'
  92. else
  93. st_count=0 & $show_table=''
  94. if katkey = 1: gs 'show_table','<a href="exec:gt ''katspalnya'', ''start''">Kat''s</a> apartment','3'
  95. if IrinaQW >= 1: gs 'show_table','<a href="exec:gt ''city_irinaroom'', ''start''">Irene''s</a> apartment is not far from yours.','3'
  96. if hour >= 16 and hour < 22 and dimaQW > 0: gs 'show_table','<a href="exec:gt ''city_dima'', ''start''">Dima''s</a> apartment','3'
  97. if klofQW >= 2: gs 'show_table','<a href="exec:gt ''city_jorahouse'', ''start''">Jora''s</a> apartment','3'
  98. if hour >= 10 and hour < 22 and lesbiQW = 1:
  99. gs 'show_table','<a href="exec:gt ''lesbidomhouse'', ''start''">Natalya Petrovna''s</a> apartment.', '3'
  100. elseif lesbiday ! daystart and subdom = 2:
  101. gs 'show_table','<a href="exec:gt ''lesbisubhouse'', ''start''">Your slave''s</a> apartment.','3'
  102. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 2 and lesbiQW < 13:
  103. gs 'show_table','<a href="exec:gt ''lesbidomhouse'', ''start''">Mistress''s</a> apartment.','3'
  104. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 13:
  105. gs 'show_table','<a href="exec:gt ''lesbimistress'', ''start''">Mistress''s</a> apartment.','3'
  106. end
  107. if st_count > 0 :'<TABLE BORDER=1><<$show_table>></TR></TABLE>'
  108. end
  109. if hour >= 4 and hour < 23:'The <a href="exec: minut += 1 & gt ''metro'', ''start''">Metro</a> station is a 5 minute walk away.'
  110. if hour >= 8 and hour <= 20:'The <a href="exec: minut += 3 & gt ''shop'', ''start''">supermarket</a> is not far from here.'
  111. if (hour >= 8 and hour <= 20) or preg = 2:
  112. 'The <a href="exec:gt ''city_clinic'', ''start''">clinic</a> is also nearby.'
  113. else
  114. 'The clinic is closed. It will open at 08:00.'
  115. end
  116. if hour >= 6 and hour <= 9 and military = 1 and week = 6:
  117. 'There is a <a href="exec:minut += 60 & gt ''Military'', ''start''">military bus</a> waiting on the other side of the street.'
  118. elseif military = 1:
  119. 'The military bus will wait between 06:00 and 09:00 on Saturdays.'
  120. end
  121. if hour >= 8 and hour <= 14 and week ! 1:
  122. 'You could go shopping at the local <a href="exec: minut += 10 & gt ''city_market'', ''start''">marketplace</a>.'
  123. else
  124. 'You could go shopping at the local marketplace, but it''s '+iif(week = 1, 'closed on Mondays.', 'only open between 08:00 and 15:00.')
  125. end
  126. if hour >= 8 and hour <= 15 and week < 6:
  127. 'Near the market is a <a href="exec: minut += 10 & gt ''city_market'', ''tailor''">tailor shop</a> where you can get your clothes resized if needed.'
  128. else
  129. 'Near the market is a tailor shop where you can get your clothes resized if needed. '+iif(week < 6, 'It closes at 16:00.', 'It''s closed on weekends.')
  130. end
  131. if hour = 11 and week > 1 and week < 7 and workKafe['job'] = 1:
  132. 'The side door of <a href="exec: minut += 1 & gt ''city_kafe'', ''work''">The Roadhouse</a> diner is open, allowing you to enter and start your shift.'
  133. elseif hour >= 12 and hour <= 20 and week ! 1:
  134. 'You can hear some <a href="exec: minut += 1 & gt ''gopnew'', ''start''">gopniks</a> laughing and swearing in a side alley next to <a href="exec: minut += 1 & gt ''city_kafe'', ''start''">The Roadhouse</a> diner.'
  135. elseif hour > 20 and hour <= 3:
  136. 'You can hear some <a href="exec:gt ''gopnew'', ''start''">gopniks</a> laughing and swearing in the parking lot of The Roadhouse diner. The diner itself is currently closed.'
  137. else
  138. 'The Roadhouse diner is currently closed. It''s open between 12:00 and 20:00 every day except Monday.'
  139. end
  140. if clener >= 1 and hour >= 7 and hour <= 22: 'There''s a small office building where a <a href="exec: minut += 1 & gt ''city_smalloffice'', ''start''">cleaning lady</a> is needed.'
  141. 'The city''s large <a href="exec:minut += 20 & gt ''city_park'', ''start''">central park</a> is a 20 minute walk away.'
  142. 'The city''s only <a href="exec:minut += 40 & gt ''city_lake'', ''start''">lake</a> is a 40 minute walk away.'
  143. 'A 24 hour <a href="exec:$loc = ''city_residential'' & gt ''city_pharmacy'', ''start''">pharmacy</a> is located nearby.'
  144. if Enable_tablemap = 0:
  145. if hour >= 10 and hour < 22 and lesbiQW = 1:
  146. '<a href="exec:gt ''lesbidomhouse'', ''start''">Natalya Petrovna''s</a> apartment.'
  147. elseif lesbiday ! daystart and subdom = 2:
  148. '<a href="exec:gt ''lesbisubhouse'', ''start''">Your slave''s</a> apartment.'
  149. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 2 and lesbiQW < 13:
  150. '<a href="exec:gt ''lesbidomhouse'', ''start''">Mistress''s</a> apartment.'
  151. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 13:
  152. '<a href="exec:gt ''lesbimistress'', ''start''">Mistress''s</a> apartment.'
  153. end
  154. end
  155. if func('homes_properties', 'has_access', 'city_apartment') = 0:
  156. 'You see several <a href="exec: minut += 1 & gt ''city_trashplace''">trash bins</a> in the courtyard of one of the apartment buildings.'
  157. else
  158. 'You see several <a href="exec: minut += 1 & gt ''city_trashplace''">trash bins</a> in the courtyard of your <a href="exec: gt ''city_apt_building'',''floor_1''">apartment building</a>.'
  159. end
  160. if drugVars['city_drugden'] > 0:'The <a href="exec:minut += 1 & gt ''city_drugden''">drug house</a> is clearly recognizable by the syringes and trash that lies in front of it.'
  161. if hour >= 8 and hour <= 23 or saunaWorkWhore > 0 or workDisk = 2:'<a href="exec:minut += 10 & gt ''city_sauna''">The sauna</a> is a 10 minute walk away. Rumors say that it''s just a front for a brothel.'
  162. if hour >= 20 or hour <= 4:
  163. *nl
  164. 'There are prostitutes working near here.'
  165. if pcs_makeup > 2 and PCloStyle = 4 and pcs_inhib >= 40 and (stat['vaginal'] > 0 or fame['pav_slut'] >= 100):
  166. act 'Prostitute yourself': gt 'street_walker', 'work'
  167. elseif pcs_inhib >= 40 and (stat['vaginal'] > 0 or fame['pav_slut'] >= 100):
  168. *nl
  169. 'You could work as a prostitute, but you need to wear appropriate clothes and more than a little bit of makeup.'
  170. else
  171. *nl
  172. 'You could work as a prostitute, but you aren''t comfortable with the idea.'
  173. end
  174. end
  175. gs 'booty_call', 'home_links'
  176. --- city_residential ---------------------------------