1
0

Gshveyfab.qsrc 6.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165
  1. # Gshveyfab
  2. $location_type = 'public_outdoors'
  3. if $ARGS[0] = 'tailor':
  4. *clr & cla
  5. $metka = 'tailor'
  6. $loc = 'Gshveyfab'
  7. $menu_loc = 'Gshveyfab'
  8. $menu_arg = 'tailor'
  9. menu_off = 0
  10. gs'stat'
  11. 'There is a small wooden counter and above that a sign that says "If you can''t wear it we''ll adjust it"'
  12. 'Behind the counter an elderly man is inspecting some repaired clothes, he stops and smiles gently, greeting you.'
  13. '"Hello there young lady, do you want to adjust some of your clothing? It''ll cost you 500 <b>₽</b> per item."'
  14. act 'Leave': gt 'pavIndustrial'
  15. if money >= 500:
  16. act 'Resize the clothes you''re wearing (500 <b>₽</b>)':
  17. *clr & cla
  18. minut += 15
  19. if CloStyle = 5 or $clothingworntype = 'exercise':
  20. 'The tailor is looking irritatingly at you, "Why are you wasting my time with exercise clothing? That type of clothing does not need to be resized..."'
  21. else
  22. money -= 500
  23. dynamic '<<$clothingworntype>>B[<<clothingwornnumber>>] = pcs_hips'
  24. 'You are handed a t-shirt and shorts as you undress and give the clothes to the tailor for adjustment. The tailor is fast and only takes fifteen minutes until your clothes are ready.'
  25. 'You are handed your clothes back and quickly get dressed. You''re pleased with the job that the tailor has done.'
  26. end
  27. act 'Leave': minut += 5 & gt 'pavIndustrial'
  28. end
  29. act 'Resize your other clothes':gt 'clothing', 'view_clothing_list', 'resize'
  30. act 'Resize all your clothes':gt 'portnoi2'
  31. end
  32. end
  33. if $ARGS[0] = 'enter':
  34. CLOSE ALL
  35. *clr & cla
  36. $metka = 'tailor'
  37. $loc = 'Gshveyfab'
  38. $menu_loc = 'Gshveyfab'
  39. $menu_arg = 'enter'
  40. menu_off = 0
  41. gs'stat'
  42. '<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
  43. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/factory/gshveyfab.jpg" ></center>'
  44. 'You''re standing inside the building that is accommodating the biggest employer in Pavlovsk, the local textile factory.'
  45. 'There is a work schedule hanging on the wall:'
  46. 'First shift - 08:00 to 16:00.'
  47. 'Second shift - 16:00 to 20:00.'
  48. *nl
  49. if workFabrika = 0 and age >= 16 and age < 18:'You can apply for a <a href="exec:minut += 15 & gt ''Gshveyfab'', ''job_start''">part-time job</a> here.'
  50. if work = 0 and workFabrika = 0 and age >= 18:'You can apply for a <a href="exec:minut += 15 & gt ''Gshveyfab'', ''job_start''">full-time job</a> here.'
  51. act 'Leave': minut += 5 & gt 'pavIndustrial'
  52. if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 8 and hour < 9 and age >= 18:
  53. 'Your shift is starting now.'
  54. act 'Start shift': gt'Gshveyfab','job'
  55. end
  56. if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 16 and hour < 17 and age >= 16 and age < 18:
  57. 'Your shift is starting now.'
  58. act 'Start shift': gt'Gshveyfab','job'
  59. end
  60. if workFabrika = 1:
  61. 'You can quit your job, but quitting will lead to a deducted wage.'
  62. act 'Quit job':
  63. menu_off = 1
  64. if age >= 16 and age < 18:
  65. smenaFabrika -= 1
  66. elseif age >= 18:
  67. smenaFabrika -= 2
  68. end
  69. if smenaFabrika < 0:
  70. smenaFabrika = 0
  71. end
  72. pay = smenaFabrika * 420
  73. karta += pay
  74. smenaFabrika = 0
  75. workFabrika = 0
  76. work = 0
  77. minut += 5
  78. gt 'Gshveyfab','enter'
  79. end
  80. end
  81. end
  82. if $ARGS[0] = 'job_start':
  83. *clr & cla
  84. $metka = 'tailor'
  85. $loc = 'Gshveyfab'
  86. $menu_loc = 'Gshveyfab'
  87. $menu_arg = 'job_start'
  88. menu_off = 0
  89. gs'stat'
  90. '<center><B>FOREMAN''S OFFICE</B></center>'
  91. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/stepan/nachalnik.jpg" ></center>'
  92. 'You head into the factory foreman, Stepan Sergeyevich office, and ask him if there''s an available job.'
  93. act 'Leave': gt'Gshveyfab', 'enter'
  94. if age >= 16 and age < 18 and workFabrika = 0:
  95. '"Sure, have a seat," he says. "Now, the work is difficult and meticulous, but doesn''t require any special knowledge. You should catch on pretty quick. Since you are not an adult yet, you can only work half-time, and the pay is 105 <b>₽</b> per hour. Once you become an adult, we can transfer you to full-time. Naturally, as this is a state-recognized company, we do require all the appropriate documentation. The main shift is on weekdays from 08:00 to 16:00, but you will be working the second shift, from 16:00 to 20:00.'
  96. 'But beware, if you miss more than three days of work in a single month, you will be fired. You will be paid at the end of the month and getting fired before then will forfeit any pay not yet received. So, is that okay?"'
  97. act 'Accept the job':
  98. cla
  99. menu_off = 1
  100. minut += 10
  101. work = 1
  102. workFabrika = 1
  103. smenaFabrika = 0
  104. FabrikaProgul = 0
  105. 'You hand him over your documents, which he takes and then reminds you to come in on every weekday, at 16:00.'
  106. act 'Leave': gt'Gshveyfab', 'enter'
  107. end
  108. elseif age >= 18 and workFabrika = 0:
  109. '"Sure, have a seat," he says. "Now, the work is difficult and meticulous, but doesn''t require any special knowledge. You should catch on pretty quick. Naturally, as this is a state-recognized company, we do require all the appropriate documentation. The main shift is on weekdays from 08:00 to 16:00, and the pay is 105 <b>₽</b> per hour.'
  110. 'But beware, if you miss more than three days of work in a single month, you will be fired. You will be paid at the end of the month, and getting fired before then will forfeit any pay not yet received. So, is that okay?"'
  111. act 'Accept the job':
  112. cla
  113. menu_off = 1
  114. minut += 10
  115. work = 1
  116. workFabrika = 1
  117. smenaFabrika = 0
  118. FabrikaProgul = 0
  119. 'You hand him your documents, which he takes and then reminds you to come in on every weekday, at 08:00.'
  120. act 'Leave': gt'Gshveyfab', 'enter'
  121. end
  122. end
  123. end
  124. if $ARGS[0] = 'job':
  125. *clr & cla
  126. menu_off = 1
  127. FabrikaProgul -= 1
  128. if FabrikaProgul < 0: FabrikaProgul = 0
  129. if age >= 16 and age < 18:
  130. minut += 240
  131. smenaFabrika += 1
  132. end
  133. if age >= 18:
  134. minut += 480
  135. smenaFabrika += 2
  136. end
  137. gs'stat'
  138. '<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
  139. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/factory/gshveyfab.jpg" ></center>'
  140. 'You work hard throughout your shift at the factory. The foreman has you running all over the factory performing all type of tasks. You barely even have time to rest during the shift.'
  141. act 'Leave': minut += 5 & gt 'pavIndustrial'
  142. end
  143. --- Gshveyfab ---------------------------------