pav_factory.qsrc 6.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171
  1. # pav_factory
  2. !2021/05/08
  3. CLOSE ALL
  4. $location_type = 'public_indoors'
  5. if $ARGS[0] = 'tailor':
  6. *clr & cla
  7. $loc_arg = 'tailor'
  8. $loc = 'pav_factory'
  9. $menu_loc = 'pav_factory'
  10. $menu_arg = 'tailor'
  11. menu_off = 0
  12. gs'stat'
  13. 'There is a small wooden counter and above that a sign that says "If you can''t wear it we''ll adjust it"'
  14. 'Behind the counter an elderly man is inspecting some repaired clothes, he stops and smiles gently, greeting you.'
  15. '"Hello there young lady, do you want to adjust some of your clothing? It''ll cost you 500 <b>₽</b> per item."'
  16. act 'Leave': gt 'pav_industrial'
  17. if money >= 500:
  18. act 'Resize the clothes you''re wearing (500 <b>₽</b>)':
  19. *clr & cla
  20. if CloStyle = 5 or $clothingworntype = 'danilovich_outfits':
  21. '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..."'
  22. elseif dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') = pcs_hips:
  23. 'The tailor is looking irritatingly at you, "Is this joke? Your clothes could not fit you better if they had been made for you. I have no time for such foolishness."'
  24. elseif (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') > pcs_hips + 4) or (dyneval('RESULT = <<$clothingworntype>>_b[<<clothingwornnumber>>]') < pcs_hips - 4):
  25. 'The tailor is looking irritatingly at you, "Why are you wasting my time? Your clothing does not need to be resized. It might not be perfect but it is still fine."'
  26. else
  27. minut += 10
  28. money -= 500
  29. gs 'stat'
  30. dynamic '<<$clothingworntype>>_b[<<clothingwornnumber>>] = pcs_hips'
  31. 'You are handed a t-shirt and shorts as you undress and give the clothes to the tailor for adjustment.'
  32. 'He quickly measures your waist and hips, then only takes a few minutes to adjust your outfit.'
  33. 'You are handed your clothes back and quickly get dressed. You''re pleased with the job that the tailor has done.'
  34. end
  35. act 'Continue': gt 'pav_factory', 'tailor'
  36. end
  37. act 'Resize your other clothes':gt 'clothing', 'view_clothing_list', 'resize'
  38. act 'Resize all your clothes':gt 'portnoi2'
  39. end
  40. end
  41. if $ARGS[0] = 'enter':
  42. *clr & cla
  43. $loc_arg = 'tailor'
  44. $loc = 'pav_factory'
  45. $menu_loc = 'pav_factory'
  46. $menu_arg = 'enter'
  47. menu_off = 0
  48. gs'stat'
  49. '<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
  50. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/factory/pav_factory.jpg" ></center>'
  51. 'You''re standing inside the building that is accommodating the biggest employer in Pavlovsk, the local textile factory.'
  52. 'There is a work schedule hanging on the wall:'
  53. 'First shift - 08:00 to 16:00.'
  54. 'Second shift - 16:00 to 20:00.'
  55. *nl
  56. if workFabrika = 0 and age < 18:'You can apply for a <a href="exec:minut += 15 & gt ''pav_factory'', ''job_start''">part-time job</a> here.'
  57. if work = 0 and workFabrika = 0 and age >= 18:'You can apply for a <a href="exec:minut += 15 & gt ''pav_factory'', ''job_start''">full-time job</a> here.'
  58. act 'Leave': minut += 5 & gt 'pav_industrial'
  59. if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 8 and hour < 9 and age >= 18:
  60. 'Your shift is starting now.'
  61. act 'Start shift': gt'pav_factory','job'
  62. end
  63. if workFabrika = 1 and week >= 1 and week <= 5 and hour >= 16 and hour < 17 and age < 18:
  64. 'Your shift is starting now.'
  65. act 'Start shift': gt'pav_factory','job'
  66. end
  67. if workFabrika = 1:
  68. 'You can quit your job, but quitting will lead to a deducted wage.'
  69. act 'Quit job':
  70. menu_off = 1
  71. if age < 18:
  72. smenaFabrika -= 1
  73. elseif age >= 18:
  74. smenaFabrika -= 2
  75. end
  76. if smenaFabrika < 0:
  77. smenaFabrika = 0
  78. end
  79. pay = smenaFabrika * 600
  80. karta += pay
  81. smenaFabrika = 0
  82. workFabrika = 0
  83. work = 0
  84. minut += 5
  85. gt 'pav_factory','enter'
  86. end
  87. end
  88. end
  89. if $ARGS[0] = 'job_start':
  90. *clr & cla
  91. $loc_arg = 'tailor'
  92. $loc = 'pav_factory'
  93. $menu_loc = 'pav_factory'
  94. $menu_arg = 'job_start'
  95. menu_off = 0
  96. gs'stat'
  97. '<center><B>FOREMAN''S OFFICE</B></center>'
  98. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/stepan/nachalnik.jpg" ></center>'
  99. 'You head into the factory foreman, Stepan Sergeyevich office, and ask him if there''s an available job.'
  100. act 'Leave': gt'pav_factory', 'enter'
  101. if age < 18 and workFabrika = 0:
  102. '"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 150 <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.'
  103. '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?"'
  104. act 'Accept the job':
  105. cla
  106. menu_off = 1
  107. minut += 10
  108. work = 1
  109. workFabrika = 1
  110. smenaFabrika = 0
  111. FabrikaProgul = 0
  112. 'You hand him over your documents, which he takes and then reminds you to come in on every weekday, at 16:00.'
  113. act 'Leave': gt'pav_factory', 'enter'
  114. end
  115. elseif age >= 18 and workFabrika = 0:
  116. '"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.'
  117. '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?"'
  118. act 'Accept the job':
  119. cla
  120. menu_off = 1
  121. minut += 10
  122. work = 1
  123. workFabrika = 1
  124. smenaFabrika = 0
  125. FabrikaProgul = 0
  126. 'You hand him your documents, which he takes and then reminds you to come in on every weekday, at 08:00.'
  127. act 'Leave': gt'pav_factory', 'enter'
  128. end
  129. end
  130. end
  131. if $ARGS[0] = 'job':
  132. *clr & cla
  133. menu_off = 1
  134. FabrikaProgul -= 1
  135. if FabrikaProgul < 0: FabrikaProgul = 0
  136. if age < 18:
  137. minut += 240
  138. smenaFabrika += 1
  139. end
  140. if age >= 18:
  141. minut += 480
  142. smenaFabrika += 2
  143. end
  144. gs'stat'
  145. '<center><B>TEXTILE FACTORY, PARIS COMMUNE</B></center>'
  146. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/factory/pav_factory.jpg" ></center>'
  147. '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.'
  148. act 'Leave': minut += 5 & gt 'pav_industrial'
  149. end
  150. --- pav_factory ---------------------------------