1
0

street 7.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164
  1. # street
  2. music_loop = 0
  3. CLOSE ALL
  4. $metkaM = $ARGS[0]
  5. $locM = $CURLOC
  6. $metka = $ARGS[0]
  7. $loc = $CURLOC
  8. $location_type = 'public_outdoors'
  9. if sound = 0:
  10. if month >=11 and month <= 12 or month >=1 and month <=3:
  11. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/zima.mp3',30
  12. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  13. else
  14. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/street_leto.mp3',30
  15. if hour >= 0 and hour <= 7: PLAY 'sound/street_night_leto.mp3' & PLAY 'sound/street_night.mp3',30
  16. end
  17. end
  18. !all random events move to [street_events], and display them before show location. by illume
  19. if streetevent_hour + 2 < hour:gt'street_event','street', 'main'
  20. '<center><h2>St. Petersburg</h2></center>'
  21. '<center><b>Residential Area</b></center>'
  22. if month >= 11 or month <= 3:
  23. if hour >= 8 and hour <= 21:
  24. '<center><img <<$set_imgh>> src="images/locations/city/residential/streetw.jpg"></center>'
  25. else
  26. '<center><img <<$set_imgh>> src="images/locations/city/residential/streetwn.jpg"></center>'
  27. end
  28. else
  29. if hour >= 8 and hour <= 21:
  30. '<center><img <<$set_imgh>> src="images/locations/city/residential/street.jpg"></center>'
  31. else
  32. '<center><img <<$set_imgh>> src="images/locations/city/residential/street_night.jpg"></center>'
  33. end
  34. end
  35. gs'street_event','street', 'extras'
  36. if opusk > 0 or gnewQW = 5:
  37. if rand(0,9) = 0:gt 'gopnew', 'start5'
  38. if housr > 0:'Near the entrance to where you live there is something written on the wall. It says:<b>"<<$pcs_nickname>> from apartment 69 is a cheap slut!"</b>'
  39. end
  40. clr
  41. gs 'stat'
  42. palMir = 0
  43. bordysh = 0
  44. housrA = 0
  45. obdysh = 0
  46. tanhouse1 = 0
  47. obMir = 0
  48. houseob = 0
  49. borMir = 0
  50. curr_home = 3
  51. $onobjsel = 'onobjsel'
  52. if gopdeath = 1 and vsehsdaladay ! daystart:
  53. over = 6
  54. gt 'gameover'
  55. exit
  56. end
  57. housrA = 0
  58. if car > 0 and cardrive = 1:
  59. cardrive = 1
  60. 'In the parking lot is <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
  61. end
  62. if housr = 1:
  63. act '<b>GO HOME</b>':
  64. gorand = rand(0, 100)
  65. if (loh > 0 or gnewQW = 7) and gopdolg > 0 and hour >= 20 and gorand >= 80:
  66. gt 'gopnew', 'start'
  67. exit
  68. end
  69. if (opusk > 0 or gnewQW = 5) and hour >= 20 and gorand >= 80 and gopopusday ! daystart:
  70. gt 'gopnew', 'start'
  71. exit
  72. end
  73. gt 'korr'
  74. end
  75. end
  76. act 'Wait':
  77. cla
  78. waiting = input ("How long would you like to wait? (Not more than 120 minutes)")
  79. if waiting <= 0 or waiting > 120:
  80. minut += 15
  81. elseif waiting > 0 and waiting <= 120:
  82. minut += waiting
  83. end
  84. act 'Take a look at the clock':gt curloc
  85. end
  86. gs 'taxi'
  87. if hour >= 8 and hour <= 22:'You can see the <a href="exec:$locM = ''street'' & gt ''kiosk'', ''start''">kiosk</a> selling cigarettes and magazines.'
  88. if Enable_tablemap = 0:
  89. if katkey = 1:'<a href="exec:gt ''katspalnya'', ''start''">Katies</a> apartment'
  90. if IrinaQW >= 1:'<a href="exec:gt ''IrinaRoom'', ''start''">Irenes</a> apartment is not far away from yours.'
  91. if hour >= 16 and hour < 22 and dimaQW > 0:'<a href="exec:gt ''dima'', ''start''">Dimas</a> apartment'
  92. if klofQW >= 2:'<a href="exec:gt ''klofdomhouse'', ''start''">Joras</a> apartment'
  93. else
  94. st_count=0 & $show_table=''
  95. if katkey = 1:gs'show_table','<a href="exec:gt ''katspalnya'', ''start''">Katies</a> apartment','3'
  96. if IrinaQW >= 1:gs'show_table','<a href="exec:gt ''IrinaRoom'', ''start''">Irenes</a> apartment is not far away from yours.','3'
  97. if hour >= 16 and hour < 22 and dimaQW > 0:gs'show_table','<a href="exec:gt ''dima'', ''start''">Dimas</a> apartment','3'
  98. if klofQW >= 2:gs'show_table','<a href="exec:gt ''klofdomhouse'', ''start''">Joras</a> apartment','3'
  99. if hour >= 10 and hour < 22 and lesbiQW = 1:
  100. gs'show_table','<a href="exec:gt ''lesbidomhouse'', ''start''">Natalia Petrovnas</a> apartment.'
  101. elseif lesbiday ! daystart and subdom = 2:
  102. gs'show_table','<a href="exec:GT ''lesbisubhouse'', ''start''">Your slaves</a> apartment.','3'
  103. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 2 and lesbiQW < 13:
  104. gs'show_table','<a href="exec:GT ''lesbidomhouse'', ''start''">Mistress''</a> apartment.','3'
  105. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 13:
  106. gs'show_table','<a href="exec:GT ''lesbimistress'', ''start''">Mistress''</a> apartment.','3'
  107. end
  108. if st_count > 0 :'<TABLE BORDER=1><<$show_table>></TR></TABLE>'
  109. end
  110. if hour >= 5 and hour <= 23:'The <a href="exec:gt ''metro'', ''start''">Metro</a> Station is within a 5 minute walk from here.'
  111. if hour >= 8 and hour <= 20:'The <a href="exec:gt ''shop'', ''start''">supermarket</a> is not far from here.'
  112. if hour >= 8 and hour <= 20:'The <a href="exec:gt ''poli'', ''start''">clinic</a> is also nearby.'
  113. if hour >= 6 and hour <= 9 and military = 1 and week = 6:'There is a <a href="exec:minut += 60 & gt ''Military'', ''start''">military bus</a> waiting on the other side of the street.'
  114. if hour >= 8 and hour <= 14 and week ! 1:'You could go shopping at the noisy local <a href="exec:gt ''rinok'', ''start''">marketplace</a>.'
  115. if hour >= 8 and hour <= 15 and week < 6:'Near the market is a <a href="exec:gt ''rinok'', ''tailor''">tailor shop</a> where you can get your clothes resized if needed.'
  116. if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:'The side door of <a href="exec:gt ''kafe'', ''work''">"The Roadhouse"</a> is open, so employees can enter to begin their shift.'
  117. if hour >= 12 and hour <= 22 and week ! 1:'In a side alley, next to the uniquely styled diner <a href="exec:gt ''kafe'', ''start''">"The Roadhouse"</a>, you can hear the swearing and laughing of some <a href="exec:gt ''gopnew'', ''start''">gopniks</a>.'
  118. if hour > 22 or hour <= 3:'In one of the parking lots you can hear the swearing and laughing of some <a href="exec:gt ''gopnew'', ''start''">gopniks</a>.'
  119. if clener >= 1 and hour >= 7 and hour <= 22:'There''s a small office building where a <a href="exec:gt ''clener'', ''start''">cleaning lady</a> is needed.'
  120. 'The city''s large <a href="exec:minut += 20 & gt ''park'', ''start''">central park</a> is about a 20-minute walk away.'
  121. 'The city''s only <a href="exec:minut += 40 & gt ''lake'', ''start''">lake</a> is just a 40-minute walk away.'
  122. '24 Hour <a href="exec:$loc = ''street'' & gt ''pharmacy'', ''start''">Pharmacy</a>.'
  123. if Enable_tablemap = 0:
  124. if hour >= 10 and hour < 22 and lesbiQW = 1:
  125. '<a href="exec:gt ''lesbidomhouse'', ''start''">Natalia Petrovna''s</a> apartment.'
  126. elseif lesbiday ! daystart and subdom = 2:
  127. '<a href="exec:GT ''lesbisubhouse'', ''start''">Your slave''s</a> apartment.'
  128. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 2 and lesbiQW < 13:
  129. '<a href="exec:GT ''lesbidomhouse'', ''start''">Mistress''</a> apartment.'
  130. elseif lesbiday ! daystart and hour >= 8 and hour < 22 and lesbiQW >= 13:
  131. '<a href="exec:GT ''lesbimistress'', ''start''">Mistress''</a> apartment.'
  132. end
  133. end
  134. 'In the courtyard of one of the apartment buildings, you see several <a href="exec:gt ''trashplace''">trash bins</a>.'
  135. if SNarkPriton > 0:'The <a href="exec:minut += 5 & gt ''narkopriton''">drug house</a> is clearly recognizeable by the syringes and the trash that lies in front of it.'
  136. if hour >= 8 and hour <= 23 or saunaWorkWhore > 0 or workDisk = 2:'<a href="exec:minut += 10 & gt ''sauna''">The Sauna</a> is a 10 minute walk away. Rumors say the sauna is just the front for a brothel.'
  137. --- street ---------------------------------