1
0

hairsalon.qsrc 52 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355
  1. # hairsalon
  2. if $ARGS[0] = 'start':
  3. cla & *clr
  4. $menu_loc = 'hairsalon'
  5. $menu_arg = 'start'
  6. menu_off = 0
  7. '<center><b><font color="maroon">The Golden Curl Salon</font></b></center>'
  8. '<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/golden curl/golden curl.jpg"</center>'
  9. 'Established several years back, The Golden Curl is known to offer high-quality services ranging from hairstyles, dimensional hair shading, to updos, expansions, and fixing.'
  10. *nl
  11. 'As you as you walk in you are greeted by a smiling receptionist, "Welcome to The Golden Curl Salon! What can we do for you today?"'
  12. clr
  13. gs 'stat'
  14. gs 'themes', 'indoors'
  15. if hour =< 8 or hour >= 20:
  16. cls
  17. 'The hair salon is closed. You should return during their working hours.'
  18. act 'Leave':minut += 3 & gt 'torgcentr'
  19. exit
  20. end
  21. *nl
  22. '<a href=' + iif(money >= 750, '"exec:gt ''hairsalon'', ''cuthair''"', '') + '>Get a haircut - 750 <b>₽</b></a>'
  23. *nl
  24. '<a href=' + iif(money >= 500, '"exec:gt ''hairsalon'', ''curlhair''"', '') + '>Get your hair curled - 500 <b>₽</b></a>'
  25. *nl
  26. '<a href=' + iif(money >= 500, '"exec:gt ''hairsalon'', ''straighthair''"', '') + '>Get your hair straightened - 500 <b>₽</b></a>'
  27. *nl
  28. '<a href=' + iif(money >= 1000, '"exec:gt ''hairsalon'', ''dyehair''"', '') + '>Get your hair dyed - 1000 <b>₽</b></a>'
  29. *nl
  30. if dyefade > 0 and dyefade < 7:
  31. '<a href=' + iif(money >= 500, '"exec:gt ''hairsalon'', ''touchup''"', '') + '>Touch up hair colour - 500 <b>₽</b></a>'
  32. *nl
  33. elseif dyefade = 0:
  34. '<a href=' + iif(money >= 1000, '"exec:gt ''hairsalon'', ''touchup2''"', '') + '>Re-dye your existing hair colour - 1000 <b>₽</b></a>'
  35. *nl
  36. end
  37. '<a href=' + iif(money >= 1250, '"exec:gt ''hairsalon'', ''braidhair''"', '') + '>Get your hair braided - 1250 <b>₽</b></a>'
  38. act 'Leave':minut += 3 & gt 'torgcentr'
  39. if money >= 100:
  40. act 'Buy Scrunchies - 100 <b>₽</b>':
  41. cla & *clr
  42. money -= 100
  43. hscrunch += 10
  44. gs 'stat'
  45. '"Only scrunchies today please!" you tell the cashier.'
  46. '"That''ll be 100 ₽!" the receptionist replies back.'
  47. 'You pay for the scrunchies as you are handed a little box.'
  48. act 'Move away':gt 'hairsalon', 'start'
  49. end
  50. end
  51. if money >= 120:
  52. act 'Buy Hair accessories - 120 <b>₽</b>':
  53. cla & *clr
  54. money -= 120
  55. hpingrip += 10
  56. gs 'stat'
  57. '"Only hair pins today please!" you tell the cashier.'
  58. '"That''ll be 120 ₽!" the receptionist replies back.'
  59. 'You pay for the hair pins as you are handed a little box.'
  60. act 'Move away':gt 'hairsalon', 'start'
  61. end
  62. end
  63. end
  64. if $ARGS[0] = 'cuthair':
  65. cla & *clr
  66. gs 'stat'
  67. 'You approach the receptionist and ask, "Hi, I would like to get my hair cut. Can someone do it right away or should I come back later?"'
  68. 'She checks the computer, "There seems to be an available time, have you already decided on how much we shall cut off?"'
  69. act 'Change your mind':gt 'hairsalon', 'start'
  70. if pcs_hairlng > 10:
  71. act 'Very short':
  72. cla & *clr
  73. gs 'stat'
  74. '"I''d like to have my hair cut very short!" you tell her.'
  75. '"Of course! And what is your name?" she says with a friendly smile on her face, typing down your name in the computer. It doesn''t take long before you are shown to a free seat.'
  76. act 'Sit down':
  77. cla & *clr
  78. minut += 30
  79. pcs_hairlng = 10
  80. money -= 750
  81. gs 'stat'
  82. gs 'hairsalon', 'mixed'
  83. 'About half an hour passes as the hairdresser is done and what''s left from you former hairstyle is a very short buzzcut.'
  84. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  85. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  86. end
  87. end
  88. end
  89. if pcs_hairlng > 31:
  90. act 'Short, but not too short':
  91. cla & *clr
  92. gs 'stat'
  93. '"I''d like to have my hair cut short, but not too short." you tell her.'
  94. '"Of course! That''s not an issue at all!" she says, typing in your name in the computer. The receptionist leads you to one of the free seats and makes a gesture to you, to sit down.'
  95. act 'Sit down':
  96. if pcs_hairlng > 60:
  97. cla & *clr
  98. gs 'stat'
  99. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  100. act 'Yes':
  101. cla & *clr
  102. minut += 30
  103. pcs_hairlng = 31
  104. hbangs = 1
  105. pcs_hairbsh = 1
  106. money -= 750
  107. gs 'stat'
  108. gs 'hairsalon', 'mixed'
  109. 'About half an hour passes as the hairdresser is done cutting your hair. And with that you have a new hairstyle, which barely reaches your earlobes.'
  110. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  111. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  112. end
  113. act 'No':
  114. cla & *clr
  115. minut += 30
  116. pcs_hairlng = 31
  117. hbangs = 0
  118. pcs_hairbsh = 1
  119. money -= 750
  120. gs 'stat'
  121. gs 'hairsalon', 'mixed'
  122. 'About half an hour passes as the hairdresser is done cutting your hair. And with that you have a new hairstyle, which barely reaches your earlobes.'
  123. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  124. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  125. end
  126. else
  127. cla & *clr
  128. minut += 30
  129. pcs_hairlng = 31
  130. pcs_hairbsh = 1
  131. money -= 750
  132. gs 'stat'
  133. gs 'hairsalon', 'mixed'
  134. 'About half an hour passes as the hairdresser is done cutting your hair. And with that you have a new hairstyle, which barely reaches your earlobes.'
  135. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  136. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  137. end
  138. end
  139. end
  140. end
  141. if pcs_hairlng > 81:
  142. act 'About chin-line length':
  143. cla & *clr
  144. gs 'stat'
  145. '"Could you cut my hair back to my chin line, please?" you ask the receptionist.'
  146. '"Shouldn''t be any issues at all. Let me just fill out your name here and you''ll be ready to go." she tells you and before you know it she shows you to a free chair where you are seated.'
  147. act 'Sit down':
  148. if pcs_hairlng > 90:
  149. cla & *clr
  150. gs 'stat'
  151. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  152. act 'Yes':
  153. cla & *clr
  154. minut += 30
  155. pcs_hairlng = 81
  156. hbangs = 1
  157. pcs_hairbsh = 1
  158. money -= 750
  159. gs 'stat'
  160. gs 'hairsalon', 'mixed'
  161. 'About half an hour passes as the hairdresser is done cutting your hair. Your new hairstyle goes down to your chin-line and you have a fringe, covering your forehead.'
  162. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  163. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  164. end
  165. act 'No':
  166. cla & *clr
  167. minut += 30
  168. pcs_hairlng = 81
  169. hbangs = 0
  170. pcs_hairbsh = 1
  171. money -= 750
  172. gs 'stat'
  173. gs 'hairsalon', 'mixed'
  174. 'About half an hour passes as the hairdresser is done cutting your hair. Your new hairstyle goes down to you chin-line.'
  175. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  176. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  177. end
  178. else
  179. cla & *clr
  180. minut += 30
  181. pcs_hairlng = 31
  182. pcs_hairbsh = 1
  183. money -= 750
  184. gs 'stat'
  185. gs 'hairsalon', 'mixed'
  186. 'About half an hour passes as the hairdresser is done cutting your hair. Your new hairstyle goes down to you chin-line.'
  187. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  188. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  189. end
  190. end
  191. end
  192. end
  193. if pcs_hairlng > 161:
  194. act 'Shoulder length':
  195. cla & *clr
  196. gs 'stat'
  197. '"I would like to have my hair cut back to about the height of my shoulder. Would you please be so kind and do that?" you ask her.'
  198. '"Sure, no problem at all!" she tells you, geasturing you, to take a seat into a free chair and wait for the hairdresser.'
  199. act 'Sit down.':
  200. if pcs_hairlng > 170:
  201. cla & *clr
  202. gs 'stat'
  203. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  204. act 'Yes':
  205. cla & *clr
  206. minut += 30
  207. pcs_hairlng = 161
  208. hbangs = 1
  209. pcs_hairbsh = 1
  210. money -= 750
  211. gs 'stat'
  212. gs 'hairsalon', 'mixed'
  213. 'About half an hour passes as the hairdresser is done cutting your hair. Your hair now goes just to your shoulders and you have a fringe, covering your forehead.'
  214. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  215. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  216. end
  217. act 'No':
  218. cla & *clr
  219. minut += 30
  220. pcs_hairlng = 161
  221. hbangs = 0
  222. pcs_hairbsh = 1
  223. money -= 750
  224. gs 'stat'
  225. gs 'hairsalon', 'mixed'
  226. 'About half an hour passes as the hairdresser is done cutting your hair. Your hair now goes just to your shoulders.'
  227. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  228. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  229. end
  230. else
  231. cla & *clr
  232. minut += 30
  233. pcs_hairlng = 161
  234. pcs_hairbsh = 1
  235. money -= 750
  236. gs 'stat'
  237. gs 'hairsalon', 'mixed'
  238. 'About half an hour passes as the hairdresser is done cutting your hair. Your hair now goes just to your shoulders.'
  239. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  240. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  241. end
  242. end
  243. end
  244. end
  245. if pcs_hairlng > 261:
  246. act 'About brastrap length':
  247. cla & *clr
  248. gs 'stat'
  249. '"Could you cut my hair back to where my bra-strap sits?" you ask the receptionist.'
  250. '"We''ll take care of it, don''t you worry!" she says, typing your name into the computer and leads you to a free seat, "The hairdresser will come around in just a second."'
  251. act 'Sit down':
  252. if pcs_hairlng > 280:
  253. cla & *clr
  254. gs 'stat'
  255. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  256. act 'Yes':
  257. cla & *clr
  258. minut += 30
  259. pcs_hairlng = 261
  260. hbangs = 1
  261. pcs_hairbsh = 1
  262. money -= 750
  263. gs 'stat'
  264. gs 'hairsalon', 'mixed'
  265. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to about the line where your bra sits, in addition she made you a fringe, covering your forehead, as requested.'
  266. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  267. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  268. end
  269. act 'No':
  270. cla & *clr
  271. minut += 30
  272. pcs_hairlng = 261
  273. hbangs = 0
  274. pcs_hairbsh = 1
  275. money -= 750
  276. gs 'stat'
  277. gs 'hairsalon', 'mixed'
  278. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to about the line where your bra sits.'
  279. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  280. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  281. end
  282. else
  283. cla & *clr
  284. minut += 30
  285. pcs_hairlng = 261
  286. pcs_hairbsh = 1
  287. money -= 750
  288. gs 'stat'
  289. gs 'hairsalon', 'mixed'
  290. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to about the line where your bra sits.'
  291. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  292. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  293. end
  294. end
  295. end
  296. end
  297. if pcs_hairlng > 401:
  298. act 'About back length':
  299. cla & *clr
  300. gs 'stat'
  301. '"Could you cut my hair back to about the small of my back?" you ask the receptionist.'
  302. '"Oh, of course! Just a second if you don''t mind..." she says as she adds your name to the system, "Follow me please and I''ll show you to your seat..."'
  303. act 'Sit down':
  304. if pcs_hairlng > 401:
  305. cla & *clr
  306. gs 'stat'
  307. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  308. act 'Yes':
  309. cla & *clr
  310. minut += 30
  311. pcs_hairlng = 401
  312. hbangs = 1
  313. pcs_hairbsh = 1
  314. money -= 750
  315. gs 'stat'
  316. gs 'hairsalon', 'mixed'
  317. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to the small of your back, in addition she made you a fringe, covering your forehead, as requested.'
  318. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  319. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  320. end
  321. act 'No':
  322. cla & *clr
  323. minut += 30
  324. pcs_hairlng = 401
  325. hbangs = 0
  326. pcs_hairbsh = 1
  327. money -= 750
  328. gs 'stat'
  329. gs 'hairsalon', 'mixed'
  330. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to the small of your back.'
  331. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  332. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  333. end
  334. else
  335. cla & *clr
  336. minut += 30
  337. pcs_hairlng = 401
  338. pcs_hairbsh = 1
  339. money -= 750
  340. gs 'stat'
  341. gs 'hairsalon', 'mixed'
  342. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to the small of your back.'
  343. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  344. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  345. end
  346. end
  347. end
  348. end
  349. if pcs_hairlng > 601:
  350. act 'About hip length':
  351. cla & *clr
  352. gs 'stat'
  353. '"Could you cut my hair back to about the top of your hips?" you ask her.'
  354. '"That won''t be any issues!" she says as she fills out a form, asking you some questions. After she''s done, she gestures you sit down on one of the free seat, "The hairdress will see you in a second."'
  355. act 'Sit down':
  356. if pcs_hairlng > 601:
  357. cla & *clr
  358. gs 'stat'
  359. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  360. act 'Yes':
  361. cla & *clr
  362. minut += 30
  363. pcs_hairlng = 601
  364. hbangs = 1
  365. pcs_hairbsh = 1
  366. money -= 750
  367. gs 'stat'
  368. gs 'hairsalon', 'mixed'
  369. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to about the top of your hips, in addition she made you a fringe, covering your forehead, as requested.'
  370. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  371. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  372. end
  373. act 'No':
  374. cla & *clr
  375. minut += 30
  376. pcs_hairlng = 601
  377. hbangs = 0
  378. pcs_hairbsh = 1
  379. money -= 750
  380. gs 'stat'
  381. gs 'hairsalon', 'mixed'
  382. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to about the top of your hips.'
  383. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  384. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  385. end
  386. else
  387. cla & *clr
  388. minut += 30
  389. pcs_hairlng = 601
  390. pcs_hairbsh = 1
  391. money -= 750
  392. gs 'stat'
  393. gs 'hairsalon', 'mixed'
  394. 'About half an hour passes as the hairdresser is done cutting your hair. She cut your hair back to about the top of your hips.'
  395. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  396. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  397. end
  398. end
  399. end
  400. end
  401. if pcs_hairlng > 801:
  402. act 'Cut the tips':
  403. cla & *clr
  404. gs 'stat'
  405. '"Could you cut my hair back a bit?" you ask the receptionist.'
  406. '"Wow, your hair is beautiful! It won''t be any problems!", she tells you and before you know it she shows you to a free chair where you are seated.'
  407. act 'Sit down':
  408. if pcs_hairlng > 801:
  409. cla & *clr
  410. gs 'stat'
  411. 'The hairdresser comes over, "Before we begin, I need to ask if I should cut you a fringe or not?"'
  412. act 'Yes':
  413. cla & *clr
  414. minut += 30
  415. pcs_hairlng = 801
  416. hbangs = 1
  417. pcs_hairbsh = 1
  418. money -= 750
  419. gs 'stat'
  420. gs 'hairsalon', 'mixed'
  421. 'About half an hour passes as the hairdresser is done cutting your hair. She just cuts the tips of your, barely making it shorter and as requested, she cut you a nice fringe, which now covers your forehead.'
  422. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  423. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  424. end
  425. act 'No':
  426. cla & *clr
  427. minut += 30
  428. pcs_hairlng = 801
  429. hbangs = 0
  430. pcs_hairbsh = 1
  431. money -= 750
  432. gs 'stat'
  433. gs 'hairsalon', 'mixed'
  434. 'About half an hour passes as the hairdresser is done cutting your hair. She just cuts the tips of your, barely making it shorter.'
  435. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  436. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  437. end
  438. else
  439. cla & *clr
  440. minut += 30
  441. pcs_hairlng = 801
  442. pcs_hairbsh = 1
  443. money -= 750
  444. gs 'stat'
  445. gs 'hairsalon', 'mixed'
  446. 'About half an hour passes as the hairdresser is done cutting your hair. She just cuts the tips of your, barely making it shorter. '
  447. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  448. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  449. end
  450. end
  451. end
  452. end
  453. end
  454. if $ARGS[0] = 'straighthair':
  455. cla & *clr
  456. gs 'stat'
  457. if pcs_hairlng <= 80:
  458. '"I would like to have my hair straightened..." you tell the receptionist.'
  459. '"Sorry, your hair is too short to straightened. But don''t hesitate to come back when it''s grown out." the receptionist replies, smiling.'
  460. act 'Move away':gt 'hairsalon', 'start'
  461. elseif straight >= 10 or (defcurly = 0 and curly = 0):
  462. '"I would like to have my hair straightened..." you tell the receptionist.'
  463. 'The receptionist looks at you, "I''m sorry but your hair is already as straight as we can make it... Come see us when it''s a bit more curly and we''ll sort you out."'
  464. act 'Move away':gt 'hairsalon', 'start'
  465. elseif hbraids > 0:
  466. '"I would like to have my hair straightened..." you tell the receptionist.'
  467. '"Your hair is in braids right now, to straighten it we would have to remove them. Is that what you want us to do?" the receptionist asks you.'
  468. act 'Yes':
  469. cla
  470. minut += 20
  471. hbraids = 0
  472. money -= 500
  473. curly = 0
  474. gs 'stat'
  475. if defcurly = 0:
  476. gs 'hairsalon', 'mixed'
  477. 'About twenty minutes pass as your braids were removed and your hair was straightened back to its original shape, "You can pay at the reception, hun." the hairdresser tells you before heading off...'
  478. else
  479. straight = rand(14,21)
  480. gs 'hairsalon', 'mixed'
  481. 'About twenty minutes pass as your braids were removed and your hair was straightened back to its original shape, "You can pay at the reception, hun." the hairdresser tells you before heading off...'
  482. end
  483. gs 'stat'
  484. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  485. end
  486. act 'No':gt 'hairsalon', 'start'
  487. else
  488. minut += 20
  489. curly = 0
  490. gs 'stat'
  491. if defcurly = 0:
  492. gs 'hairsalon', 'mixed'
  493. 'About twenty minutes pass as your is straightened back to its original shape, "You can pay at the receptionist." the hairdresser tells you before heading off...'
  494. else
  495. straight = rand(14,21)
  496. gs 'hairsalon', 'mixed'
  497. 'About twenty minutes pass as your is straightened back to its original shape, "You can pay at the receptionist." the hairdresser tells you before heading off...'
  498. end
  499. money -= 500
  500. gs 'stat'
  501. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  502. end
  503. end
  504. if $ARGS[0] = 'curlhair':
  505. cla & *clr
  506. gs 'stat'
  507. if pcs_hairlng <= 80:
  508. '"I would like to have my hair curled!" you tell the receptionist.'
  509. '"Sorry, your hair is too short to curl. But don''t hesitate to come back when it''s grown out." the receptionist replies, smiling.'
  510. act 'Move away':gt 'hairsalon', 'start'
  511. elseif curly >= 10:
  512. '"I would like to have my hair curled!" you tell the receptionist.'
  513. 'The receptionist looks at you, "Your hair is already as curly as we can make it... Come see us when it''s a bit less curly and we''ll sort you out."'
  514. act 'Move away':gt 'hairsalon', 'start'
  515. elseif hbraids > 0:
  516. '"I would like to have my hair curled..." you tell the receptionist.'
  517. '"Your hair is in braids right now, to curl it we would have to remove them. Is that what you want us to do?" the receptionist asks you.'
  518. act 'Yes':
  519. cla
  520. minut += 20
  521. hbraids = 0
  522. money -= 500
  523. gs 'stat'
  524. if defcurly = 0:
  525. curly = rand(14,21)
  526. gs 'hairsalon', 'mixed'
  527. 'About twenty minutes pass as your braids were removed and your hair got curled, "You can pay at the reception, hun." the hairdresser tells you before heading off...'
  528. else
  529. curly = 2147483647
  530. gs 'hairsalon', 'mixed'
  531. 'About twenty minutes pass as your braids were removed and your hair got curled, "You can pay at the reception, hun." the hairdresser tells you before heading off...'
  532. end
  533. gs 'stat'
  534. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  535. end
  536. act 'No':gt 'hairsalon', 'start'
  537. else
  538. minut += 20
  539. money -= 500
  540. gs 'stat'
  541. if defcurly = 0:
  542. curly = rand(14,21)
  543. gs 'hairsalon', 'mixed'
  544. 'About twenty minutes pass as you have your hair curled, "It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  545. else
  546. curly = 2147483647
  547. gs 'hairsalon', 'mixed'
  548. 'About twenty minutes pass as you have your hair curled back to its original shape, "It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  549. end
  550. gs 'stat'
  551. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  552. end
  553. end
  554. if $ARGS[0] = 'dyehair':
  555. clr & cla
  556. gs 'stat'
  557. '"I would like to dye my hair!" you excitedly tell the receptionist.'
  558. 'She smiles hearing you that exicted, "We''ll fix that for you! What colour would like to have your hair dyed?"'
  559. act 'Change your mind':gt 'hairsalon', 'start'
  560. if pcs_haircol ! nathcol:
  561. act'Return to natural colour':
  562. cla & *clr
  563. gs 'stat'
  564. '"I want to go back to my natural hair colour." you say as you pick at your hair in the mirror, "I don''t think <<$pcs_haircol>> is working for me."'
  565. '"Sure thing!", she says in a cheerful way, "Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  566. act 'Sit down':
  567. cla & *clr
  568. minut += 60
  569. money -= 1000
  570. pcs_haircol = nathcol
  571. gs 'stat'
  572. gs 'hairsalon', 'mixed'
  573. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  574. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  575. end
  576. end
  577. end
  578. if pcs_haircol ! 0:
  579. act 'Black':
  580. cla & *clr
  581. gs 'stat'
  582. '"Black!" you say, "I want it to be raven black, dark as the night, please."'
  583. '"Sure thing!", she says in a cheerful way, "Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  584. act 'Sit down':
  585. cla & *clr
  586. minut += 60
  587. pcs_haircol = 0
  588. dyefade = rand(35,42)
  589. collength = pcs_hairlng
  590. money -= 1000
  591. gs 'stat'
  592. gs 'hairsalon', 'mixed'
  593. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  594. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  595. end
  596. end
  597. end
  598. if pcs_haircol ! 1:
  599. act 'Brown':
  600. cla & *clr
  601. gs 'stat'
  602. '"I''d like to have my hair brown!" you say.'
  603. '"Sure thing!", she says in a cheerful way, "Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  604. act 'Sit down':
  605. cla & *clr
  606. minut += 60
  607. pcs_haircol = 1
  608. dyefade = rand(35,42)
  609. collength = pcs_hairlng
  610. money -= 1000
  611. gs 'stat'
  612. gs 'hairsalon', 'mixed'
  613. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  614. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  615. end
  616. end
  617. end
  618. if pcs_haircol ! 2:
  619. act 'Red':
  620. cla & *clr
  621. gs 'stat'
  622. '"I''d like to have my hair colour in a fiercely red!" you say with a devilish grin.'
  623. '"Sure thing!", she says in a cheerful way, "Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  624. act 'Sit down':
  625. cla & *clr
  626. minut += 60
  627. pcs_haircol = 2
  628. dyefade = rand(35,42)
  629. collength = pcs_hairlng
  630. money -= 1000
  631. gs 'stat'
  632. gs 'hairsalon', 'mixed'
  633. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  634. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  635. end
  636. end
  637. end
  638. if pcs_haircol ! 3:
  639. act 'Blonde':
  640. cla & *clr
  641. gs 'stat'
  642. '"Blonde! Blondes have more fun. I want to see if that is true!" you giggle.'
  643. '"Blondes definitely have more fun!", she says with a wink, "Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  644. act 'Sit down':
  645. cla & *clr
  646. minut += 60
  647. pcs_haircol = 3
  648. dyefade = rand(35,42)
  649. collength = pcs_hairlng
  650. money -= 1000
  651. gs 'stat'
  652. gs 'hairsalon', 'mixed'
  653. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  654. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  655. end
  656. end
  657. end
  658. if pcs_haircol ! 4:
  659. act 'Light red':
  660. cla & *clr
  661. gs 'stat'
  662. '"I want to try something really different." you tell her.'
  663. '"And what would that be?" The receptionist asks cheerfully.'
  664. '"Light red, red like a fire truck." you excitedly tell her.'
  665. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  666. act 'Sit down':
  667. cla & *clr
  668. minut += 45
  669. pcs_haircol = 4
  670. dyefade = rand(35,42)
  671. collength = pcs_hairlng
  672. money -= 1000
  673. gs 'stat'
  674. gs 'hairsalon', 'mixed'
  675. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  676. act 'Move away':gt 'hairsalon', 'start'
  677. end
  678. end
  679. end
  680. if pcs_haircol ! 5:
  681. act 'Dark blue':
  682. cla & *clr
  683. gs 'stat'
  684. '"I want to try something really different." you tell her.'
  685. '"And what would that be?" The receptionist asks cheerfully.'
  686. '"I want a really dark blue colour, almost purple." you excitedly tell her.'
  687. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  688. act 'Sit down':
  689. cla & *clr
  690. minut += 45
  691. pcs_haircol = 5
  692. dyefade = rand(35,42)
  693. collength = pcs_hairlng
  694. money -= 1000
  695. gs 'stat'
  696. gs 'hairsalon', 'mixed'
  697. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  698. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  699. end
  700. end
  701. end
  702. if pcs_haircol ! 6:
  703. act 'Medium blue':
  704. cla & *clr
  705. gs 'stat'
  706. '"I want to try something really different." you tell her.'
  707. '"And what would that be?" The receptionist asks cheerfully.'
  708. '"I feel like trying an electric blue." you excitedly tell her.'
  709. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  710. act 'Sit down':
  711. cla & *clr
  712. minut += 45
  713. pcs_haircol = 6
  714. dyefade = rand(35,42)
  715. collength = pcs_hairlng
  716. money -= 1000
  717. gs 'stat'
  718. gs 'hairsalon', 'mixed'
  719. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  720. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  721. end
  722. end
  723. end
  724. if pcs_haircol ! 7:
  725. act 'Light blue':
  726. cla & *clr
  727. gs 'stat'
  728. '"I want to try something really different." you tell her.'
  729. '"And what would that be?" The receptionist asks cheerfully.'
  730. '"Make my hair light blue, like candy floss." you excitedly tell her.'
  731. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  732. act 'Sit down':
  733. cla & *clr
  734. minut += 45
  735. pcs_haircol = 7
  736. dyefade = rand(35,42)
  737. collength = pcs_hairlng
  738. money -= 1000
  739. gs 'stat'
  740. gs 'hairsalon', 'mixed'
  741. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  742. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  743. end
  744. end
  745. end
  746. if pcs_haircol ! 8:
  747. act 'Dark green':
  748. cla & *clr
  749. gs 'stat'
  750. '"I want to try something really different." you tell her.'
  751. '"And what would that be?" the receptionist asks cheerfully.'
  752. '"I want a deep green, like emerald." you excitedly tell her.'
  753. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  754. act 'Sit down':
  755. cla & *clr
  756. minut += 45
  757. pcs_haircol = 8
  758. dyefade = rand(35,42)
  759. collength = pcs_hairlng
  760. money -= 1000
  761. gs 'stat'
  762. gs 'hairsalon', 'mixed'
  763. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  764. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  765. end
  766. end
  767. end
  768. if pcs_haircol ! 9:
  769. act 'Medium green':
  770. cla & *clr
  771. gs 'stat'
  772. '"I want to try something really different." you tell her.'
  773. '"And what would that be?" The receptionist asks cheerfully.'
  774. '"I''d like a nice forest green, like summer leaves." you excitedly tell her.'
  775. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  776. act 'Sit down':
  777. cla & *clr
  778. minut += 45
  779. pcs_haircol = 9
  780. collength = pcs_hairlng
  781. money -= 1000
  782. gs 'stat'
  783. gs 'hairsalon', 'mixed'
  784. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  785. act 'Move away':gt 'hairsalon', 'start'
  786. end
  787. end
  788. end
  789. if pcs_haircol ! 10:
  790. act 'Light green':
  791. cla & *clr
  792. gs 'stat'
  793. '"I want to try something really different." you tell her.'
  794. '"And what would that be?" The receptionist asks cheerfully.'
  795. '"Can you do a nice light green, sort of like new leaves?" you excitedly tell her.'
  796. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  797. act 'Sit down':
  798. cla & *clr
  799. minut += 45
  800. pcs_haircol = 10
  801. dyefade = rand(35,42)
  802. collength = pcs_hairlng
  803. money -= 1000
  804. gs 'stat'
  805. gs 'hairsalon', 'mixed'
  806. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  807. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  808. end
  809. end
  810. end
  811. if pcs_haircol ! 11:
  812. act 'Dark pink':
  813. cla & *clr
  814. gs 'stat'
  815. '"I want to try something really different." you tell her.'
  816. '"And what would that be?" The receptionist asks cheerfully.'
  817. '"How about a really dark pink, almost like a cross between purple and red." you tell her, smiling.'
  818. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  819. act 'Sit down':
  820. cla & *clr
  821. minut += 45
  822. pcs_haircol = 11
  823. dyefade = rand(35,42)
  824. collength = pcs_hairlng
  825. money -= 1000
  826. gs 'stat'
  827. gs 'hairsalon', 'mixed'
  828. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  829. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  830. end
  831. end
  832. end
  833. if pcs_haircol ! 12:
  834. act 'Medium pink':
  835. cla & *clr
  836. gs 'stat'
  837. '"I want to try something really different." you tell her.'
  838. '"And what would that be?" The receptionist asks cheerfully.'
  839. '"I want it to be pink like bubble gum with maybe a few really light pink streaks." you excitedly tell her.'
  840. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  841. act 'Sit down':
  842. cla & *clr
  843. minut += 45
  844. pcs_haircol = 12
  845. dyefade = rand(35,42)
  846. collength = pcs_hairlng
  847. money -= 1000
  848. gs 'stat'
  849. gs 'hairsalon', 'mixed'
  850. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  851. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  852. end
  853. end
  854. end
  855. if pcs_haircol ! 13:
  856. act 'Light pink':
  857. cla & *clr
  858. gs 'stat'
  859. '"I want to try something really different." you tell her.'
  860. '"And what would that be?" The receptionist asks cheerfully.'
  861. '"A soft light pink, like candy floss." you excitedly tell her.'
  862. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  863. act 'Sit down':
  864. cla & *clr
  865. minut += 45
  866. pcs_haircol = 13
  867. dyefade = rand(35,42)
  868. collength = pcs_hairlng
  869. money -= 1000
  870. gs 'stat'
  871. gs 'hairsalon', 'mixed'
  872. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  873. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  874. end
  875. end
  876. end
  877. if pcs_haircol ! 14:
  878. act 'Dark purple':
  879. cla & *clr
  880. gs 'stat'
  881. '"I want to try something really different." you tell her.'
  882. '"And what would that be?" The receptionist asks cheerfully.'
  883. '"I want it nice dark purple, like a really dark red wine." you excitedly tell her.'
  884. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  885. act 'Sit down':
  886. cla & *clr
  887. minut += 45
  888. pcs_haircol = 14
  889. dyefade = rand(35,42)
  890. collength = pcs_hairlng
  891. money -= 1000
  892. gs 'stat'
  893. gs 'hairsalon', 'mixed'
  894. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  895. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  896. end
  897. end
  898. end
  899. if pcs_haircol ! 15:
  900. act 'Medium purple':
  901. cla & *clr
  902. gs 'stat'
  903. '"I want to try something really different." you tell her.'
  904. '"And what would that be?" The receptionist asks cheerfully.'
  905. '"I''m leaning towards purple, not that dark so you can''t tell it is purple, you know?" you tell her.'
  906. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  907. act 'Sit down':
  908. cla & *clr
  909. minut += 45
  910. pcs_haircol = 15
  911. dyefade = rand(35,42)
  912. collength = pcs_hairlng
  913. money -= 1000
  914. gs 'stat'
  915. gs 'hairsalon', 'mixed'
  916. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  917. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  918. end
  919. end
  920. end
  921. if pcs_haircol ! 16:
  922. act 'Light purple':
  923. cla & *clr
  924. gs 'stat'
  925. '"I want to try something really different." you tell her.'
  926. '"And what would that be?" The receptionist asks cheerfully.'
  927. '"I''m thinking a really light purple colour, like grape soda." you excitedly tell her.'
  928. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  929. act 'Sit down':
  930. cla & *clr
  931. minut += 45
  932. pcs_haircol = 16
  933. dyefade = rand(35,42)
  934. collength = pcs_hairlng
  935. money -= 1000
  936. gs 'stat'
  937. gs 'hairsalon', 'mixed'
  938. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  939. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  940. end
  941. end
  942. end
  943. if pcs_haircol ! 17:
  944. act 'Light orange':
  945. cla & *clr
  946. gs 'stat'
  947. '"I want to try something really different." you tell her.'
  948. '"And what would that be?" The receptionist asks cheerfully.'
  949. '"Light orange, just like a fox." you excitedly tell her.'
  950. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  951. act 'Sit down':
  952. cla & *clr
  953. minut += 45
  954. pcs_haircol = 17
  955. dyefade = rand(35,42)
  956. collength = pcs_hairlng
  957. money -= 1000
  958. gs 'stat'
  959. gs 'hairsalon', 'mixed'
  960. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  961. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  962. end
  963. end
  964. end
  965. if pcs_haircol ! 18:
  966. act 'Dark red':
  967. cla & *clr
  968. gs 'stat'
  969. '"I want to try something really different." you tell her.'
  970. '"And what would that be?" The receptionist asks cheerfully.'
  971. '"Dark Red, like a fine wine." you excitedly tell her.'
  972. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  973. act 'Sit down':
  974. cla & *clr
  975. minut += 45
  976. pcs_haircol = 18
  977. dyefade = rand(23,30)
  978. collength = pcs_hairlng
  979. money -= 1000
  980. gs 'stat'
  981. gs 'hairsalon', 'mixed'
  982. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  983. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  984. end
  985. end
  986. end
  987. if pcs_haircol ! 19:
  988. act 'Medium red':
  989. cla & *clr
  990. gs 'stat'
  991. '"I want to try something really different." you tell her.'
  992. '"And what would that be?" The receptionist asks cheerfully.'
  993. '"Medium Red, just like a cherry." you excitedly tell her.'
  994. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  995. act 'Sit down':
  996. cla & *clr
  997. minut += 45
  998. pcs_haircol = 19
  999. dyefade = rand(23,30)
  1000. collength = pcs_hairlng
  1001. money -= 750
  1002. gs 'stat'
  1003. gs 'hairsalon', 'mixed'
  1004. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  1005. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1006. end
  1007. end
  1008. end
  1009. if pcs_haircol ! 20:
  1010. act 'Turquoise':
  1011. cla & *clr
  1012. gs 'stat'
  1013. '"I want to try something really different." you tell her.'
  1014. '"And what would that be?" The receptionist asks cheerfully.'
  1015. '"Turquoise, just like the oceans." you excitedly tell her.'
  1016. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  1017. act 'Sit down':
  1018. cla & *clr
  1019. minut += 45
  1020. pcs_haircol = 20
  1021. dyefade = rand(23,30)
  1022. collength = pcs_hairlng
  1023. money -= 750
  1024. gs 'stat'
  1025. gs 'hairsalon', 'mixed'
  1026. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  1027. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1028. end
  1029. end
  1030. end
  1031. if pcs_haircol ! 21:
  1032. act 'Medium orange':
  1033. cla & *clr
  1034. gs 'stat'
  1035. '"I want to try something really different." you tell her.'
  1036. '"And what would that be?" The receptionist asks cheerfully.'
  1037. '"Medium orange, just like a pumpkin." you excitedly tell her.'
  1038. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  1039. act 'Sit down':
  1040. cla & *clr
  1041. minut += 45
  1042. pcs_haircol = 21
  1043. dyefade = rand(23,30)
  1044. collength = pcs_hairlng
  1045. money -= 750
  1046. gs 'stat'
  1047. gs 'hairsalon', 'mixed'
  1048. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  1049. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1050. end
  1051. end
  1052. end
  1053. if pcs_haircol ! 22:
  1054. act 'Dark orange':
  1055. cla & *clr
  1056. gs 'stat'
  1057. '"I want to try something really different." you tell her.'
  1058. '"And what would that be?" The receptionist asks cheerfully.'
  1059. '"Dark orange, just like rust-looking." you excitedly tell her.'
  1060. '"Just a second and I''ll see who of our hairdressers'' are available, why don''t you take a seat?" she says and points your over to sit down on one of the seats.'
  1061. act 'Sit down':
  1062. cla & *clr
  1063. minut += 45
  1064. pcs_haircol = 22
  1065. dyefade = rand(23,30)
  1066. collength = pcs_hairlng
  1067. money -= 750
  1068. gs 'stat'
  1069. gs 'hairsalon', 'mixed'
  1070. 'About an hour later your hair is dyed and dried as hairdresser removes the dryer hood, "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  1071. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1072. end
  1073. end
  1074. end
  1075. gs 'stat'
  1076. end
  1077. if $ARGS[0] = 'touchup':
  1078. cla & *clr
  1079. minut += 45
  1080. dyefade = rand(35,42)
  1081. collength = pcs_hairlng
  1082. money -= 500
  1083. gs 'stat'
  1084. 'The receptionist nods her head excitedly and leads you to an empty chair.'
  1085. 'The hairdresser has a bubbly personality, chatting about this and that without pause or much feedback from you, but you don''t mind as it keeps you distracted while you go through the usual wash and dry routine.'
  1086. 'She flits around your head with her tools, and before you know it, your hair is restored to its earlier luster and colour.'
  1087. '"It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  1088. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1089. end
  1090. if $ARGS[0] = 'touchup2':
  1091. cla & *clr
  1092. 'The receptionist smiles apologetically, "Sorry, but you''re going to need a completely new dye job to cover that up. We can help you out with it, if you want? It''s only 1000 <b>₽</b>."'
  1093. act 'Sure':
  1094. cla & *clr
  1095. minut += 45
  1096. dyefade = rand(35,42)
  1097. collength = pcs_hairlng
  1098. money -= 1000
  1099. gs 'stat'
  1100. gs 'hairsalon', 'mixed'
  1101. 'About an hour later, everything should be dried up. The hairdresser removes the dryer hood. "And we''re all done. It''s been great talking to you. You can pay at the reception." the hairdresser tells you, smiling.'
  1102. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1103. end
  1104. act 'No thanks':gt 'hairsalon', 'start'
  1105. end
  1106. if $ARGS[0] = 'braidhair':
  1107. cla & *clr
  1108. '"I would like to have my hair braided!" you tell the receptionist.'
  1109. if hbraids = 20:
  1110. 'The receptionist looks confusingly at you, "Sorry, but your hair is already braided."'
  1111. act 'Move away':gt 'hairsalon', 'start'
  1112. exit
  1113. elseif pcs_hairlng <= 80:
  1114. '"Sorry, but your hair is too short to braid. But don''t hesitate to come back when it''s grown out." the receptionist replies, smiling.'
  1115. act 'Move away':gt 'hairsalon', 'start'
  1116. exit
  1117. elseif pcs_hairlng > 800:
  1118. '"Sorry, but your hair is too long to make a braid that will not fall apart..." the receptionist replies, smiling.'
  1119. act 'Move away':gt 'hairsalon', 'start'
  1120. end
  1121. '"I''ll have someone help you out straight away! Just a second while I get someone, feel free to take a seat." the receptionist tells you.'
  1122. act 'Sit down':
  1123. cla & *clr
  1124. '"Just relax, we''ll be done in no time.", the hairdresser tells you.'
  1125. act 'Relax':
  1126. cla & *clr
  1127. minut += 40
  1128. hbraids = 20
  1129. money -= 1250
  1130. gs 'hairsalon', 'mixed'
  1131. 'About fourty minutes pass as your braids were removed and your hair was straightened back to its original shape, "You can pay at the reception, hun." the hairdresser tells you before heading off...'
  1132. act 'Look in the mirror':gt 'hairsalon', 'mirror'
  1133. end
  1134. end
  1135. end
  1136. if $ARGS[0] = 'mirror':
  1137. cla & *clr
  1138. pcs_mood += 20
  1139. gs 'stat'
  1140. '<center><img <<$set_imgh>> src="<<FUNC(''$face_image'')>>"></center>'
  1141. 'You take a long look at your new hairstyle in the mirror. You''re really pleased with the work that the hairdresser did.'
  1142. act 'Move away':gt 'hairsalon', 'start'
  1143. end
  1144. if $ARGS[0] = 'mixed':
  1145. chat_rand = rand(1,11)
  1146. if chat_rand = 1:
  1147. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "Did you hear about that BDSM club?"'
  1148. 'One of women sitting next to your chair gasp, "No I would never go to such a place."'
  1149. '"Well you know Lana, well she said some guy she dated had been there..." the hairdresser fills in.'
  1150. 'A third woman chimes in, "I hear you can only be invited if someone from within the club vouches for you." The other two look at her.'
  1151. '"What? It''s just what I heard... for this guy..." then they start asking her about this guy.'
  1152. elseif chat_rand = 2:
  1153. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "I was in Moscow last week, great shops. Doesn''t have the same vibe as St. Petersburg."'
  1154. '"Did you go clubbing?" her colleague asks her.'
  1155. 'The hairdresser naughtily looks towards her, "Yeah, met this guy. Dead rich. Sucked his cock in his Maserati."'
  1156. '"No way!" the colleague exclaims.'
  1157. 'Your hairdresser nods, "Yeah, he said he loves girls from St. Petersburg because we''re always up for sex."'
  1158. '"He''s not wrong." as they both start laughing.'
  1159. elseif chat_rand = 3:
  1160. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "Do you have a boyfriend, hun?" the hairdresser asks.'
  1161. 'Before you''re able to answer another hairdresser chimes in, "Be sure to pick one with the biggest cock..."'
  1162. 'The hairdresser turns to her colleague, "You can''t tell that in front of a customer! But you should take her advice, those are the real keepers you''ll thank me later..."'
  1163. elseif chat_rand = 4:
  1164. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "So what is the biggest one you''ve ever had?"'
  1165. '"E-Excuse me?!" you stumble...'
  1166. '"The biggest one I''ve ever had was 18 cm," the woman sitting next to you admits, "I''ve been with one guy that had an enormous one, way bigger than my husbands... that one must''ve been easily over 20 cm." the hairdressers colleague sighs.'
  1167. 'The hairdressers face turns a bit red, "Well there''s that time I was on a trip..." the others turn their attention to her, "I''m not even a size queen, but I''ve never seen anything like it, it was easily 30 cm..." The others start laughing, not really believing the hairdresser...'
  1168. elseif chat_rand = 5:
  1169. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "So I was helping Anastasia dyeing a customers hair," she stops and scans the room, "But we really messed up the hair..."'
  1170. '"Oh, yeah. What did you do?" her colleague pries.'
  1171. '"I left Anastasia alone only for a moment and I don''t know what she did but the customer started balding..." the hairdresser says a bit worryingly, "I''m surprised that she got to keep the job..."'
  1172. elseif chat_rand = 6:
  1173. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "Have you heard about the commotion at the Sauna the other day?"'
  1174. '"No, what happened?!" you curiously ask.'
  1175. '"Apparently there are rumors going around that it''s all a big front for a brothel, but I wouldn''t know, I''ve never visited the place..." she whispers.'
  1176. elseif chat_rand = 7:
  1177. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "Scandalous, I can''t believe what our city has come to..."'
  1178. '"What''s wrong now?" her colleague chimes in.'
  1179. '"There are lots of street walkers turning up lately everywhere..." the hairdresser concernedly, "No one wants to see that around the town. It gives it a bad reputation. I really hope that the police take care of it."'
  1180. elseif chat_rand = 8:
  1181. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "Oh girl you look so beautiful, you should try out modeling"'
  1182. '"Who me?!" you try to avert the attention from yourself.'
  1183. '"Yes, you. There''s a model agency here in the city center that you should go and see. I''m positive they''ll take you on." the hairdresser speaks in a convinced manner.'
  1184. elseif chat_rand = 9:
  1185. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "I had a customer not too long ago spending money like crazy..."'
  1186. '"Oh?" her colleague turns her attention to the conversation, "A rich husband?"'
  1187. 'The hairdresser shakes her head, "No, she was in adult movies. There''s a porn studio here in the city center. They pay good money but I don''t know, I would never be caught alive shooting a sex movie for everyone to watch. Who knows what crazy people are out there."'
  1188. '"And think about your family finding out, that would ruin all those relationships..." the colleague adds.'
  1189. elseif chat_rand = 10:
  1190. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "So I had a customer the other day, that was a bit off if we put it that way..."'
  1191. 'Everyone around turn their attention towards the hairdresser waiting for her to continue, "Yeah, so there was an older lady, really sweet and everything but in the middle of the appointment she pulled out a boiled egg, peeled it and ate it just like it was nothing. Just a bit weird you know..."'
  1192. elseif chat_rand = 11:
  1193. 'The hairdresser proceeds working on your hair and quickly gets into gossiping, "So I had this glammed up woman visiting me not too long ago... She was really fit and good-looking, I won''t lie I was jelaous and was pretty bitchy to her."'
  1194. '"Why is that? A customer is a customer no matter who it is." her colleague starts arguing with the hairdresser.'
  1195. '"I know, but with that body I couldn''t help myself and do you know where she worked?!" she raises her voice a little, "As a stripper, can you believe it?! At that strip joint, in the red light district by the industry area. I hated her so much, only because she was so damn good-looking..."'
  1196. else
  1197. gs 'hairsalon', 'mixed'
  1198. end
  1199. end
  1200. --- hairsalon ---------------------------------