1
0

pavtrain.qsrc 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187
  1. # pavtrain
  2. $loc = 'pavtrain'
  3. $metka = ''
  4. $menu_loc = 'pavtrain'
  5. $menu_arg = ''
  6. menu_off = 0
  7. $location_type = 'public_outdoors'
  8. CLOSE ALL
  9. if sound = 0:
  10. if month >=11 and month <= 12 or month >=1 and month <=3:
  11. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/zima.mp3',30
  12. if hour >= 0 and hour <= 7: PLAY 'sound/street_night.mp3',30 & PLAY 'sound/zima.mp3',30
  13. else
  14. if hour >= 8 and hour <= 23: PLAY 'sound/street2.mp3',30 & PLAY 'sound/street_leto.mp3',30
  15. if hour >= 0 and hour <= 7:PLAY 'sound/street_night.mp3',30
  16. end
  17. end
  18. clr
  19. gs 'stat'
  20. '<center><h2>Pavlovsk''s train station</h2></center>'
  21. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  22. *nl
  23. 'Pavlovsk''s modest train station. You can enter the central hall of the <a href="exec:minut += 3 & gt ''pavtrainhall''">train station</a>. Attached to the train station is the <a href="exec:minut += 5 & gt ''gkafe''">Borislav''s cafe</a>' + iif(storyline = 1,' where your mother works','') + '. Also nearby is the small <a href="exec:minut += 3 & gt ''pavstation'', ''station_outside''">police station</a> of Pavlovsk. '
  24. *nl
  25. 'The front of the train station has a large square, where you can find a <a href="exec:minut += 1 & gt ''pavtrain_market'', ''start''">market</a> on most days.'
  26. *nl
  27. 'A rather run-down <a href="exec:minut += 1 & gt ''HotelHole''">hotel</a> is just across the square, where travelers can spend the night. The manager is always looking for maids among the local young girls. Because of it''s frequent use by the local prostitutes, most people prefer to stay at the middle-class hotel by the main road.'
  28. if dimaRevChoice = 5 and dimaRevenge = 4 and dimaTrain = 0: gt 'dimaRevenge', dimaRevenge
  29. if kidaloa = 0:
  30. podrand = rand(0, 5)
  31. if money >= 5000 and hour >= 8 and hour <= 20 and podrand = 0 and monthKidalo ! month:
  32. *clr & cla
  33. menu_off = 1
  34. monthKidalo = month
  35. gs 'stat'
  36. '<center><h4>Pavlovsk''s train station</h4></center>'
  37. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  38. 'When you arrive at the train station, it''s impossible to not notice a girl holding a microphone and a man following her with a large camera. They''re coming straight towards you. The girl beckons you to come closer and glances over at towards the man holding the camera, who gives her a subtle nod.'
  39. 'She turns back to you and happily exclaims: "Hello! We''re shooting a pilot for TV. It''s going to be a novel program: it is a show in which we hand out gifts to random strangers, and then film their response. It''s called "Happiness in Russia", we''re hoping it will catch on all over the world. We have chosen you to be part of our pilot, congratulations!"'
  40. 'She grabs hold of a large box the camera man handed to her. It''s beautifully wrapped, with a nice bow to boot. She whispers to you: "This box contains a brand new laptop! Just act surprised when you open it!"'
  41. act 'Say you have no time':
  42. *clr & cla
  43. gs 'stat'
  44. kidaloa = 1
  45. '<center><h4>Pavlovsk''s train station</h4></center>'
  46. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  47. 'Even though you definitely wouldn''t mind a new laptop, you simply don''t have time to talk to them right now. You politely decline and walk away before they can protest. A few minutes later you see the two of them hastily running across the square, while some poor guy opens the fancily packed box only to find a brick in it. By the time he realizes he got scammed, they are long gone. Looks like you dodged a bullet there!'
  48. act 'Return to the station' :minut += 15 & gt $curloc
  49. end
  50. act 'Wow, this must be your lucky day!':
  51. *clr & cla
  52. gs 'stat'
  53. '<center><h4>Pavlovsk''s train station</h4></center>'
  54. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  55. 'You happily take the box from the girl''s hands as the man starts filming. The girl holds the microphone closer to her mouth, and invites you to give some shout-outs to relatives and friends while you''re on TV. Then she points the microphone at you. You gladly accept the invitation and address your friends and family enthusiastically while looking at the camera, sincerely hoping you did not leave anyone out. Then the man turns the camera away for a second.'
  56. 'The girl tells you: "Unfortunately, the government doesn''t just let us give away items for nothing. We''re legally obligated to have our winners pay VAT over the amount of money their gift is worth. In your case, this comes down to 5000 <b>₽</b>."'
  57. act 'Pay the VAT and check out your new laptop':
  58. *clr & cla
  59. money -= 5000
  60. kidaloa = 1
  61. if pcs_mood > 5: pcs_mood = 5
  62. gs 'stat'
  63. '<center><h4>Pavlovsk''s train station</h4></center>'
  64. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  65. 'You quickly give them the money and enthusiastically begin to pull at the bow. When you finally manage to tear the wrapping paper off and open the box, you only find a brick wrapped in newspaper. You look up trying to find the man and girl to get your money back, but they are nowhere to be found. You feel terrible for being scammed out of your money, and angrily stuff the box in a garbage can before you move on.'
  66. act 'Return to the train station':minut += 15 & gt $curloc
  67. end
  68. act 'Say you can''t afford it right now':
  69. *clr & cla
  70. gs 'stat'
  71. '<center><h4>Pavlovsk''s train station</h4></center>'
  72. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  73. 'With some regret in your voice, you apologize to the man and girl and explain that you can''t afford to pay the VAT right now. They try to explain to you that this could very well be a one-time opportunity and that you are missing out on a free laptop, but you have to decline. You simply cannot afford to spend the money you have right now on a frivolous purchase like a laptop, even if it comes really cheap.'
  74. 'Sympathizing with you, they promise to look for you if they ever come back to Pavlovsk for another episode of the show.'
  75. act 'Thank them and leave': minut +=15 & gt $curloc
  76. end
  77. end
  78. exit
  79. end
  80. end
  81. if kidalob = 0:
  82. podrand = rand(0, 5)
  83. if money >= 1000 and hour >= 8 and hour <= 20 and podrand = 5 and ($clothingworntype = 'formal' or $clothingworntype = 'expensive') and monthKidalo ! month:
  84. *clr & cla
  85. menu_off = 1
  86. monthKidalo = month
  87. minut += 5
  88. gs 'stat'
  89. '<center><h4>Pavlovsk''s train station</h4></center>'
  90. '<center><img <<$set_imgh>> src="images/locations/shared/train/vokzalg.jpg"></center>'
  91. 'As you walk across the square towards the station, you notice two well dressed men staring at you. After some brief consideration they come towards you, and you can just about hear what they''re saying: "Wow, she''s just the model we need. She has this... Claudia Schiffer feel to her, don''t you agree?"'
  92. 'You can see the other man nod just as they get close to you, and one of the men stops you: "Excuse me, miss. We are opening a new fashion store in the city and are looking for a model to feature in our advertisements. We have been looking for just the right girl all day and... I think we just found her!"'
  93. 'The second man nods enthusiastically as the first man continues: "We would be able to offer you 10.000 <b>₽</b> for an extensive photo shoot, featuring our clothing line."'
  94. gs 'willpower', 'misc', 'resist', 'medium'
  95. if will_cost <= pcs_willpwr:
  96. act 'You''re not interested (<<will_cost>> Willpower)':
  97. *clr & cla
  98. gs 'willpower', 'pay', 'resist'
  99. gs 'stat'
  100. gt $curloc
  101. end
  102. else
  103. act 'You''re not interested (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  104. end
  105. act 'Agree to do the photo shoot':
  106. *clr & cla
  107. minut += 2
  108. gs 'stat'
  109. 'Wow, this offer sounds amazing! There is no way you can decline. The guys take you to the back of the railway station, and the guy who hasn''t said anything to you pulls out an expensive looking camera, mounting it on a tripod near some trees.'
  110. 'The first guy approaches you and says: "The shoot will be against a natural background. We''ve done market research, and have determined that the picturesque background of the outdoors is by far the most desirable option for our campaign. There is only one problem... your dress is not what we are looking for at all. You''ll have to change."'
  111. 'The guy opens the trunk of his car and gives you a rather cheap looking sundress. "You can change your clothes inside the car, no one will notice", he says.'
  112. gs 'willpower', 'exhib', 'resist', 'medium'
  113. if will_cost <= pcs_willpwr:
  114. act 'Refuse and leave, you''re not taking off your clothes! (<<will_cost>> Willpower)':
  115. *clr & cla
  116. gs 'willpower', 'pay', 'resist'
  117. gs 'stat'
  118. gt $curloc
  119. end
  120. else
  121. act 'Refuse and leave, you''re not taking off your clothes!(<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  122. end
  123. act 'Change into the sundress':
  124. *clr & cla
  125. !! ths will either add the sundress or simply set it to a certain damage level
  126. dynamic '<<$clothingworntype>>[<<clothingwornnumber>>] = 0'
  127. dynamic '<<$clothingworntype>>H[<<clothingwornnumber>>] = 0'
  128. dynamic '<<$clothingworntype>>S[<<clothingwornnumber>>] = 0'
  129. cheap[52] = 1
  130. cheapH[52] = 20
  131. cheapB[52] = pcs_hips
  132. cheapS[52] = 0
  133. minut += 10
  134. gs 'clothing', 'wear', 'cheap', 52
  135. KILLVAR '$lastwornclothingtype'
  136. KILLVAR 'lastwornclothingnumber'
  137. gs 'stat'
  138. 'You quickly get into the car and take off your dress, and put on the dress the man gave you. You give your <<$titsize>> breasts a squeeze through the fabric, adjusting the dress a bit so it fits well around them for the photo shoot.'
  139. act 'Pose for the camera':
  140. *clr & cla
  141. kidalob = 1
  142. minut += 5
  143. gs 'stat'
  144. 'You get out of the car leaving your possessions in there, figuring it''s easier to just collect them when you change back to your regular clothes. You get out and walk to the tree the camera is aimed at. The guy who hasn''t said a word mans the camera, while the first guy instructs you how to stand in several poses. "Very nice, very nice... now turn your back to the camera!" The camera clicks several times. "Excellent. Now tilt your head backwards and close your eyes." You do as instructed, waiting for the now familiar click of the camera. It never comes.'
  145. act 'Ask what''s taking so long':
  146. *clr & cla
  147. money = 0
  148. minut += 5
  149. if pcs_mood > 50: pcs_mood = 50
  150. gs 'stat'
  151. 'After a while you turn around and open your eyes, wanting to ask the guys what''s taking so long. You open your eyes right on time to see the car, with the guys in it, speed off and zip around a corner. Then you realize: all your stuff is still on the back seat of the car! Slowly realizing you have just been scammed out of your good dress and all of your money, you sit down on a tree stump and hold your head in your hands for a minute or two, pondering how you could''ve been so stupid as to believe them.'
  152. act 'Return to the train station':gt $curloc
  153. end
  154. end
  155. end
  156. end
  157. exit
  158. end
  159. end
  160. gs 'family'
  161. act 'Walk to the Commercial area (0:10)':minut += 10 & gt 'pav_commercial'
  162. act 'Walk to the highway (0:15)':minut += 15 & nroad = 20 & gt 'road'
  163. act 'Walk to the Old Town (0:15)':minut += 15 & nroad = 19 & gt 'liam'
  164. act 'Enter the station building': minut += 3 & gt 'pavtrainhall'
  165. --- pavtrain ---------------------------------