1
0

street 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275
  1. # street
  2. CLOSE ALL
  3. $metkaM = $ARGS[0]
  4. $locM = $CURLOC
  5. $metka = $ARGS[0]
  6. $loc = $CURLOC
  7. if sound = 0:
  8. if month >=11 and month <= 12 or month >=1 and month <=3:
  9. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/zima.mp3',30
  10. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  11. else
  12. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street7.mp3',30 & PLAY 'sound/street_leto.mp3',30
  13. if hour >= 0 and hour <= 7: PLAY 'sound/street_night_leto.mp3' & PLAY 'sound/street_night.mp3',30
  14. end
  15. end
  16. !music_on = 0
  17. gs 'dinam'
  18. '<center><b>Residential Area<a href="exec:dynamic $objnewmenu">.</a></b></center>'
  19. '<center><img src="images/etogame/street.jpg"></center>'
  20. !all random events move to [street_events], and display them before show location. by illume
  21. gs'street_event','street' & if streetrand=-1:exit
  22. if marudatestinterface = 1:
  23. !!! Transportation
  24. '<center>'
  25. if hour >= 5 and hour <= 23:
  26. *p '<a href="exec: GT ''metro'',''start''">Metro Station</a>'
  27. else *p 'Closed until 5 AM'
  28. end
  29. *nl
  30. *nl
  31. !!! General Content Locations / Activities
  32. *p '<a href="exec: set minut += 40 & GT ''lake'',''start''">The Lake</a>'
  33. *p ' - '
  34. *p '<a href="exec: set minut += 20 & GT ''park'',''start''">The Central Park</a>'
  35. *p ' - '
  36. *p '<a href="exec:GT ''trashplace''">Garbage Containers</a>'
  37. *nl
  38. *nl
  39. !!! Shopping Locations
  40. if hour >= 8 and hour <= 22:
  41. *p '<a href="exec: dynamic $kiosksig">Kiosk</a>'
  42. else *p 'Closed until 8 AM'
  43. end
  44. *p ' - '
  45. if hour >= 8 and hour <= 20:
  46. *p '<a href="exec: GT ''shop'',''start''">Supermarket</a>'
  47. else *p 'Closed until 8 AM'
  48. end
  49. *p ' - '
  50. *p '<a href="exec: $loc = ''street'' & GT ''pharmacy'',''start''">24h/7d Pharmacy</a>'
  51. *nl
  52. *nl
  53. !!! Work Locations
  54. if hour >= 8 and hour <= 14 and week ! 1:
  55. *p '<a href="exec: GT ''rinok'',''start''">Market</a>'
  56. else *p 'Closed until 8 AM'
  57. end
  58. *p ' - '
  59. if hour >= 12 and hour <= 22 and week ! 1:
  60. *p '<a href="exec: GT ''kafe'',''start''">Café</a>'
  61. elseif hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1: *p '<a href="exec: GT ''kafe'',''work''">Work at the Café</a>'
  62. else *p 'Closed for today'
  63. end
  64. *p ' - '
  65. if hour >= 8 and hour <= 20:
  66. *p '<a href="exec: GT ''poli'',''start''">The Clinic</a>'
  67. else *p 'Closed until 8 AM'
  68. end
  69. *p ' - '
  70. if hour >= 8 and hour <= 23:
  71. *p '<a href="exec: minut += 10 & GT ''sauna''">The Sauna</a>'
  72. elseif hour >= 8 and hour <= 23 or saunaWorkWhore > 0 or workDisk = 2: *p '<a href="exec: minut += 10 & GT ''sauna''">The Sauna/Brothel</a>'
  73. else *p 'Closed until 8 AM'
  74. end
  75. *p ' - '
  76. if clener >= 1 and hour >= 7 and hour <= 22:
  77. *p '<a href="exec: GT ''clener'',''start''">Office Building/Work as cleaning lady</a>'
  78. elseif hour > 22 or hour < 7: *p 'Closed until 7 AM'
  79. else *p 'Location locked'
  80. end
  81. *nl
  82. *nl
  83. !!! Locations bound to Characters - Location Locked = Player does not meet requirements yet (obviously)
  84. if katkey = 1:
  85. *p '<a href="exec: gt ''katspalnya'',''start''">Katies apartment.</a> '
  86. else *p 'Location locked'
  87. end
  88. *p ' - '
  89. if hour >= 16 and hour < 22 and dimaQW > 0:
  90. *p '<a href="exec: GT ''dima'',''start''">Dimas apartment</a>'
  91. else *p 'Location locked'
  92. end
  93. *p ' - '
  94. if klofQW >= 2:
  95. *p '<a href="exec: GT ''klofdomhouse'',''start''">Joras apartment</a>'
  96. else *p 'Location locked'
  97. end
  98. *p ' - '
  99. if hour >= 8 and lesbiqw >= 1 and lesbiqw < 3:
  100. *p '<a href="exec: GT ''lesbidomhouse'',''start''">Natalia Petrovnas</a> Apartment'
  101. elseif lesbiday ! day and hour >= 8 and lesbiqw >= 3 : *p '<a href="exec: GT ''lesbidomhouse''">Mistress'' Apartment</a>'
  102. elseif lesbiday = day and hour >= 8: *p 'You can visit your Mistress only once a day!'
  103. else *p 'Location locked'
  104. end
  105. *p ' - '
  106. if hour >= 12 and hour <= 22 and week ! 1:
  107. *p '<a href="exec:GT ''gopnew'',''start''">Gopniks</a>'
  108. elseif hour > 22 or hour <= 3: *p '<a href="exec: GT ''gopnew'',''start''">Gopniks</a>'
  109. else *p 'Not even the Gopniks are outside'
  110. end
  111. *p ' - '
  112. if IrinaQW >= 1:
  113. *p '<a href="exec: GT ''IrinaRoom'',''start''">Irenes</a> Apartment is not far away from yours.'
  114. else *p 'Location locked'
  115. end
  116. *p ' - '
  117. if SNarkPriton > 0:
  118. *p '<a href="exec: minut += 5 & GT ''narkopriton''">The Drug House</a>'
  119. else *p 'Location locked'
  120. end
  121. *p ' - '
  122. if hour >= 6 and hour <= 9 and military = 1 and week = 6:
  123. *p '<a href="exec: set minut += 60 & gt ''Military'',''start''">A military bus</a>'
  124. else *p 'Location locked'
  125. end
  126. *nl
  127. *nl
  128. end
  129. !!!!!
  130. if opusk > 0 and housr > 0:'Near the entrance to where you live there is something written on the wall. It says:<b>"<<$name>> from apartment 69 is a cheap slut!"</b>'
  131. clr
  132. gs 'stat'
  133. gs 'outdoors'
  134. palMir = 0
  135. bordysh = 0
  136. housrA = 0
  137. obdysh = 0
  138. tanhouse1 = 0
  139. obMir = 0
  140. houseob = 0
  141. borMir = 0
  142. $onobjsel = 'onobjsel'
  143. if gopdeath = 1 and vsehsdaladay ! daystart:
  144. over = 6
  145. gt 'gameover'
  146. exit
  147. end
  148. housrA = 0
  149. if car > 0 and cardrive = 1:
  150. cardrive = 1
  151. 'In the parking lot is <a href="exec:GS ''carF'', ''start''">your <<$car>></a>.'
  152. end
  153. if housr = 1:
  154. act '<b>GO HOME</b>':
  155. gorand = rand(0, 100)
  156. if loh > 0 and gopdolg > 0 and hour >= 20 and gorand >= 80:
  157. gt 'gopnew', 'start'
  158. exit
  159. end
  160. if opusk > 0 and hour >= 20 and gorand >= 80 and gopopusday ! daystart:
  161. gt 'gopnew', 'start'
  162. exit
  163. end
  164. gt 'korr'
  165. end
  166. end
  167. act 'Wait':
  168. cla
  169. waiting = input ("How long would you like to wait? (Not more than 120 minutes)")
  170. if waiting <= 0 or waiting > 120:
  171. minut += 15
  172. elseif waiting > 0 and waiting <= 120:
  173. minut += waiting
  174. end
  175. act 'Take a look at the clock':gt curloc
  176. end
  177. gs 'taxi'
  178. if marudatestinterface = 0:
  179. if hour >= 8 and hour <= 22:'The kiosk selling <a href="exec:dynamic $kiosksig">cigarettes</a>'
  180. if Enable_tablemap = 0:
  181. if katkey = 1:'<a href="exec:gt ''katspalnya'', ''start''">Katies</a> apartment'
  182. if IrinaQW >= 1:'<a href="exec:gt ''IrinaRoom'', ''start''">Irenes</a> apartment is not far away from yours.'
  183. if hour >= 16 and hour < 22 and dimaQW > 0:'<a href="exec:gt ''dima'', ''start''">Dimas</a> apartment'
  184. if klofQW >= 2:'<a href="exec:gt ''klofdomhouse'', ''start''">Joras</a> apartment'
  185. else
  186. st_count=0 & $show_table=''
  187. if katkey = 1:gs'show_table','<a href="exec:gt ''katspalnya'', ''start''">Katies</a> apartment','3'
  188. if IrinaQW >= 1:gs'show_table','<a href="exec:gt ''IrinaRoom'', ''start''">Irenes</a> apartment is not far away from yours.','3'
  189. if hour >= 16 and hour < 22 and dimaQW > 0:gs'show_table','<a href="exec:gt ''dima'', ''start''">Dimas</a> apartment','3'
  190. if klofQW >= 2:gs'show_table','<a href="exec:gt ''klofdomhouse'', ''start''">Joras</a> apartment','3'
  191. if hour >= 10 and hour < 22 and lesbiQW = 1:
  192. gs'show_table','<a href="exec:gt ''lesbidomhouse''">Natalia Petrovnas</a> apartment.'
  193. elseif lesbiday ! day and subdom = 2:
  194. gs'show_table','<a href="exec:GT ''lesbidomhouse1''">Your slaves</a> apartment.','3'
  195. elseif lesbiday ! day and hour >= 8 and hour < 22 and lesbiQW >= 2 and lesbiQW < 9:
  196. gs'show_table','<a href="exec:GT ''lesbidomhouse''">Mistress''</a> apartment.','3'
  197. elseif lesbiday ! day and hour >= 8 and hour < 22 and lesbiQW >= 9:
  198. gs'show_table','<a href="exec:GT ''lesbidomhouse''">Mistress''</a> apartment.','3'
  199. end
  200. if st_count > 0 :'<TABLE BORDER=1><<$show_table>></TR></TABLE>'
  201. end
  202. if hour >= 5 and hour <= 23:'The <a href="exec:gt ''metro'', ''start''">Metro</a> Station is within a 5 minute walk from here.'
  203. if hour >= 8 and hour <= 20:'Not far from your house is a <a href="exec:gt ''shop'', ''start''">Supermarket</a>'
  204. if hour >= 8 and hour <= 20:'<a href="exec:gt ''poli'', ''start''">The clinic</a> isn''t far from your apartment either'
  205. 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.'
  206. if hour >= 8 and hour <= 14 and week ! 1:'At the local, but noisy, <a href="exec:gt ''rinok'', ''start''">marketplace</a> you can go for a small shopping trip'
  207. if hour >= 8 and hour <= 4 and week < 6:'Near to the local market square is a <a href="exec:gt ''rinok'', ''tailor''">tailor shop</a> where you can get your clothes resized if required.'
  208. if hour >= 11 and hour < 12 and week > 1 and week < 5 and workKafe = 1:'The side door at the <a href="exec:gt ''kafe'', ''work''">cafe</a> open, so work staff can get in begin their shift.'
  209. if hour >= 12 and hour <= 22 and week ! 1:'In a side alley, next to the <a href="exec:gt ''kafe'', ''start''">cafe</a>, you can hear the swearing and laughing of some <a href="exec:gt ''gopnew'', ''start''">Gopniks</a>.'
  210. 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>.'
  211. 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.'
  212. 'The towns <a href="exec:minut += 20 & gt ''park'', ''start''">central park</a> is about a 20-minute walk away.'
  213. 'The cities only <a href="exec:minut += 40 & gt ''lake'', ''start''">lake</a> can be reached from here and is just a 40-minute walk away.'
  214. '24 Hour <a href="exec:$loc = ''street'' & gt ''pharmacy'', ''start''">Pharmacy</a>.'
  215. if Enable_tablemap = 0:
  216. if hour >= 10 and hour < 22 and lesbiQW = 1:
  217. '<a href="exec:gt ''lesbidomhouse''">Natalia Petrovnas</a> apartment.'
  218. elseif lesbiday ! day and subdom = 2:
  219. '<a href="exec:GT ''lesbidomhouse1''">Your slaves</a> apartment.'
  220. elseif lesbiday ! day and hour >= 8 and hour < 22 and lesbiQW >= 2 and lesbiQW < 9:
  221. '<a href="exec:GT ''lesbidomhouse''">Mistress''</a> apartment.'
  222. elseif lesbiday ! day and hour >= 8 and hour < 22 and lesbiQW >= 9:
  223. '<a href="exec:GT ''lesbidomhouse''">Mistress''</a> apartment.'
  224. end
  225. end
  226. 'In the courtyard of the house you live in, you can find the <a href="exec:gt ''trashplace''">Wastebaskets</a>'
  227. if SNarkPriton > 0:'<a href="exec:minut += 5 & gt ''narkopriton''">The Drug House</a> is clearly recognizeable by the syringes and the trash that lies in front of it.'
  228. 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.'
  229. end
  230. !!! End of marudatestinterface = 0
  231. --- street ---------------------------------