salon 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330
  1. # salon
  2. $location_type = 'public_indoors'
  3. if $ARGS[0] = 'start':
  4. $sexloc = $CURLOC
  5. if week = 1 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
  6. if week = 3 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
  7. if week = 5 and hour >= 9 and hour <= 10 and worksalon = 1:gt 'salon', 'beginwork'
  8. cla
  9. clr
  10. *clr
  11. salonrand = rand(0, 9)
  12. minut += 5
  13. gs 'stat'
  14. if night_mode = 1:
  15. fcolor = rgb(255, 255, 255)
  16. bcolor = rgb(0, 0, 0)
  17. lcolor = rgb(106, 90, 205)
  18. else
  19. fcolor = rgb(0, 0, 0)
  20. bcolor = rgb(255, 255, 255)
  21. lcolor = rgb(106, 90, 205)
  22. end
  23. '<center><b><font color="maroon">Beauty salon</font></b></center>'
  24. '<center><img src="images/locations/city/citycenter/mall/salon/salon.jpg"></center>'
  25. 'Approach the <a href="exec:gt ''salon'', ''1''">beauty technician.</a>'
  26. if money >= 1000:
  27. '<a href="exec:gt ''salon'', ''solyariy''">Solarium - 1,000 <b>₽</b></a>'
  28. else
  29. 'Solarium - 1,000 <b>₽</b>'
  30. end
  31. if money >= 5000:
  32. '<a href="exec:gt ''salon'', ''resnici''">Lengthening eyelashes - 5,000 <b>₽</b></a>'
  33. '<a href="exec:gt ''salon'', ''ozdormas''">Wellness massage (accelerates fat loss and rejuvenates the body), 5,000 <b>₽</b></a>'
  34. else
  35. 'Lengthening eyelashes - 5,000 <b>₽</b>'
  36. 'Wellness massage (accelerates fat loss and rejuvenates the body), 5,000 <b>₽</b>'
  37. end
  38. if money >= 5000 and lashair = 0:'<a href="exec:gt ''salon'', ''epilyaciya''">Full body depilation - 5,000 <b>₽</b></a>'
  39. if money < 5000 or lashair = 1:'Full body depilation - 5,000 <b>₽</b>'
  40. if money >= 15000:'<a href="exec:gt ''salon'', ''uhodkosha''">Skin Care - 15,000 <b>₽</b></a>'
  41. if money < 15000:'Skin Care - 15,000 <b>₽</b>'
  42. if money >= 250000:'<a href="exec:gt ''salon'', ''omoloshenie''">Full body skin rejuvenation - 250,000 <b>₽</b></a>'
  43. if money < 250000:'Rejuvenation - 250,000 <b>₽</b>'
  44. if hour < 8 or hour > 20:
  45. cls
  46. 'As the salon closes you are politely asked to leave and come again.'
  47. act 'Leave':minut += 5 & gt 'torgcentr'
  48. exit
  49. end
  50. act 'Leave':minut += 5 & gt 'torgcentr'
  51. end
  52. if $ARGS[0] = 'solyariy':
  53. minut += 60
  54. pcs_tan += 10
  55. money -= 1000
  56. if salonrand > 6 and npc_QW['A192'] > 2:gt 'etoexhib', 'pos1'
  57. if salonrand = 0 and masha = 0:gt 'salon', '0'
  58. gs 'stat'
  59. '<center><img src="images/locations/city/citycenter/mall/salon/solarium.jpg"></center>'
  60. 'You take off your clothes and get in the tanning booth.'
  61. act 'Leave':gt 'salon', 'start'
  62. end
  63. if $ARGS[0] = 'resnici':
  64. minut += 60
  65. pcs_lashes += 1
  66. money -= 5000
  67. gs 'body_shape', 'basebeautycalc', 1
  68. if salonrand = 0 and masha = 0:gt 'salon', '0'
  69. gs 'stat'
  70. 'You get a eyelash extension, giving you long and lustrous eyelashes.'
  71. act 'Leave':gt 'salon', 'start'
  72. end
  73. if $ARGS[0] = 'epilyaciya':
  74. minut += 60
  75. pcs_leghair = -10
  76. pcs_pubes = -10
  77. money -= 5000
  78. if salonrand = 0 and masha = 0:gt 'salon', '0'
  79. gs 'stat'
  80. '<center><img src="images/locations/city/citycenter/mall/salon/depilation.jpg"></center>'
  81. 'You get a full body hair removal treatment, giving you a smooth and completely hair free body.'
  82. act 'Leave':gt 'salon', 'start'
  83. end
  84. if $ARGS[0] = 'ozdormas':
  85. minut += 60
  86. vidageday += 3
  87. money -= 5000
  88. gs 'stat'
  89. if salonrand = 0:
  90. cla
  91. *clr
  92. picrand = rand(25, 28)
  93. '<center><img src="images/locations/city/citycenter/mall/salon/mass.jpg"></center>'
  94. '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 a oiled up finger into your pussy and his thumb in your ass.'
  95. act 'Indignant':gt 'salon', 'start'
  96. act 'Enjoy':
  97. guy += 1
  98. gt 'sex', 'minet'
  99. end
  100. end
  101. act 'Leave':gt 'salon', 'start'
  102. end
  103. if $ARGS[0] = 'uhodkosha':
  104. minut += 60
  105. pcs_skin += 20
  106. money -= 15000
  107. gs 'body_shape', 'basebeautycalc', 1
  108. if salonrand = 0 and masha = 0:gt 'salon', '0'
  109. gs 'stat'
  110. '<center><img src="images/locations/city/citycenter/mall/salon/facialmask.jpg"></center>'
  111. 'You get a beauty mask treatment, afterwards your face feels smooth and your skin tight.'
  112. act 'Leave':gt 'salon', 'start'
  113. end
  114. if $ARGS[0] = 'omoloshenie':
  115. minut += 60
  116. vidageday += 50
  117. money -= 250000
  118. gs 'body_shape', 'basebeautycalc', 1
  119. if salonrand = 0 and masha = 0:gt 'salon', '0'
  120. gs 'stat'
  121. '<center><img src="images/locations/city/citycenter/mall/salon/bodyscrub.jpg"></center>'
  122. 'You get a full body rejuvenation procedure, afterwards your skin feels soft and silky smooth.'
  123. act 'Leave':gt 'salon', 'start'
  124. end
  125. if $ARGS[0] = '0':
  126. cla
  127. *clr
  128. i = arrsize('$sparrnam')
  129. stat['cum_count'] += 1
  130. sparrloc[i] = 7
  131. $sparrnam[i] = 'Z1'
  132. sparrppt[i] = 0
  133. sparridt[i] = 1
  134. sparrvol[i] = 20
  135. sparrslc[i] = 0
  136. sparrcnt[i] = stat['cum_count']
  137. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri1.jpg"></center>'
  138. 'During the procedure, the girl manages to stain your clothes with a clearish white liquid, which looks very similar to sperm.'
  139. '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 cummed on them.'
  140. 'The manager quickly comes over to see what the problem is. "What is the problem?"'
  141. 'You show him the stain on your clothes. "You girl her spilled that stuff on my clothes look at it, it''s ruined."'
  142. '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."'
  143. act 'Agree':money += 5000 & gt 'salon', 'start'
  144. if pcs_dom > 10:
  145. act 'Require punish now':
  146. cla
  147. orgasm += 1
  148. pcs_dom += 1
  149. girl += 1
  150. 'You nod at his offer. "Fine but I want this bitch punished now!'
  151. '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.'
  152. '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."'
  153. '"I''m sorry, but I can not do that." stammered the guy.'
  154. act 'Punish the bitch':
  155. cla
  156. *clr
  157. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri2.jpg"></center>'
  158. '"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.'
  159. '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.'
  160. '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.'
  161. gs 'arousal', 'hj', 5, 'dom'
  162. gs 'stat'
  163. act 'Make the bitch suck it':
  164. cla
  165. *clr
  166. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri3.jpg"></center>'
  167. '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."'
  168. '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.'
  169. '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.'
  170. gs 'arousal', 'voyeur', 5, 'dom'
  171. gs 'stat'
  172. act 'Doggystyle':
  173. cla
  174. *clr
  175. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri4.jpg"></center>'
  176. '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."'
  177. '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.'
  178. '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.'
  179. gs 'arousal', 'voyeur', 5, 'dom'
  180. gs 'arousal', 'vaginal_finger', 5, 'dom'
  181. gs 'stat'
  182. act 'Put her on top':
  183. cla
  184. *clr
  185. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri5.jpg"></center>'
  186. '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.'
  187. '"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.'
  188. gs 'arousal', 'voyeur', 5, 'dom'
  189. gs 'stat'
  190. act 'Lay them on the floor':
  191. cla
  192. *clr
  193. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri6.jpg"></center>'
  194. '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."'
  195. '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.'
  196. '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.'
  197. 'You can tell she has some experience at eating pussy as it feels great.'
  198. gs 'arousal', 'masturbate', 5, 'dom'
  199. gs 'arousal', 'cuni', 5, 'dom'
  200. gs 'stat'
  201. act 'Finish':
  202. cla
  203. *clr
  204. telmasha = 1
  205. masha += 1
  206. '<center><img src="images/locations/city/citycenter/mall/salon/sex/pri7.jpg"></center>'
  207. $orgasm_txt = 'You begin to pant and moan and finally you have a 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.'
  208. $orgasm_or = 'custom'
  209. gs 'arousal', 'cuni', 5, 'dom'
  210. gs 'arousal', 'end'
  211. gs 'stat'
  212. '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.'
  213. '"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.'
  214. '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.'
  215. '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.'
  216. act 'Leave':money += 5000 & gt 'salon', 'start'
  217. end
  218. end
  219. end
  220. end
  221. end
  222. end
  223. end
  224. end
  225. end
  226. if $ARGS[0] = '1':
  227. cla
  228. minut += 5
  229. if worksalon = 0:
  230. 'You ask the manager if he has a job opening.'
  231. if masash < 10:
  232. '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."'
  233. act 'Move away':gt 'salon', 'start'
  234. elseif masash >= 10:
  235. 'The manager tells you. "We need a masseuse. You''d work Monday, Wednesday and Friday be here between 9:00 and 10:00, your shift will finish at 19:00. Your wages will be 800<b>₽</b> per shift."'
  236. '"You''ll need to file your paperwork with the personnel department."'
  237. if (work = 0 and worksalon = 0) or (cheatWork = 1 and worksalon = 0):
  238. act 'Take the job':
  239. cla
  240. worksalon = 1
  241. work = 1
  242. 'You file your paperwork with the personnel department'
  243. act 'Move away':gt 'salon', 'start'
  244. end
  245. end
  246. act 'Move away':gt 'salon', 'start'
  247. end
  248. elseif worksalon = 1:
  249. act 'Resign':gt 'salon', 'discharge'
  250. act 'Move away':gt 'salon', 'start'
  251. end
  252. end
  253. if $ARGS[0] = 'beginwork':
  254. cla
  255. *clr
  256. '<center><b><font color="maroon">Beauty</font></b></center>'
  257. '<center><img src="images/locations/city/citycenter/mall/salon/salon.jpg"></center>'
  258. 'You go to your workstation and prepare it as you wait for your first customer.'
  259. act 'Start work':
  260. smena += 1
  261. gt 'worksalon', 'start'
  262. end
  263. act 'Resign':gt 'salon', 'discharge'
  264. end
  265. if $ARGS[0] = 'discharge':
  266. cla
  267. minut += 10
  268. worksalon = 0
  269. work = 0
  270. pay = smena * 800
  271. money += pay
  272. smena = 0
  273. '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."'
  274. act 'Leave':gt 'salon', 'start'
  275. end
  276. --- salon ---------------------------------