1
0

pavComplexb3 7.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188
  1. # pavComplexb3
  2. !SETTINGS:
  3. CLOSE ALL
  4. if night_mode = 1:
  5. fcolor = rgb(255, 255, 255)
  6. bcolor = rgb(0, 0, 0)
  7. lcolor = rgb(106, 90, 205)
  8. else
  9. fcolor = rgb(0, 0, 0)
  10. bcolor = rgb(255, 255, 255)
  11. lcolor = rgb(106, 90, 205)
  12. end
  13. $metkaM = $ARGS[0]
  14. $locM = $CURLOC
  15. $metka = $ARGS[0]
  16. $loc = $CURLOC
  17. !elevator does not work
  18. if liftnotwork_day ! daystart: liftnotwork_count = 1
  19. !Apartment Uncle Misha
  20. if mishahouse_day ! daystart: mishahouse_count = 1
  21. !how much money for sex give boys
  22. $rnd_money_sex = ''+rand(50,350)+''
  23. rnd_money_sex = $rnd_money_sex
  24. !================================================================================================!
  25. !FLOORS: ---------------------------Entrance to the town-------------------------------------- FLOORS:!
  26. !================================================================================================!
  27. !housemates
  28. $housemates = {
  29. *clr & cla
  30. minut +=1
  31. gs 'stat'
  32. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/housemates.jpg"></center>'
  33. 'Floor 1 - Apartment number'
  34. 'Floor 2 - Apartment number'
  35. 'Floor 3 - Apartment number'
  36. 'Floor 4 - Apartment number'
  37. 'Floor 5 - Apartment number'
  38. act 'Leave': gt 'pavComplexb3', 'etaj_1'
  39. }
  40. !!locked in Pavlovsk, floor 1
  41. if $ARGS[0] = 'etaj_1':
  42. CLOSE ALL
  43. if sound = 0:PLAY 'sound/podezd.mp3',30
  44. minut +=1
  45. gs 'stat'
  46. '<center><b><font color = maroon>Ground floor of the apartment building</font></b></center>'
  47. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/podezd2.jpg"></center>'
  48. '<center>A dirty and poorly maintained stairwell, the same as any other in your town.</center>'
  49. '<<$pod_ev_rnd>>'
  50. 'There''s a <a href="exec: dynamic $housemates">list</a> of the people who live here on the wall.'
  51. 'Someone put up some <a href="exec:GT ''pavComplexb3'',''pod_objava''">advertisements</a> on the wall, near the entrance.'
  52. act '<font color = maroon><b>Go outside</b></font>': gt 'pavcomplex', 'start'
  53. act 'Go up to the second floor': CLOSE ALL & gt 'pavComplexb3','etaj_2'
  54. act 'Take the elevator': CLOSE ALL & gt 'pavComplexb3','lift','etaj_1'
  55. end
  56. !floor 2
  57. if $ARGS[0] = 'etaj_2':
  58. minut +=1
  59. gs 'stat'
  60. '<center>2nd floor of the apartment building</center>'
  61. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj2.jpg"></center>'
  62. '<center>The second floor stairwell is clean and well maintained. It was renovated not long ago, and the inhabitants do their best to keep it clean.</center>'
  63. act 'Go down to the first floor': gt 'pavComplexb3','etaj_1'
  64. act 'Go up to the third floor': gt 'pavComplexb3','etaj_3'
  65. act 'Take the elevator': gt 'pavComplexb3','lift','etaj_2'
  66. end
  67. !floor 3
  68. if $ARGS[0] = 'etaj_3':
  69. minut +=1
  70. gs 'stat'
  71. '<center>3rd floor of the apartment building</center>'
  72. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj3.jpg"></center>'
  73. '<center>The third floor stairwell is clean and well maintained. It was renovated not long ago, and the inhabitants do their best to keep it clean.</center>'
  74. act 'Go down to the second floor': gt 'pavComplexb3','etaj_2'
  75. act 'Go up to the fourth floor': gt 'pavComplexb3','etaj_4'
  76. act 'Take the elevator': gt 'pavComplexb3','lift','etaj_3'
  77. end
  78. !floor 4
  79. if $ARGS[0] = 'etaj_4':
  80. minut +=1
  81. gs 'stat'
  82. '<center>4th floor of the apartment building</center>'
  83. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj4.jpg"></center>'
  84. '<center>The fourth floor stairwell was renovated not long ago, but some hoodlums already sprayed graffiti on the walls.</center>'
  85. act 'Go down to the third floor': gt 'pavComplexb3','etaj_3'
  86. act 'Go up to the fifth floor': gt 'pavComplexb3','etaj_5'
  87. act 'Take the elevator': gt 'pavComplexb3','lift','etaj_4'
  88. end
  89. !floor 5
  90. if $ARGS[0] = 'etaj_5':
  91. minut +=1
  92. gs 'stat'
  93. '<center>Floor #5</center>'
  94. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj5.jpg"></center>'
  95. '<center>The fifth floor stairwell looks much like most of the other floors, though it has a final set of stairs at the other end of the hall that go up to the roof.</center>'
  96. act 'Go down to the fourth floor': gt 'pavComplexb3','etaj_4'
  97. act 'Take the elevator': gt 'pavComplexb3','lift','etaj_5'
  98. act 'Go to the roof': gt 'pavComplexb3', 'roof'
  99. end
  100. !!roof
  101. if $ARGS[0] = 'roof':
  102. minut +=1
  103. gs 'stat'
  104. '<center>Roof</center>'
  105. if month >= 11 or month <= 3:
  106. !!if hour >= 8 and hour <= 21:
  107. !!'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roofw.jpg"></center>'
  108. !!else
  109. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roofw.jpg"></center>'
  110. !!end
  111. else
  112. if hour >= 8 and hour <= 21:
  113. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roof.jpg"></center>'
  114. else
  115. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roofn.jpg"></center>'
  116. end
  117. end
  118. '<center>The roof is fairly flat, with the roof access door in a raised part in the middle of the roof. Along one of the walls is another door to some type of storage or maintenances access. There is several ventilation stacks on the roof as well.</center>'
  119. act 'Go down to the fifth floor': gt 'pavComplexb3','etaj_5'
  120. end
  121. !================================================================================================!
  122. !ELEVATOR: ------------------------------------------------------------------------------------ ELEVATOR:!
  123. !================================================================================================!
  124. !the lift
  125. if $ARGS[0] = 'lift':
  126. *clr & cla
  127. minut +=1
  128. gs 'stat'
  129. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator.jpg"></center>'
  130. '<center>The elevator in the apartment building is quite old. The building supervisor does his best to keep it running, but it breaks down a lot. Someone put up a <a href="exec:GT ''pavComplexb3'',''elev_objava''">notification</a> in the elevator.</center>'
  131. act 'Push button: floor 1': gt 'pavComplexb3','etaj_1'
  132. act 'Push button: floor 2': gt 'pavComplexb3','etaj_2'
  133. act 'Push button: floor 3': gt 'pavComplexb3','etaj_3'
  134. act 'Push button: floor 4': gt 'pavComplexb3','etaj_4'
  135. act 'Push button: floor 5': gt 'pavComplexb3','etaj_5'
  136. pod_lift_ev = RAND(0,100)
  137. if pod_lift_ev <=5:
  138. *clr & cla
  139. minut +=1
  140. gs 'stat'
  141. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/event/elevator'+rand(1,2)+'.jpg"></center>'
  142. 'When the elevator door opens, you see a naked woman standing in it! She looks at you in panic and is frantically pressing all the elevator buttons. You''re too baffled to do anything until it''s too late. The door is already closed again, and the elevator is moving away from you.'
  143. act 'Leave': gt 'pavComplexb3',$ARGS[1]
  144. elseif pod_lift_ev <=10 or liftnotwork_count <=0:
  145. *clr & cla
  146. minut +=1
  147. liftnotwork_day = daystart
  148. liftnotwork_count -= 1
  149. gs 'stat'
  150. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/liftnotwork.jpg"></center>'
  151. 'The building supervisor put a sign on the elevator: "Dear tenants, the elevator is out of order for today. Don''t worry, I should have it working again by tomorrow!"'
  152. act 'Leave': gt 'pavComplexb3',$ARGS[1]
  153. end
  154. killvar 'pod_lift_ev'
  155. end
  156. !elevator ads
  157. if $ARGS[0] = 'elev_objava':
  158. *clr & cla
  159. minut +=1
  160. gs 'stat'
  161. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator_ob'+rand(1,2)+'.jpg"></center>'
  162. act 'Continue': gt 'pavComplexb3','lift'
  163. end
  164. !locked ads
  165. if $ARGS[0] = 'pod_objava':
  166. *clr & cla
  167. minut +=1
  168. gs 'stat'
  169. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/pod_ob'+rand(1,2)+'.jpg"></center>'
  170. act 'Continue': gt 'pavComplexb3','etaj_1'
  171. end
  172. --- pavComplexb3 ---------------------------------