1
0

hairsalon.qsrc 52 KB

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