1
0

Gshveyfab 5.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158
  1. # Gshveyfab
  2. $metka = $ARGS[0]
  3. $loc = $CURLOC
  4. if $ARGS[0] = 'start':
  5. cla
  6. *clr
  7. minut += 10
  8. gs'stat'
  9. '<center><B>Garment factory named."Paris Commune"</B></center>'
  10. '<center><img src="images/pic/Gshveyfab.jpg"></center>'
  11. 'Local garment factory, one of the few companies in Pavlovsk. It makes clothing for G & M stores and there is a branch opposite, which is open from 8:00-20:00 Monday - Friday.'
  12. if hour => 8 and hour =< 20 and week => 1 and week <= 5:
  13. 'Near <a href="exec:minut += 15 & GT ''Gshveyfab'', ''enter''">the front door</a> is communicating factory which sits protection.'
  14. elseif hour < 8 or hour > 20 or week > 5:
  15. 'Checkpoint factory is now closed.'
  16. 'Working days Mon-Fri:'
  17. 'First change - with 8 to 16 hours.'
  18. 'Second shift - with 16 to 20 hours.'
  19. end
  20. if week < 6 and hour >= 8 and hour <= 20:
  21. *p '<a href="exec:torg = 0 & GT ''budgetclothes'',''start''">G&M Store</a>'
  22. else
  23. *p 'G&M Store is currently closed.'
  24. end
  25. if hour >= 8 and hour <= 15:
  26. 'A small room near the entrance is being used as a tailor shop.'
  27. act 'Go to the tailor':
  28. cla
  29. *clr
  30. 'An elderly man is inspecting finished garments fresh from the factory floor, he pulls his glasses down a little and looking over the top of them walks up to the desk.'
  31. '"Hello there, come to get some clothes adjusted? It''ll cost you 500 <b>₽</b> per item."'
  32. if money >= 500:
  33. act 'Take in the clothes you are wearing (500 <b>₽</b>)':
  34. cla
  35. *clr
  36. minut += 15
  37. if CloStyle = 5 or $clothingworntype = 'exercise':
  38. 'What are you wasting my time for? This type of clothing does not need to be resized.'
  39. else
  40. money -= 500
  41. dynamic '<<$clothingworntype>>B[<<clothingwornnumber>>] = bedra'
  42. 'You undress and give the clothes you need adjusting to the tailor, it is fifteen minutes until your clothes are ready. you redress.'
  43. end
  44. act 'Leave':gt 'Gshveyfab', 'start'
  45. end
  46. act 'Take in different clothes':gt 'clothing', 'view_clothing_list', 'resize'
  47. act 'Take in all the clothes':gt 'portnoi2'
  48. end
  49. act 'Leave':gt 'Gshveyfab', 'start'
  50. end
  51. end
  52. act 'Go to the residential area':gt'pavResidential'
  53. act 'Go to the high street':gt'pavCommercial'
  54. end
  55. if $ARGS[0] = 'enter':
  56. CLOSE ALL
  57. cla
  58. *clr
  59. minut += 2
  60. gs'stat'
  61. '<center><B>Garment factory named."Paris Commune"</B></center>'
  62. '<center><img src="images/qwest/alter/fabrika/pusto.jpg" ></center>'
  63. 'Local garment factory, one of the core enterprises of your Pavlovsk.'
  64. 'On the wall hangs a work schedule:'
  65. 'First change - with 8 to 16 hours.'
  66. 'Second shift - with 16 to 20 hours.'
  67. ''
  68. if workFabrika = 0 and age => 16 and age < 18:'You can get a floor on rates <a href="exec:minut += 15 & GT ''Gshveyfab'', ''job_start''">work</a>.'
  69. if work = 0 and workFabrika = 0 and age => 18:'You can get a <a href="exec:minut += 15 & GT ''Gshveyfab'', ''job_start''">work</a>.'
  70. if workFabrika = 1 and week => 1 and week <= 5 and hour = 8 or workFabrika = 1 and week => 1 and week <= 5 and hour = 16 and age => 16 and age < 18:
  71. 'You can go to change.'
  72. act 'Exit replaced': gt'Gshveyfab','job'
  73. end
  74. if workFabrika = 1 and week => 1 and week <= 5 and hour = 8 or workFabrika = 1 and week => 1 and week <= 5 and hour = 16 and age => 18:
  75. 'You can go to change.'
  76. act 'Exit replaced': gt'Gshveyfab','job'
  77. end
  78. if workFabrika = 1:
  79. 'You can retire from work without pay waste changes'
  80. act 'Dismissed':workFabrika = 0 & work = 0 & gt 'Gshveyfab','enter'
  81. end
  82. act '<B>Escape</B>':gt'Gshveyfab','start'
  83. end
  84. if $ARGS[0] = 'job_start':
  85. cla
  86. *clr
  87. minut += 2
  88. gs'stat'
  89. '<center><B>Cabinet chief of department</B></center>'
  90. '<center><img src="images/qwest/alter/fabrika/nachalnik.jpg" ></center>'
  91. ''
  92. 'You go to Stepan Sergeevich, Chief shop and ask for a job.'
  93. if age => 16 and age < 18 and workFabrika = 0:
  94. '- Of course, sit down. The work is not easy and meticulously. No special knowledge is not necessary, in place will deal with all. Because you are not yet an adult, it can work only half of the day for half rate, this 200 <b>₽</b> per shift. Pozvrosleesh - Translated to the full. Naturally, we only official trudoustrostvo, all documents. Usual we change on weekdays 8 to 16, but you will part with 16 to 20. If you rack up more than three absences in a month, then you get fired. Well, suits?'
  95. act 'Apply for job':
  96. cla
  97. work = 1
  98. workFabrika = 1
  99. smenaFabrika = 0
  100. FabrikaProgul = 0
  101. 'You gave Stepan Sergeyevich work book. He took it and remind you: - Come in on weekdays 16 hours.'
  102. act 'Move away':gt'Gshveyfab', 'enter'
  103. end
  104. elseif age => 18 and workFabrika = 0:
  105. '- Of course, sit down. The work is not easy and meticulously. No special knowledge is not necessary, in place will deal with all. Naturally, we only official trudoustrostvo, all documents. Usual we change on weekdays 8 to 16, 400 <b>₽</b> per shift. If you rack up more than three absences in a month, then you get fired. Well, suits?'
  106. act 'Apply for job':
  107. cla
  108. work = 1
  109. workFabrika = 1
  110. smenaFabrika = 0
  111. FabrikaProgul = 0
  112. 'You gave Stepan Sergeyevich work book. He took it and remind you: - Come in on weekdays 8 hours.'
  113. act 'Move away':gt'Gshveyfab', 'enter'
  114. end
  115. end
  116. act 'Move away':gt'Gshveyfab', 'enter'
  117. end
  118. if $ARGS[0] = 'job':
  119. cla
  120. *clr
  121. FabrikaProgul -= 1
  122. if FabrikaProgul < 0: FabrikaProgul = 0
  123. if age => 16 and age < 18:
  124. smenaFabrika += 1
  125. hour = 20
  126. end
  127. if age => 18:
  128. smenaFabrika += 2
  129. hour = 16
  130. end
  131. gs'stat'
  132. '<center><B>Garment factory named."Paris Commune"</B></center>'
  133. '<center><img src="images/qwest/alter/fabrika/smena.jpg" ></center>'
  134. ''
  135. 'You practice his shift at the factory.'
  136. act 'Go to the residential area':gt'pavResidential'
  137. act 'Go to the high street':gt'pavCommercial'
  138. end
  139. --- Gshveyfab ---------------------------------