1
0

pavComplexb2.qsrc 10 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256
  1. # pavComplexb2
  2. !SETTINGS:
  3. CLOSE ALL
  4. gs 'themes', 'indoors'
  5. $metka = ''
  6. $loc = 'pavComplexb2'
  7. !elevator does not work
  8. if liftnotwork_day ! daystart: liftnotwork_count = 1
  9. !Apartment Uncle Misha
  10. if mishahouse_day ! daystart: mishahouse_count = 1
  11. !how much money for sex give boys
  12. $rnd_money_sex = ''+rand(50,350)+''
  13. rnd_money_sex = $rnd_money_sex
  14. !================================================================================================!
  15. !FLOORS: ---------------------------Entrance to the town-------------------------------------- FLOORS:!
  16. !================================================================================================!
  17. !housemates
  18. if $ARGS[0] = 'housemates':
  19. menu_off = 1
  20. *clr & cla
  21. minut +=1
  22. gs 'stat'
  23. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/housemates.jpg"></center>'
  24. 'Floor 1 - Apartment number'
  25. 'Floor 2 - Apartment number'
  26. 'Floor 3 - Apartment number'
  27. 'Floor 4 - Apartment number 17: Anushka Konstantinov'
  28. 'Floor 5 - Apartment number'
  29. act 'Leave': gt 'pavComplexb2', 'etaj_1'
  30. end
  31. !!locked in Pavlovsk, floor 1
  32. if $ARGS[0] = 'etaj_1':
  33. $menu_loc = 'pavComplexb2'
  34. $menu_arg = 'etaj_1'
  35. menu_off = 0
  36. CLOSE ALL
  37. if sound = 0:PLAY 'sound/podezd.mp3',30
  38. gs 'stat'
  39. '<center><b><font color = maroon>Ground floor of the apartment building</font></b></center>'
  40. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/podezd2.jpg"></center>'
  41. '<center>A dirty and poorly maintained stairwell, the same as any other in your town.</center>'
  42. '<<$pod_ev_rnd>>'
  43. 'There''s a <a href="exec: gt ''pavComplexb2'', ''housemates''">list</a> of the people who live here on the wall.'
  44. 'Someone put up some <a href="exec:GT ''pavComplexb2'',''pod_objava''">advertisements</a> on the wall, near the entrance.'
  45. act 'Leave the building': minut += 1 & gt 'pavcomplex', 'start'
  46. act 'Go up to the second floor': minut +=1 & gt 'pavComplexb2','etaj_2'
  47. act 'Take the elevator': gt 'pavComplexb2','lift','etaj_1'
  48. end
  49. !floor 2
  50. if $ARGS[0] = 'etaj_2':
  51. $menu_loc = 'pavComplexb2'
  52. $menu_arg = 'etaj_2'
  53. menu_off = 0
  54. gs 'stat'
  55. '<center>2nd floor of the apartment building</center>'
  56. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj2.jpg"></center>'
  57. '<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>'
  58. act 'Go down to the first floor': minut +=1 & gt 'pavComplexb2','etaj_1'
  59. act 'Go up to the third floor': minut +=1 & gt 'pavComplexb2','etaj_3'
  60. act 'Take the elevator': gt 'pavComplexb2','lift','etaj_2'
  61. end
  62. !floor 3
  63. if $ARGS[0] = 'etaj_3':
  64. $menu_loc = 'pavComplexb2'
  65. $menu_arg = 'etaj_3'
  66. menu_off = 0
  67. gs 'stat'
  68. '<center>3rd floor of the apartment building</center>'
  69. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj3.jpg"></center>'
  70. '<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>'
  71. act 'Go down to the second floor': minut +=1 & gt 'pavComplexb2','etaj_2'
  72. act 'Go up to the fourth floor': minut +=1 & gt 'pavComplexb2','etaj_4'
  73. act 'Take the elevator': gt 'pavComplexb2','lift','etaj_3'
  74. end
  75. !floor 4
  76. if $ARGS[0] = 'etaj_4':
  77. $menu_loc = 'pavComplexb2'
  78. $menu_arg = 'etaj_4'
  79. menu_off = 0
  80. gs 'stat'
  81. '<center>4th floor of the apartment building</center>'
  82. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj4.jpg"></center>'
  83. '<center>The fourth floor stairwell was renovated not long ago, but some hoodlums already sprayed graffiti on the walls.</center>'
  84. act 'Go down to the third floor': minut +=1 & gt 'pavComplexb2','etaj_3'
  85. act 'Go up to the fifth floor': minut +=1 & gt 'pavComplexb2','etaj_5'
  86. if anushkaFirstvisit ! 0:
  87. act 'Apartment 17: Anushka Konstantinov': gt 'anushapt', 'home'
  88. end
  89. act 'Take the elevator': gt 'pavComplexb2','lift','etaj_4'
  90. end
  91. !floor 5
  92. if $ARGS[0] = 'etaj_5':
  93. $menu_loc = 'pavComplexb2'
  94. $menu_arg = 'etaj_5'
  95. menu_off = 0
  96. gs 'stat'
  97. '<center>Floor #5</center>'
  98. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/etaj5.jpg"></center>'
  99. '<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>'
  100. act 'Go down to the fourth floor': minut +=1 & gt 'pavComplexb2','etaj_4'
  101. act 'Go up to the roof': minut +=1 & gt 'pavComplexb2', 'roof'
  102. act 'Take the elevator': gt 'pavComplexb2','lift','etaj_5'
  103. end
  104. !!roof
  105. if $ARGS[0] = 'roof':
  106. $menu_loc = 'pavComplexb2'
  107. $menu_arg = 'roof'
  108. menu_off = 0
  109. minut +=1
  110. gs 'stat'
  111. '<center>Roof</center>'
  112. if month >= 11 or month <= 3:
  113. !!if hour >= 8 and hour <= 21:
  114. !!'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roofw.jpg"></center>'
  115. !!else
  116. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roofw.jpg"></center>'
  117. !!end
  118. else
  119. if hour >= 8 and hour <= 21:
  120. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roof.jpg"></center>'
  121. else
  122. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/roof/roofn.jpg"></center>'
  123. end
  124. end
  125. '<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>'
  126. act 'Go down to the fifth floor':
  127. if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
  128. msg '<center><font color = red>You need to get dressed first</font></center>'
  129. gt 'pavComplexb2','roof'
  130. else
  131. minut += 1
  132. gt 'pavComplexb2','etaj_5'
  133. end
  134. end
  135. if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
  136. act 'Change back into clothes':
  137. minut += 5
  138. gs 'underwear', 'wear'
  139. gs 'clothing', 'wear_last_worn'
  140. gt 'pavComplexb2','roof'
  141. end
  142. end
  143. if temper >= 15 and hour >= 8 and hour <= 20:
  144. if ARRSIZE('swimwear') > 0 and $clothingworntype ! 'swimwear':
  145. act 'Change into a bikini':gt 'changingroom', 'view_swim_list'
  146. end
  147. if $clothingworntype = 'swimwear':
  148. act 'Sunbathe (1:00)':
  149. cla
  150. *clr
  151. minut += 60
  152. inhib_exp += rand(1,3)
  153. if pcs_sweat < 35: pcs_sweat += 5
  154. menu_off = 1
  155. pcs_mood += 5
  156. gs 'stat'
  157. '<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/zagar1.jpg"></center>'
  158. if krem = 0:
  159. pcs_tan += 1
  160. 'You lie down to sunbathe.'
  161. elseif krem > 0:
  162. krem -= 1
  163. pcs_tan += 3
  164. 'You put the sunblock on your body and lied down on the roof to sunbathe.'
  165. end
  166. act 'Get Up':gt 'pavComplexb2', 'roof'
  167. end
  168. end
  169. end
  170. end
  171. !================================================================================================!
  172. !ELEVATOR: ------------------------------------------------------------------------------------ ELEVATOR:!
  173. !================================================================================================!
  174. !the lift
  175. if $ARGS[0] = 'lift':
  176. menu_off = 1
  177. *clr & cla
  178. minut +=1
  179. gs 'stat'
  180. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator.jpg"></center>'
  181. '<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 ''pavComplexb2'',''elev_objava''">notification</a> in the elevator.</center>'
  182. act 'Push button: floor 1': gt 'pavComplexb2','etaj_1'
  183. act 'Push button: floor 2': gt 'pavComplexb2','etaj_2'
  184. act 'Push button: floor 3': gt 'pavComplexb2','etaj_3'
  185. act 'Push button: floor 4': gt 'pavComplexb2','etaj_4'
  186. act 'Push button: floor 5': gt 'pavComplexb2','etaj_5'
  187. pod_lift_ev = RAND(0,100)
  188. if pod_lift_ev <=5:
  189. *clr & cla
  190. minut +=1
  191. gs 'stat'
  192. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/event/elevator'+rand(1,2)+'.jpg"></center>'
  193. '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.'
  194. act 'Leave': gt 'pavComplexb2',$ARGS[1]
  195. elseif pod_lift_ev <=10 or liftnotwork_count <=0:
  196. *clr & cla
  197. minut +=1
  198. liftnotwork_day = daystart
  199. liftnotwork_count -= 1
  200. gs 'stat'
  201. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/liftnotwork.jpg"></center>'
  202. '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!"'
  203. act 'Leave': gt 'pavComplexb2',$ARGS[1]
  204. end
  205. killvar 'pod_lift_ev'
  206. end
  207. !elevator ads
  208. if $ARGS[0] = 'elev_objava':
  209. *clr & cla
  210. minut +=1
  211. gs 'stat'
  212. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/elevator_ob'+rand(1,2)+'.jpg"></center>'
  213. act 'Continue': gt 'pavComplexb2','lift'
  214. end
  215. !locked ads
  216. if $ARGS[0] = 'pod_objava':
  217. *clr & cla
  218. minut +=1
  219. gs 'stat'
  220. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/stairs/pod_ob'+rand(1,2)+'.jpg"></center>'
  221. act 'Continue': gt 'pavComplexb2','etaj_1'
  222. end
  223. !!new scene for going to this complex if Sveta has a friendship of 50 > and has not been to Anushka''s apartment. Once she has been once this doesn''t show up again. This is a temporary way to start Anushka''s story with out having to go to detention first.
  224. if $ARGS[0] = 'anushkaFirst':
  225. menu_off = 1
  226. '<center><img src="images\locations\pavlovsk\school\head\45.jpg"></center>'
  227. 'As you walk into the building you nearly run into Anushka. "Hey <<$pcs_nickname>> whats up?"'
  228. 'A bit surprised to see her but not disappointed, you was just wandering around for the hell of it. "Just killing time, kinda bored you know?"'
  229. 'She nods a bit and finishes checking the mail. "Yeah I know how that is, hey want to come up to my place and hang out?"'
  230. act 'Can''t, got to go.': minut += 1 & gt 'pavcomplex', 'start'
  231. act 'Sure': minut += 2 & gt 'anushapt', 'firstvisit'
  232. end
  233. --- pavComplexb2 ---------------------------------