1
0

salon.qsrc 36 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765
  1. # salon
  2. $location_type = 'public_indoors'
  3. if $ARGS[0] = 'start':
  4. gs 'family_schedule'
  5. if momloc = 15 and momloc[11] ! daystart: gt 'salon', 'mom'
  6. $sexloc = $CURLOC
  7. if week = 1 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
  8. if week = 3 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
  9. if week = 5 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
  10. cla & *clr
  11. $menu_loc = 'salon'
  12. $menu_arg = 'start'
  13. menu_off = 0
  14. salonrand = rand(0, 9)
  15. gs 'stat'
  16. gs 'themes', 'indoors'
  17. '<center><b><font color="maroon">Beauty Bar</font></b></center>'
  18. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/salon.jpg"></center>'
  19. 'Approach the <a href="exec:gt ''salon'', ''1''">beauty technician.</a>'
  20. 'See the <a href="exec:gt ''salon'', ''resnici''">eyelash specialist.</a>'
  21. if money >= 1000:
  22. '<a href="exec:gt ''salon'', ''solyariy''">Solarium - 1,000 <b>₽</b></a>'
  23. else
  24. 'Solarium - 1,000 <b>₽</b>'
  25. end
  26. if money >= 2500:
  27. '<a href="exec:gt ''salon'', ''ozdormas''">Wellness massage (accelerates fat loss and rejuvenates the body), 2,500 <b>₽</b></a>'
  28. else
  29. 'Lengthening eyelashes - 5,000 <b>₽</b>'
  30. 'Wellness massage (accelerates fat loss and rejuvenates the body), 2,500 <b>₽</b>'
  31. end
  32. if pcs_pubes <= 20:
  33. 'Dye your pubic hair - 500 <b>₽</b> (Your pubic hair is too short to dye)'
  34. else
  35. if money >= 500:'<a href="exec:gt ''salon'', ''pubes''">Dye your pubic hair - 500 <b>₽</b></a>'
  36. if money < 500:'Dye your pubic hair - 500 <b>₽</b>'
  37. end
  38. if money >= 2000 and lashair = 0:'<a href="exec:gt ''salon'', ''epilyaciya''">Full body depilation - 2,000 <b>₽</b></a>'
  39. if money < 2000 or lashair = 1:'Full body depilation - 2,000 <b>₽</b>'
  40. if money >= 5000:'<a href="exec:gt ''salon'', ''uhodkosha''">Skin Care - 5,000 <b>₽</b></a>'
  41. if money < 5000:'Skin Care - 5,000 <b>₽</b>'
  42. if money >= 25000:'<a href="exec:gt ''salon'', ''omoloshenie''">Full body skin rejuvenation - 25,000 <b>₽</b></a>'
  43. if money < 25000:'Rejuvenation - 25,000 <b>₽</b>'
  44. if hour < 8 or hour > 20:
  45. cls
  46. 'As the salon closes you are politely asked to leave but please come again soon.'
  47. act 'Leave':minut += 3 & gt 'torgcentr'
  48. exit
  49. end
  50. act 'Leave':minut += 3 & gt 'torgcentr'
  51. end
  52. if $ARGS[0] = 'mom':
  53. *clr & cla
  54. menu_off = 1
  55. gs'stat'
  56. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/salon.jpg"></center>'
  57. 'As you enter the salon you see you <<$npc_nickname[''A29'']>> waiting with your Aunt Luda. They haven''t seen you yet, they seem to just be chatting as they wait for their turn. The place seems to be fairly busy today.'
  58. act 'Ignore them and leave':gt 'torgcentr'
  59. act 'Go talk to them':
  60. *clr & cla
  61. minut += 5
  62. gs'stat'
  63. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/momsalon.jpg"></center>'
  64. 'You walk over to your <<$npc_nickname[''A29'']>> and Luda. "Hi <<$npc_nickname[''A29'']>>, Luda. You guys getting your hair cut?"'
  65. 'Your <<$npc_nickname[''A29'']>> looks up at you and seems a little surprised to see you. "Yes and we are going to get a manicure as well, you should join us. I''ll pay."'
  66. 'Luda speaks up as well. "Yes dear you should join us." Just then your <<$npc_nickname[''A29'']>> name is called and she gets up and takes a seat to get her hair styled. A free manicure would be nice, but that also means having to spend time with them and listening to them talk about boring stuff.'
  67. act 'Tell her you''re busy':
  68. *clr & cla
  69. npc_rel['A29'] -= 1
  70. minut += 5
  71. gs'stat'
  72. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/salon.jpg"></center>'
  73. 'You shakes your head. "Sorry I can''t, I already have plans."'
  74. 'Your <<$npc_nickname[''A29'']>> sighs a little, obviously disappointed. "Well ok then, don''t stay out to late." You tell them bye and the say the same back to you, With that her and Luda go back to talking again as you leave.'
  75. act 'Leave':gt 'torgcentr'
  76. end
  77. act 'Agree':
  78. *clr & cla
  79. npc_rel['A29'] += 1
  80. npc_rel['A30'] += 1
  81. momloc[11] = daystart
  82. minut += 20
  83. gs'stat'
  84. '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/momsvetsalon.jpg"></center>'
  85. 'You sit down next to Luda but only for a moment when her name is called and she gets up and gets her hair done. Next they are both taken to have a manicure done and you are called over to join them. The three of you sit near each other as you get manicures. Luda and your mom talk about a variety of topics, mostly gossip about what''s going on in Pavlovsk of the people they both know or stories about what happened at their work.'
  86. 'You chime in occasionally telling them about some stuff you have been up to of late. All and all it is a surprisingly fun time and you got a nice manicure out of it. Once you are finished, your <<$npc_nickname[''A29'']>> pays for both of you and Luda pays for herself. You all walk out together, Luda says. "Well I should get back and make dinner for me and Olu."'
  87. 'You <<$npc_nickname[''A29'']>> and Luda share a brief hug. "Same here, Vlad wouldn''t know what to do and would likely starve if I don''t get dinner started soon." The both laugh at that, Luda tells you bye as she walks off and your mothers starts for home as well, as she says to you. "Diner will be ready in about half a hour, you should come home and join us." You tell her you might and with that she walks off as well.'
  88. act 'Leave':gt 'torgcentr'
  89. end
  90. end
  91. end
  92. if $ARGS[0] = 'solyariy':
  93. cla & *clr
  94. minut += 60
  95. pcs_tan += 10
  96. inhib_exp += rand(1,5)
  97. money -= 1000
  98. if salonrand > 6 and npc_QW['A192'] > 2:gt 'etoexhib', 'pos1'
  99. if salonrand = 0 and masha = 0:gt 'salon', '0'
  100. gs 'stat'
  101. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/solarium.jpg"></center>'
  102. 'You take off your clothes and get in the tanning booth.'
  103. act 'Leave':gt 'salon', 'start'
  104. end
  105. if $ARGS[0] = 'resnici':
  106. 'You are met by a young, dolled-up woman who explains the various lash treatments she can perform:'
  107. '"Well," she says, "I can put on temporary false lashes for you if you''re just going out for the night; you''ll look great, but they won''t last much longer than that."'
  108. 'She motions over to a small display of stacked boxes, "I can also, if you want a more permanent solution, treat your lashes to help stimulate their growth, but you won''t get the kind of dramatic results you get from falsies."'
  109. '"There''s also lash extensions," she explains, "with those we bond either two, four, or six individual lashes to each of your own for what can be a truly dramatic, always-on look. It''s very glam, but they''re expensive and you will have to keep up maintenance on them by coming in regularly."'
  110. '"I guess I could also manually remove your eyelash extensions if you ever needed me to," she muses, but seems to hesitate before saying, "but.. I really wouldn''t recommend it. Better to let them grow out naturally."'
  111. if money >= 5000 and pcs_naturallashes < 2:
  112. '<a href="exec:gt ''salon'', ''lashTreatment''">Eyelash growth treatment</a> - 5000<b> ₽</b>'
  113. else
  114. 'Eyelash growth treatment - 5000<b> ₽</b>'
  115. end
  116. if money >= 500 and pcs_lashes < 3 and false_lashes <= 0:
  117. '<a href="exec:lashfalsiesstyle = 1 & gt ''salon'', ''lashFalsies''">Simple false lashes</a> - 500<b> ₽</b>'
  118. else
  119. 'Simple false lashes - 500<b> ₽</b>'
  120. end
  121. if money >= 1000 and pcs_lashes < 4 and false_lashes <= 0:
  122. '<a href="exec:lashfalsiesstyle = 2 & gt ''salon'', ''lashFalsies''">Dramatic false lashes</a> - 1000<b> ₽</b>'
  123. else
  124. 'Dramatic false lashes - 1000<b> ₽</b>'
  125. end
  126. if money >= 2000 and lashextensionduration <= 0:
  127. '<a href="exec:lashextensionstyle = 2 & lashextensionnew = 1 & gt ''salon'', ''lashExtension''">2D volume eyelash extensions</a> - 2000<b> ₽</b>'
  128. else
  129. '2D volume eyelash extensions - 2000<b> ₽</b>'
  130. end
  131. if money >= 5000 and lashextensionduration <= 0:
  132. '<a href="exec:lashextensionstyle = 4 & lashextensionnew = 1 & gt ''salon'', ''lashExtension''">4D volume eyelash extensions</a> - 5000<b> ₽</b>'
  133. else
  134. '4D volume eyelash extensions - 5000<b> ₽</b>'
  135. end
  136. if money >= 10000 and lashextensionduration <= 0:
  137. '<a href="exec:lashextensionstyle = 6 & lashextensionnew = 1 & gt ''salon'', ''lashExtension''">6D volume eyelash extensions</a> - 10000<b> ₽</b>'
  138. else
  139. '6D volume eyelash extensions - 10000<b> ₽</b>'
  140. end
  141. if money >= 1000 and lashextensionduration >= 1 and lashextensionduration <= 4 and lashextensionstyle = 2:
  142. '<a href="exec:lashextensionnew = 0 & gt ''salon'', ''lashExtension''">Refill your 2D lash extensions</a> - 1000<b> ₽</b>'
  143. else
  144. 'Refill your 2D lash extensions - 1000<b> ₽</b>'
  145. end
  146. if money >= 2500 and lashextensionduration >= 1 and lashextensionduration <= 4 and lashextensionstyle = 4:
  147. '<a href="exec:lashextensionnew = 0 & gt ''salon'', ''lashExtension''">Refill your 4D lash extensions</a> - 2500<b> ₽</b>'
  148. else
  149. 'Refill your 4D lash extensions - 2500<b> ₽</b>'
  150. end
  151. if money >= 5000 and lashextensionduration >= 1 and lashextensionduration <= 4 and lashextensionstyle = 6:
  152. '<a href="exec:lashextensionnew = 0 & gt ''salon'', ''lashExtension''">Refill your 6D lash extensions</a> - 5,000<b> ₽</b>'
  153. else
  154. 'Refill your 6D lash extensions - 5,000<b> ₽</b>'
  155. end
  156. if money >= 500 and lashextensionduration > 0:
  157. '<a href="exec:lashextensionnew = -1 & gt ''salon'', ''lashExtension''">Remove your eyelash extensions</a> - 500<b> ₽</b>'
  158. else
  159. 'Remove your eyelash extensions - 500<b> ₽</b>'
  160. end
  161. act 'back': minut += 5 & gt 'salon','start'
  162. end
  163. if $ARGS[0] = 'lashTreatment':
  164. cla & *clr
  165. minut += 30
  166. if pcs_lashes < 2:pcs_lashes += 1
  167. if pcs_naturallashes < 2:pcs_naturallashes += 1
  168. inhib_exp += rand(1,5)
  169. money -= 5000
  170. gs 'body_shape', 'basebeautycalc', 1
  171. gs 'stat'
  172. 'The specialist collects your payment and moves you over to a chair with a headrest, which she has you tilt your head back up against.'
  173. 'It scarcely takes any time at all -- she takes a cleansing wipe up to your eyes and dabs at them gently until she''s convinced they''re clean, and very carefully brushes an applicator not unlike a mascara wand up against the base of your lashes.'
  174. 'She gently blots what little excess there is and sends you on your way, letting you know you should see results fairly soon.'
  175. act 'Leave':gt 'salon', 'start'
  176. end
  177. if $ARGS[0] = 'lashFalsies':
  178. cla & *clr
  179. minut += 20
  180. 'The specialist collects your payment and moves you over to a chair with a headrest, which she has you tilt your head back up against.'
  181. if lashfalsiesstyle = 1:
  182. if pcs_lashes < 3:pcs_lashes = 3
  183. false_lashes = 1
  184. money -= 500
  185. 'She spends a few minutes selecting and trimming a set of simple, if dramatic false lashes to get them to line up neatly with your own natural set, and with practiced ease she glues them delicately in place, only having to give them one or two gentle, settling nudges.'
  186. end
  187. if lashfalsiesstyle = 2:
  188. if pcs_lashes < 4:pcs_lashes = 4
  189. false_lashes = 1
  190. money -= 1000
  191. 'She spends a few minutes selecting and trimming a set of ornate, dramatically-feathered false lashes to get them to line up neatly with your own natural set, and with practiced ease she glues them delicately in place, only having to give them one or two gentle, settling nudges.'
  192. end
  193. gs 'body_shape', 'basebeautycalc', 1
  194. gs 'stat'
  195. '"There you go! You''re all set! Have fun with wherever you''re going!"'
  196. act 'Leave':gt 'salon', 'start'
  197. end
  198. if $ARGS[0] = 'lashExtension':
  199. 'The specialist collects your payment and brings you into a back room, asking you to lay down and relax upon a salon-style table.'
  200. if lashextensionnew = 1:
  201. if false_lashes >= 1:
  202. 'She gently peels off your old, daily-wear false lashes, and spends a few minute cleaning off the glue that held them there. "You won''t be needing these anymore!"'
  203. minut += 5
  204. false_lashes = 0
  205. pcs_lashes = pcs_naturallashes
  206. end
  207. if lashextensionstyle = 2:
  208. if pcs_lashes < 3:pcs_lashes = 3
  209. money -= 2000
  210. 'Over the next hour and a half, you have to lay there quietly, keeping your eyes closed while the technician works at very carefully and precisely bonding a pair of dark, longer lashes to every single one of your natural ones.'
  211. minut += 90
  212. end
  213. if lashextensionstyle = 4:
  214. if pcs_lashes < 4:pcs_lashes = 4
  215. money -= 5000
  216. 'Over the two hours and change, you have to lay there quietly, keeping your eyes closed while the technician works at very carefully and precisely bonding two pairs of dark, longer lashes to each and every one of your real ones.'
  217. minut += 140
  218. end
  219. if lashextensionstyle = 6:
  220. if pcs_lashes < 5:pcs_lashes = 5
  221. money -= 10000
  222. 'It feels like you''re there forever, listening to customers come and go in the salon''s main room while you lay there still, eyes shut. It takes the technician almost four hours to bond the countless lashes to your own, some even studded with tiny, lightweight jewels. You can feel the weight of them upon your own natural set, hidden somewhere beneath.'
  223. minut += 210
  224. end
  225. '"Alright!" she says, expelling a deep breath after her hard work. "Now, just be sure to come in every two weeks or so for your lash fills; if you let most of them fall out, I''m going to charge you for a whole new set, okay?"'
  226. lashextensionduration = 16
  227. end
  228. if lashextensionnew = 0:
  229. !! Actually, this should not even be possible to do, but just in case...
  230. if false_lashes >= 1:
  231. 'She carefully removes the false lashes that you''ve frankly ill-advised glued on over the vastly more expensive set. "Don''t put glue on these!" she admonishes you, "you should know better!" It takes her a while to clean them properly.'
  232. minut += 15
  233. false_lashes = 0
  234. pcs_lashes = pcs_naturallashes
  235. end
  236. if lashextensionstyle = 2:
  237. if pcs_lashes < 3:pcs_lashes = 3
  238. money -= 1000
  239. 'Over the next hour or so, you lay there to have your lashes tidied up; the technician re-glues any loose ones and applies new ones to the new growth you''ve had over the past few weeks.'
  240. minut += 60
  241. end
  242. if lashextensionstyle = 4:
  243. if pcs_lashes < 4:pcs_lashes = 4
  244. money -= 2500
  245. 'While about an hour and a half passes, the technician makes idle small talk with you while maintaining your bonded extensions, applying new ones to newly-grown lashes and re-affixing any that might''ve come loose.'
  246. minut += 90
  247. end
  248. if lashextensionstyle = 6:
  249. if pcs_lashes < 5:pcs_lashes = 5
  250. money -= 5000
  251. 'Even the maintenance on your extravagantly ornate lashes takes forever, the lash technician hunched uncomfortably forward while she applies countless new lashes to each of your newly-sprouted ones, and tidies up any loose ones among the fold.'
  252. minut += 120
  253. end
  254. '"Alright!" she says, expelling a deep breath after her lengthy maintenance. "You''re back to being beautiful! See you in another two weeks or so?"'
  255. lashextensionduration = 16
  256. end
  257. if lashextensionnew = -1:
  258. if false_lashes >= 1:
  259. '"Well, I''m afraid I''ll have to get these falsies off first, I''m sorry," she explains while carefully removing the glued-on lash strips you have on over your extensions.'
  260. minut += 5
  261. end
  262. minut += 20
  263. 'Though the technician seems reluctant, she compliantly starts the slightly-painful process of trying to soak off and remove the lash extensions you have left. It stings a little, and you feel like you probably lost some of your natural ones in the bargain as well.'
  264. if pcs_naturallashes > 0:pcs_naturallashes -= 1
  265. pcs_lashes = pcs_naturallashes
  266. money -= 500
  267. killvar lashextensionnew
  268. killvar lashextensionduration
  269. killvar lashextensionstyle
  270. end
  271. gs 'body_shape', 'basebeautycalc', 1
  272. gs 'stat'
  273. 'After what seems like forever, you''re finally allowed to open your eyes and take a look.'
  274. act 'Leave':gt 'salon', 'start'
  275. end
  276. if $ARGS[0] = 'pubes':
  277. cla & *clr
  278. $menu_loc = 'salon'
  279. $menu_arg = 'pubes'
  280. menu_off = 1
  281. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/salon.jpg"></center>'
  282. 'You go to the technician and tell her you want to dye you pubic hair.'
  283. 'She asks what colour you''d like.'
  284. *nl
  285. if pcs_pubecol[2] ! pcs_pubecol:
  286. act'Return to natural colour':
  287. cla
  288. '"I''m looking to reverse the change of pube colour, I''d like my natural colour back."'
  289. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  290. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  291. act 'Sit down':
  292. cla
  293. *clr
  294. minut += 45
  295. money -= 500
  296. pcs_pubecol[2] = pcs_pubecol
  297. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  298. '45 minutes later, The dye has taken and dried in.'
  299. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  300. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  301. act 'Move away':gt 'hairsalon', 'start'
  302. end
  303. end
  304. end
  305. if pcs_pubecol[2] ! 0:
  306. act 'Black':
  307. cla
  308. '"Black", you say, "I want to be dark and alluring."'
  309. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  310. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  311. act 'Sit down':
  312. cla
  313. *clr
  314. minut += 45
  315. pcs_pubecol[2] = 0
  316. pcs_pubecol[3] = pcs_pubes*2
  317. money -= 500
  318. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  319. '45 minutes later, The dye has taken and dried in.'
  320. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  321. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  322. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  323. end
  324. end
  325. end
  326. if pcs_pubecol[2] ! 1:
  327. act 'Brown':
  328. cla
  329. '"Brown", you say. "I think that looks nice"'
  330. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  331. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  332. act 'Sit down':
  333. cla
  334. *clr
  335. minut += 45
  336. pcs_pubecol[2] = 1
  337. pcs_pubecol[3] = rand(35,42)
  338. money -= 500
  339. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  340. '45 minutes later, The dye has taken and dried in.'
  341. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  342. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  343. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  344. end
  345. end
  346. end
  347. if pcs_pubecol[2] ! 2:
  348. act 'Ginger':
  349. cla
  350. '"Ginger, I think that''s a bit different and hot", you say.'
  351. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  352. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  353. act 'Sit down':
  354. cla
  355. *clr
  356. minut += 45
  357. pcs_pubecol[2] = 2
  358. pcs_pubecol[3] = pcs_pubes*2
  359. money -= 500
  360. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  361. '45 minutes later, The dye has taken and dried in.'
  362. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  363. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  364. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  365. end
  366. end
  367. end
  368. if pcs_haircol ! 3:
  369. act 'Blonde':
  370. cla
  371. '"Blonde! Blondes have more fun. I don''t know if that works for pubes but I want to find out", you giggle.'
  372. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  373. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  374. act 'Sit down':
  375. cla
  376. *clr
  377. minut += 45
  378. pcs_pubecol[2] = 3
  379. pcs_pubecol[3] = pcs_pubes*2
  380. money -= 500
  381. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  382. '45 minutes later, The dye has taken and dried in.'
  383. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  384. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  385. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  386. end
  387. end
  388. end
  389. if pcs_haircol ! 4:
  390. act 'Red':
  391. cla
  392. gs 'stat'
  393. '"Red. Like really red" you tell her.'
  394. '"And what would that be?" The hairdresser asks cheerfully.'
  395. '"light red red, like a fire truck." you announce.'
  396. '"No problem, this''ll be fun. Please have a seat.", she says and turns around one of the chairs for you.'
  397. act 'Sit down':
  398. cla
  399. *clr
  400. minut += 45
  401. pcs_pubecol[2] = 4
  402. pcs_pubecol[3] = pcs_pubes*2
  403. money -= 500
  404. gs 'stat'
  405. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  406. '45 minutes later, The dye has taken and dried in.'
  407. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  408. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  409. act 'Move away':gt 'hairsalon', 'start'
  410. end
  411. end
  412. end
  413. if pcs_haircol ! 5:
  414. act 'Blue':
  415. cla
  416. gs 'stat'
  417. '"This is a bit unusual but I want to try blue." you tell her.'
  418. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  419. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  420. act 'Sit down':
  421. cla
  422. *clr
  423. minut += 45
  424. pcs_pubecol[2] = 5
  425. pcs_pubecol[3] = pcs_pubes*2
  426. money -= 500
  427. gs 'stat'
  428. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  429. '45 minutes later, The dye has taken and dried in.'
  430. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  431. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  432. act 'Move away':gt 'hairsalon', 'start'
  433. end
  434. end
  435. end
  436. if pcs_haircol ! 6:
  437. act 'Green':
  438. cla
  439. gs 'stat'
  440. '"Green so as to help the rain forest." you tell her.'
  441. '"I don''t think that''s how it works" The hairdresser says looking confused.'
  442. '"Can we at least try?." you ask.'
  443. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  444. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  445. act 'Sit down':
  446. cla
  447. *clr
  448. minut += 45
  449. pcs_pubecol[2] = 6
  450. pcs_pubecol[3] = pcs_pubes*2
  451. money -= 500
  452. gs 'stat'
  453. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  454. '45 minutes later, The dye has taken and dried in.'
  455. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  456. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  457. act 'Move away':gt 'hairsalon', 'start'
  458. end
  459. end
  460. end
  461. if pcs_haircol ! 7:
  462. act 'Pink':
  463. cla
  464. gs 'stat'
  465. '"I want pink pubes." you tell her.'
  466. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  467. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  468. act 'Sit down':
  469. cla
  470. *clr
  471. minut += 45
  472. pcs_pubecol[2] = 7
  473. pcs_pubecol[3] = pcs_pubes*2
  474. money -= 500
  475. gs 'stat'
  476. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  477. '45 minutes later, The dye has taken and dried in.'
  478. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  479. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  480. act 'Move away':gt 'hairsalon', 'start'
  481. end
  482. end
  483. end
  484. if pcs_haircol ! 8:
  485. act 'Purple':
  486. cla
  487. gs 'stat'
  488. '"Do you have any purple dye?" you ask her.'
  489. '"Sure thing!", she says in a cheerful way and leads you to a private room, "Why don''t you take a seat and pull down your clothes?"'
  490. '"We''ll be done in no time!", she says and points your over to sit down on one of the seats.'
  491. act 'Sit down':
  492. cla
  493. *clr
  494. minut += 45
  495. pcs_pubecol[2] = 8
  496. pcs_pubecol[3] = pcs_pubes*2
  497. money -= 500
  498. gs 'stat'
  499. '<center><img <<$set_imgh>> src="<<FUNC(''$pube_image'')>>"></center>'
  500. '45 minutes later, The dye has taken and dried in.'
  501. 'The beauty technician checks that everything is OK. "All done, you can get dressed."'
  502. 'You pull your clothes back up and pay her 500 <b>₽</b>.'
  503. act 'Move away':gt 'hairsalon', 'start'
  504. end
  505. end
  506. end
  507. end
  508. if $ARGS[0] = 'epilyaciya':
  509. cla & *clr
  510. minut += 60
  511. pcs_leghair = -10
  512. pcs_pubes = -5
  513. inhib_exp += rand(1,5)
  514. money -= 2000
  515. if salonrand = 0 and masha = 0:gt 'salon', '0'
  516. gs 'stat'
  517. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/depilation.jpg"></center>'
  518. 'You get a full body hair removal treatment, giving you a smooth and completely hair free body.'
  519. act 'Leave':gt 'salon', 'start'
  520. end
  521. if $ARGS[0] = 'ozdormas':
  522. cla & *clr
  523. minut += 60
  524. vidageday += 3
  525. money -= 2500
  526. gs 'stat'
  527. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/mass.jpg"></center>'
  528. if salonrand = 0:
  529. *clr & cla
  530. picrand = rand(25, 28)
  531. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/mass.jpg"></center>'
  532. 'During your massage, you moan with pleasure as the guy really knows how to get your muscles to relax, it even makes you a little turned on. You feel his had slide down to your ass and before you can even protest he slips an oiled up finger into your pussy and his thumb in your ass.'
  533. act 'Indignant':gt 'salon', 'start'
  534. act 'Enjoy': gt 'sex', 'minet'
  535. else
  536. 'During your massage, you moan with pleasure as the guy really knows how to get your muscles to relax, it even makes you a little turned on.'
  537. end
  538. act 'Leave':gt 'salon', 'start'
  539. end
  540. if $ARGS[0] = 'uhodkosha':
  541. cla & *clr
  542. minut += 60
  543. inhib_exp += rand(1,5)
  544. pcs_skin += 20
  545. money -= 5000
  546. gs 'body_shape', 'basebeautycalc', 1
  547. if salonrand = 0 and masha = 0:gt 'salon', '0'
  548. gs 'stat'
  549. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/facialmask.jpg"></center>'
  550. 'You get a beauty mask treatment, afterwards your face feels smooth and your skin tight.'
  551. act 'Leave':gt 'salon', 'start'
  552. end
  553. if $ARGS[0] = 'omoloshenie':
  554. cla & *clr
  555. minut += 60
  556. inhib_exp += rand(1,5)
  557. vidageday += 50
  558. money -= 25000
  559. gs 'body_shape', 'basebeautycalc', 1
  560. if salonrand = 0 and masha = 0:gt 'salon', '0'
  561. gs 'stat'
  562. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/bodyscrub.jpg"></center>'
  563. 'You get a full body rejuvenation procedure, afterwards your skin feels soft and silky smooth.'
  564. act 'Leave':gt 'salon', 'start'
  565. end
  566. if $ARGS[0] = '0':
  567. cla & *clr
  568. i = arrsize('$sparrnam')
  569. stat['cum_count'] += 1
  570. sparrloc[i] = 7
  571. $sparrnam[i] = 'Z1'
  572. sparrppt[i] = 0
  573. sparridt[i] = 1
  574. sparrvol[i] = 20
  575. sparrslc[i] = 0
  576. sparrcnt[i] = stat['cum_count']
  577. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri1.jpg"></center>'
  578. 'During the procedure, the girl manages to stain your clothes with a clearish white liquid, which looks very similar to sperm.'
  579. 'You start to get very upset, not knowing if the stain will come out and not willing to wear clothes that look like someone has cum on them.'
  580. 'The manager quickly comes over to see what the problem is. "What is the problem?"'
  581. 'You show him the stain on your clothes. "You girl her spilled that stuff on my clothes look at it, it''s ruined."'
  582. 'He gives the girl a glare for a moment before he gives you a reassuring smile. "Oh no that will come right out with a cleaning, we will do all we can to make this right, we will even pay for the cleaning and I will assure you she will be punished."'
  583. act 'Agree':money += 5000 & gt 'salon', 'start'
  584. gs 'willpower', 'sex', 'force', 'medium'
  585. if will_cost <= pcs_willpwr:
  586. act 'Require punishment (<<will_cost>> Willpower)':
  587. *clr & cla
  588. gs 'willpower', 'pay', 'force'
  589. orgasm += 1
  590. girl += 1
  591. gs 'npcgeneratec', 0, 'salon worker', rand(35,55)
  592. gs 'boyStat', $npclastgenerated
  593. gs 'stat'
  594. 'You nod at his offer. "Fine but I want this bitch punished now!'
  595. 'He seems a bit taken back by your attitude. "Very well, how would you like her punished? Perhaps we can take it out of her pay, or she can do this procedure at no wages." He seems to think these are fitting punishments.'
  596. 'You shake your head no, no the bitch made your clothes look like they have cum on them. It''s only fitting you return the favor. "No I want you to fuck her right here as I tell you to."'
  597. '"I''m sorry, but I can not do that." stammered the guy.'
  598. act 'Punish the bitch':
  599. cla & *clr
  600. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri2.jpg"></center>'
  601. '"You asked me how I''d like her to be punished, now fuck her right here as I tell you to." you say, <<$boydesc>> looks from you to her and back to you.'
  602. 'Clearly he likes your idea of punishment, the bulge now straining against his pants is clear evidence of that. He seems unsure what to say, so you decided to take matters into your own hands.'
  603. 'You reach over and unzip his pants, reaching inside you grab his now hard <<dick>>cm <<$dick_girth>> dick in your hand and pull it out. As you do you start stroking it, any further protest he might have had vanishes.'
  604. gs 'arousal', 'hj', 5, 'dom'
  605. gs 'stat'
  606. act 'Make the bitch suck it':
  607. cla & *clr
  608. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri3.jpg"></center>'
  609. 'When he no longer protest any further, you reach over with your other hand and grab the bitch by her hair. You pull her face over to his cock and you say. "Open your mouth bitch and suck his cock."'
  610. 'With these words, you push her mouth at his cock, she obediently opens her mouth letting his <<dick>>cm <<$dick_girth>> cock in her mouth, she wraps her lips tightly around it.'
  611. 'You pull the girls head by her hair back and forth, occasionally forcing her lips against his balls, gagging her as you make her deep throat him.'
  612. gs 'arousal', 'voyeur_sex', 5, 'dom'
  613. gs 'stat'
  614. act 'Doggystyle':
  615. cla & *clr
  616. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri4.jpg"></center>'
  617. 'After several minutes of making her gag on his <<dick>>cm <<$dick_girth>> cock, you want a change in the action. You pull her head away and command her. "Take your clothes off bitch."'
  618. 'She obediently strips naked with out a word, once she is naked you force her to bend over as you look to the man and command him. "Fuck her pussy." He obediently slips his dick in her pussy, both of them let out moans of pleasure.'
  619. 'He beings to get into it and starts pounding her balls deep. You pull down your panties and spread you legs. Taking one of her hands in yours you put it on your pussy, she diligently begins to massage your clitoris.'
  620. gs 'arousal', 'voyeur_sex', 5, 'dom'
  621. gs 'arousal', 'vaginal_finger', 5, 'dom'
  622. gs 'stat'
  623. act 'Put her on top':
  624. cla & *clr
  625. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri5.jpg"></center>'
  626. 'A few minutes later you get off the chair and look at him. "Sit in the chair." Which he does at once, then you pull the girl over and point at him.'
  627. '"Crawl on top of him and straddle him, ride him." She wastes no time doing as you command, once straddling him she beings to rhythmically ride his cock. As she moans in pleasure you grab her hips and force her all the way down, so he is once again balls deep in her twat.'
  628. gs 'arousal', 'voyeur_sex', 5, 'dom'
  629. gs 'stat'
  630. act 'Lay them on the floor':
  631. cla & *clr
  632. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri6.jpg"></center>'
  633. 'Watching this you begin to masturbate, you feel yourself getting turned on as you pussy gets wetter. Unable to be left out anymore, you grab the girl and pull her off, shoving her down on the floor. "Lay on your back."'
  634. 'She does as you tell her and then you look at the man. "Lay on your side next to her and start fucking her again." His grin tells you he is not only enjoying fucking her but loves that you are telling him how to fuck her.'
  635. 'He lays down next to her and immediately slips his <<dick>>cm <<$dick_girth>> dick back in her and starts fucking her again. You pull the rest of your clothes off and kneel down over her face. "Lick my pussy, bitch." Which she eagerly does, her tongue laps and teases your clit.'
  636. 'You can tell she has some experience at eating pussy as it feels great.'
  637. gs 'arousal', 'masturbate', 5, 'dom'
  638. gs 'arousal', 'cuni', 5, 'dom'
  639. gs 'stat'
  640. act 'Finish':
  641. cla & *clr
  642. telmasha = 1
  643. !gs 'telefon', 'AddContact', 'Axxx', 'icon_masha', "$telsob = 'Masha' & gt 'telefon', 'mobilaraz'","hour >= 8 and hour <= 20","",""
  644. masha += 1
  645. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/sex/pri7.jpg"></center>'
  646. $orgasm_txt = 'You begin to pant and moan and finally you have an intense orgasm, coating the girls face in your pussy juices. Seeing this the guy grunts and starts pounding harder, obviously getting near to blowing his load as well.'
  647. $orgasm_or = 'custom'
  648. gs 'arousal', 'cuni', 5, 'dom'
  649. gs 'arousal', 'end'
  650. gs 'stat'
  651. 'Standing up you look at him. "Don''t cum in her, stand up." With a slight frown from being so close he does as you tell him. You grab the girl by the hair and pull her up till she is kneeling in front of the guy.'
  652. '"Stroke his cock till he cums all over your face." The guy is grinning again as she grabs his cock and begins jerking him off for all she''s worth, while you get dressed. It doesn''t take long before he is shooting his cum all over her pretty face.'
  653. 'You look at the man. "That''s how you punish bitches." Glancing at her you add. "Isn''t that right bitch?" She nods in agreement, though you are not sure if it is because she really does agree or she is just doing what you say.'
  654. 'Either way you find it a turn on, with that you take the offered money and grab one of her cards off the counter reading it. "Masha huh? You really know how to use your tongue, I might just call you, so you can use it again." You say to her and then without another glance at the two of them or waiting for a reply you walk out, leaving Masha kneeling on the floor covered in sperm.'
  655. act 'Leave':money += 5000 & gt 'salon', 'start'
  656. end
  657. end
  658. end
  659. end
  660. end
  661. end
  662. end
  663. else
  664. act 'Require punishment (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  665. end
  666. end
  667. if $ARGS[0] = '1':
  668. cla & *clr
  669. minut += 5
  670. if worksalon = 0:
  671. 'You ask the manager if he has a job opening.'
  672. if masash < 10:
  673. 'After asking the manager about a job he tells you. "You need to complete a massage course at the community center before I can hire you."'
  674. act 'Move away':gt 'salon', 'start'
  675. elseif masash >= 10:
  676. 'The manager tells you. "We need a masseuse. You''d work Monday, Wednesday and Friday, work starts at 10:00, your shift will finish at 19:00. Your wages will be 1560<b> ₽</b> per shift."'
  677. '"You''ll need to file your paperwork with the personnel department."'
  678. if (work = 0 and worksalon = 0) or (cheatWork = 1 and worksalon = 0):
  679. act 'Take the job':
  680. cla & *clr
  681. worksalon = 1
  682. work = 1
  683. 'You file your paperwork with the personnel department'
  684. act 'Move away':gt 'salon', 'start'
  685. end
  686. end
  687. act 'Move away':gt 'salon', 'start'
  688. end
  689. elseif worksalon = 1:
  690. act 'Resign':gt 'salon', 'discharge'
  691. act 'Move away':gt 'salon', 'start'
  692. end
  693. end
  694. if $ARGS[0] = 'beginwork':
  695. cla & *clr
  696. '<center><b><font color="maroon">Beauty</font></b></center>'
  697. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/salon/salon.jpg"></center>'
  698. 'You go to your workstation and prepare it as you wait for your first customer.'
  699. act 'Start work':
  700. smenaSalon += 1
  701. gt 'worksalon', 'start'
  702. end
  703. act 'Resign':gt 'salon', 'discharge'
  704. end
  705. if $ARGS[0] = 'discharge':
  706. cla & *clr
  707. minut += 10
  708. worksalon = 0
  709. work = 0
  710. pay = smenaSalon * 1560
  711. money += pay
  712. smenaSalon = 0
  713. 'You tell your boss you have had enough and that you quit. He looks at you a moment and then says. "Here is your paycheck <<pay>> <b>₽</b> and employment history. Goodbye."'
  714. act 'Leave':gt 'salon', 'start'
  715. end
  716. --- salon ---------------------------------