1
0

buklinik 13 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392
  1. # buklinik
  2. if $ARGS[0] = 'start':
  3. cla
  4. clr
  5. *clr
  6. minut += 5
  7. gs 'stat'
  8. if night_mode = 1:
  9. fcolor = rgb(255, 255, 255)
  10. bcolor = rgb(0, 0, 0)
  11. lcolor = rgb(106, 90, 205)
  12. else
  13. fcolor = rgb(0, 0, 0)
  14. bcolor = rgb(255, 255, 255)
  15. lcolor = rgb(106, 90, 205)
  16. end
  17. '<center><b>Mercy clinic</b></center>'
  18. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli.jpg"></center>'
  19. 'Working hours: 9 to 17'
  20. temp = rand(1, 10)
  21. if temp = 9:'You see the crowd of homeless people trying to get to a shelter.'
  22. if temp = 2:'You see a homeless person trying to get into a shelter.'
  23. if temp = 3:'You see an old man who came to the shelter.'
  24. if hour >= 9 and hour <= 17:
  25. act 'Go to the clinic':gt 'buklinik', 'holl'
  26. end
  27. act 'Leave':gt 'nord'
  28. end
  29. if $ARGS[0] = 'holl':
  30. cla
  31. clr
  32. *clr
  33. minut += 5
  34. gs 'stat'
  35. if night_mode = 1:
  36. fcolor = rgb(255, 255, 255)
  37. bcolor = rgb(0, 0, 0)
  38. lcolor = rgb(106, 90, 205)
  39. else
  40. fcolor = rgb(0, 0, 0)
  41. bcolor = rgb(255, 255, 255)
  42. lcolor = rgb(106, 90, 205)
  43. end
  44. '<center><b>Mercy Clinic. hall</b></center>'
  45. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_holl.jpg"></center>'
  46. 'Hospital corridor.'
  47. if StoryLine = 1 and SchoolAtestat = 0 and kanikuli = 0 and week < 6 and bumtolik >= 5:
  48. !r125
  49. 'Your rabochie days on the weekends, today is not here is.'
  50. else
  51. if bumtolik > 4:'Things are stored on<a href="exec:gt ''buklinik'', ''sklad''"> stock</a>.'
  52. if bumtolik > 5:'The entrance is located<a href="exec:gt ''buklinik'', ''registr3''"> Registry</a>.'
  53. if bumtolik > 5:'Opposite the registry is<a href="exec:gt ''buklinik'', ''olga2''"> Olga Account</a>.'
  54. if bumtolik > 5:'At the end of the corridor<a href="exec:gt ''buklinik'', ''shower''"> shower room</a>.'
  55. if bumtolik = 6:'<a href="exec:gt ''buklinik'', ''spal''">Number of people</a>.'
  56. if bumtolik > 6:'Sleeps. (I go there any more naked)'
  57. if bumtolik > 5:'<a href="exec:gt ''buklinik'', ''stol''">Family Dining Room</a> residents.'
  58. if bumtolik > 5:'office in charge<a href="exec:gt ''buklinik'', ''sec''"> Jeanne</a>.'
  59. if bumtolik > 5:'Account coordinator<a href="exec:gt ''buklinik'', ''dir''"> faith</a>.'
  60. end
  61. if (SchoolAtestat = 0 and bumtolik = 0) or bumtolik = 4:
  62. act 'Apply to the registry':gt 'buklinik', 'registr'
  63. end
  64. act 'Leave':gt 'nord'
  65. end
  66. if $ARGS[0] = 'registr':
  67. cla
  68. clr
  69. *clr
  70. minut += 15
  71. gs 'stat'
  72. if night_mode = 1:
  73. fcolor = rgb(255, 255, 255)
  74. bcolor = rgb(0, 0, 0)
  75. lcolor = rgb(106, 90, 205)
  76. else
  77. fcolor = rgb(0, 0, 0)
  78. bcolor = rgb(255, 255, 255)
  79. lcolor = rgb(106, 90, 205)
  80. end
  81. '<center><b>Mercy Clinic. desk</b></center>'
  82. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_reg.jpg"></center>'
  83. 'In registature sit two women in white coats.'
  84. if StoryLine = 1 and SchoolAtestat = 0 and bumtolik < 5:
  85. !r125
  86. 'You: - Hello, my name is <<$pcs_firstname>>, I heard that you can volunteers...'
  87. 'Registrar: - Hello! We are very happy to see you. We really need volunteers, but the work will be very difficult. And have the aged care and homeless to feed and clothe.'
  88. 'In addition, apparently, you are still in high school, so that the law can only work outside school hours - on weekends, on weekdays you should not be here.'
  89. else
  90. 'You:- Hello, my name is <<$pcs_firstname>>, I am with the work. Girl named Olga gave me this card, said that you need employees.'
  91. 'Registrar:- Hello! We are very pleased to see you. But I''m afraid you refuse, the fact is that we need volunteers, ie your work will not be paid. A job to be very complicated. Will have to take care of the elderly and the homeless to feed and clothe.'
  92. end
  93. act 'I knew you, I have to think':gt 'nord'
  94. act 'agree':gt 'buklinik', 'registr2'
  95. end
  96. if $ARGS[0] = 'registr2':
  97. cla
  98. clr
  99. *clr
  100. minut += 15
  101. bumtolik = 5
  102. gs 'stat'
  103. if night_mode = 1:
  104. fcolor = rgb(255, 255, 255)
  105. bcolor = rgb(0, 0, 0)
  106. lcolor = rgb(106, 90, 205)
  107. else
  108. fcolor = rgb(0, 0, 0)
  109. bcolor = rgb(255, 255, 255)
  110. lcolor = rgb(106, 90, 205)
  111. end
  112. '<center><b>Mercy Clinic. desk</b></center>'
  113. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_reg.jpg"></center>'
  114. 'You:- Well, I think I can handle it. Where do I start?'
  115. 'Registrar:- I am happy to hear that. Fill out the form. And me, store copies of your passport and if there is documentation of education diploma courses, all that is, perhaps, in the future, you can find paid work.'
  116. '(You fill out the form)'
  117. 'Registator:- Well, there you have a membership card. The corridor the first door on the right, get to the warehouse, where she will meet Olga show you everything.'
  118. act 'In the corridor':gt 'buklinik', 'holl'
  119. end
  120. if $ARGS[0] = 'registr3':
  121. cla
  122. clr
  123. *clr
  124. minut += 15
  125. gs 'stat'
  126. if night_mode = 1:
  127. fcolor = rgb(255, 255, 255)
  128. bcolor = rgb(0, 0, 0)
  129. lcolor = rgb(106, 90, 205)
  130. else
  131. fcolor = rgb(0, 0, 0)
  132. bcolor = rgb(255, 255, 255)
  133. lcolor = rgb(106, 90, 205)
  134. end
  135. '<center><b>Mercy Clinic. desk</b></center>'
  136. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_reg.jpg"></center>'
  137. 'In registature usually sit either Karina or Regina.'
  138. act 'In the corridor':gt 'buklinik', 'holl'
  139. end
  140. if $ARGS[0] = 'sklad':
  141. cla
  142. clr
  143. *clr
  144. minut += 5
  145. gs 'stat'
  146. if night_mode = 1:
  147. fcolor = rgb(255, 255, 255)
  148. bcolor = rgb(0, 0, 0)
  149. lcolor = rgb(106, 90, 205)
  150. else
  151. fcolor = rgb(0, 0, 0)
  152. bcolor = rgb(255, 255, 255)
  153. lcolor = rgb(106, 90, 205)
  154. end
  155. '<center><b>Mercy Clinic. warehouse</b></center>'
  156. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_sklad.jpg"></center>'
  157. 'Warehouse all packages littered with things.'
  158. if bumtolik = 5:act 'Find Olga':gt 'buklinik', 'olga'
  159. act 'In the corridor':gt 'buklinik', 'holl'
  160. end
  161. if $ARGS[0] = 'olga':
  162. cla
  163. clr
  164. *clr
  165. minut += 5
  166. gs 'stat'
  167. if night_mode = 1:
  168. fcolor = rgb(255, 255, 255)
  169. bcolor = rgb(0, 0, 0)
  170. lcolor = rgb(106, 90, 205)
  171. else
  172. fcolor = rgb(0, 0, 0)
  173. bcolor = rgb(255, 255, 255)
  174. lcolor = rgb(106, 90, 205)
  175. end
  176. '<center><b>Your colleague Olga</b></center>'
  177. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_olga.jpg"></center>'
  178. '(Olga - groomed and cute brunette with a kind smile.)'
  179. if bumtolik = 5:
  180. '- Olga, hello. I am <<$pcs_nickname>>, you remember me? I decided to respond to your call. And ready for duty. At the reception told me that you show here.'
  181. '- <<$pcs_nickname>>, good afternoon! Good for you, welcome! Let me briefly tell you how we work. We are volunteers and therefore our work is not paid. You can come at any time during working hours. Work is very different, because you attached to me, the first time the job will receive from me.'
  182. 'Olga:- You do not mind go to you?'
  183. 'You:- I am in favor.'
  184. 'Olga:- Well, let me spend a tour for you. Here we have a warehouse that we bought for the needy. We packed up his boxes and transported to the destination.'
  185. end
  186. act 'By office manager':gt 'buklinik', 'sec'
  187. end
  188. if $ARGS[0] = 'sec':
  189. cla
  190. clr
  191. *clr
  192. minut += 15
  193. gs 'stat'
  194. if night_mode = 1:
  195. fcolor = rgb(255, 255, 255)
  196. bcolor = rgb(0, 0, 0)
  197. lcolor = rgb(106, 90, 205)
  198. else
  199. fcolor = rgb(0, 0, 0)
  200. bcolor = rgb(255, 255, 255)
  201. lcolor = rgb(106, 90, 205)
  202. end
  203. '<center><b>Your colleague Jeanne</b></center>'
  204. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_sec.jpg"></center>'
  205. '(Jeanne and cheerful young blonde)'
  206. if bumtolik = 5:
  207. 'Olga:- Meet, it is our office manager Joan. Zhannochka we responsible for everything. If there are organizational issues addressed her.'
  208. 'Olga:- Zhannochka <<$pcs_nickname>> is our new volunteer.'
  209. 'Jeanne:- Wow! And you young <<$pcs_nickname>> bold. Very pleased to meet you!'
  210. 'You:- Thank you, mutually.'
  211. act 'To the head':gt 'buklinik', 'dir'
  212. elseif bumtolik > 5:
  213. '- Hello, <<$pcs_nickname>>!'
  214. act 'In the corridor':gt 'buklinik', 'holl'
  215. end
  216. end
  217. if $ARGS[0] = 'dir':
  218. cla
  219. clr
  220. *clr
  221. minut += 15
  222. gs 'stat'
  223. if night_mode = 1:
  224. fcolor = rgb(255, 255, 255)
  225. bcolor = rgb(0, 0, 0)
  226. lcolor = rgb(106, 90, 205)
  227. else
  228. fcolor = rgb(0, 0, 0)
  229. bcolor = rgb(255, 255, 255)
  230. lcolor = rgb(106, 90, 205)
  231. end
  232. '<center><b>Your colleague Vera</b></center>'
  233. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_dir.jpg"></center>'
  234. '(Vera overbearing and well-groomed lady)'
  235. if bumtolik = 5:
  236. 'Olga:- And this is our coordinator Vera ...'
  237. 'Vera:- Simply Vera.'
  238. 'Olga:- Vera is not only our coordinator, but the mastermind, she came up with it and created our organization.'
  239. 'You:- Very nice, <<$pcs_nickname>>!'
  240. 'Vera:- Welcome to contact us. (Vera you smile)'
  241. act 'complete familiarity':gt 'buklinik', 'olga2'
  242. elseif bumtolik > 5:
  243. '- Hello, <<$pcs_nickname>>!'
  244. act 'In the corridor':gt 'buklinik', 'holl'
  245. end
  246. end
  247. if $ARGS[0] = 'shower':
  248. cla
  249. clr
  250. *clr
  251. minut += 15
  252. gs 'stat'
  253. if night_mode = 1:
  254. fcolor = rgb(255, 255, 255)
  255. bcolor = rgb(0, 0, 0)
  256. lcolor = rgb(106, 90, 205)
  257. else
  258. fcolor = rgb(0, 0, 0)
  259. bcolor = rgb(255, 255, 255)
  260. lcolor = rgb(106, 90, 205)
  261. end
  262. '<center><b>Mercy Clinic. shower room</b></center>'
  263. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_show.jpg"></center>'
  264. 'Shared shower for guests'
  265. 'Here guests take a shower. Better unnecessarily here not to meddle.'
  266. act 'In the corridor':gt 'buklinik', 'holl'
  267. end
  268. if $ARGS[0] = 'stol':
  269. cla
  270. clr
  271. *clr
  272. minut += 15
  273. gs 'stat'
  274. if night_mode = 1:
  275. fcolor = rgb(255, 255, 255)
  276. bcolor = rgb(0, 0, 0)
  277. lcolor = rgb(106, 90, 205)
  278. else
  279. fcolor = rgb(0, 0, 0)
  280. bcolor = rgb(255, 255, 255)
  281. lcolor = rgb(106, 90, 205)
  282. end
  283. '<center><b>Mercy Clinic. dining room</b></center>'
  284. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_stol.jpg"></center>'
  285. 'Dining room for guests'
  286. 'Here guests take their food. Very lean diet, but they do.'
  287. act 'In the corridor':gt 'buklinik', 'holl'
  288. end
  289. if $ARGS[0] = 'spal':
  290. cla
  291. clr
  292. *clr
  293. minut += 15
  294. gs 'stat'
  295. if night_mode = 1:
  296. fcolor = rgb(255, 255, 255)
  297. bcolor = rgb(0, 0, 0)
  298. lcolor = rgb(106, 90, 205)
  299. else
  300. fcolor = rgb(0, 0, 0)
  301. bcolor = rgb(255, 255, 255)
  302. lcolor = rgb(106, 90, 205)
  303. end
  304. '<center><b>Mercy Clinic. bedrooms</b></center>'
  305. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_spal.jpg"></center>'
  306. 'Sleeping space for guests.'
  307. 'Who are there only. Alcoholics and homeless, vagrants and drug addicts. There are just people who have nowhere to sleep.'
  308. if bumtolik = 6:
  309. act 'hello':gt 'buklinik_event', 'pos1'
  310. end
  311. act 'In the corridor':gt 'buklinik', 'holl'
  312. end
  313. if $ARGS[0] = 'olga2':
  314. cla
  315. clr
  316. *clr
  317. minut += 15
  318. gs 'stat'
  319. if night_mode = 1:
  320. fcolor = rgb(255, 255, 255)
  321. bcolor = rgb(0, 0, 0)
  322. lcolor = rgb(106, 90, 205)
  323. else
  324. fcolor = rgb(0, 0, 0)
  325. bcolor = rgb(255, 255, 255)
  326. lcolor = rgb(106, 90, 205)
  327. end
  328. '<center><b>Your colleague Olga</b></center>'
  329. '<center><img <<$set_imgh>> src="images/locations/city/industrial/mercyclinic/bukli_olga.jpg"></center>'
  330. '(Olga - groomed and cute brunette with a kind smile.)'
  331. if bumtolik > 5:'- Hello, <<$pcs_nickname>>!'
  332. if buklinikDay = daystart:'- Today there is no more work, we can relax.'
  333. if bumtolik >= 7 and buklinikDay ! daystart:'- <<$pcs_nickname>>, We need help <a href="exec:gt ''buklinik_event'', ''pos6''">feed the needy</a>.'
  334. if bumtolik >= 8 and buklinikDay ! daystart: '- <<$pcs_nickname>>, here is the address of one <a href="exec:GT ''buklinik_event'',''pos8''">elderly man</a>, go see him help with the housework.'
  335. if bumtolik = 9 and buklinikDay ! daystart: '- <<$pcs_nickname>>, Need help persuade a wino not wander the streets, and come to live with <a href="exec:GT ''buklinik_event'',''pos9''">to_us</a>.'
  336. if bumtolik = 10 and buklinikDay ! daystart: '- We need a babysitter for one very <a href="exec:GT ''buklinik_event'',''event0''">a strange man</a>.'
  337. if bumtolik = 11 and buklinikDay ! daystart: '- <<$pcs_nickname>>, you need to go to <a href="exec:GT ''buklinik_event'',''entrance'',0">Michael</a>.'
  338. if bumtolik = 12 and buklinikDay ! daystart: '- Waiting for you again <a href="exec:GT ''buklinik_event'',''entrance'',1">Michael</a>.'
  339. if bumtolik = 13 and buklinikDay ! daystart: '- <<$pcs_nickname>>, waiting for you again <a href="exec:GT ''buklinik_event'',''entrance'',2">Michael</a>.'
  340. if bumtolik = 14 and buklinikDay ! daystart: '- <<$pcs_nickname>>, <a href="exec:GT ''buklinik_event'',''entrance'',3">Michael</a> is waiting for you.'
  341. if bumtolik = 15 and buklinikDay ! daystart: '- <a href="exec:GT ''buklinik_event'',''entrance'',4">Michael</a> is Waiting for you.'
  342. if bumtolik = 16 and week = 1 and buklinikDay ! daystart: '- <a href="exec:GT ''buklinik_event'',''entrance'',5">Michael</a> is Waiting for you.'
  343. !bumtolik = 3000 if michael events stoped.
  344. if bumtolik = 5:
  345. bumtolik = 6
  346. 'Olga:- Continue along the corridor beds, showers and a dining room where guests can eat for free. See there is nothing special. Well, that''s all. At the reception we sit two girls - Regina and Karina, you''ve seen them.'
  347. 'We were still coming the other volunteers, but you yourself to meet them at the meeting.'
  348. 'You can look around here, if that appeals to me.'
  349. end
  350. act 'In the corridor':gt 'buklinik', 'holl'
  351. end
  352. --- buklinik ---------------------------------