dolls 14 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325
  1. # dolls
  2. !!Savva Timurovich - A204 static_num
  3. !!Viola Valerievna - A205 static_num
  4. if $ARGS[0] = 'start':
  5. $metka = 'start'
  6. $loc = 'dolls'
  7. $location_type = 'public_indoors'
  8. if Anush_dolls = 0:Anush_dolls = 1
  9. clr
  10. minut += 2
  11. gs 'stat'
  12. if night_mode = 1:
  13. fcolor = rgb(255, 255, 255)
  14. bcolor = rgb(0, 0, 0)
  15. lcolor = rgb(106, 90, 205)
  16. else
  17. fcolor = rgb(0, 0, 0)
  18. bcolor = rgb(255, 255, 255)
  19. lcolor = rgb(106, 90, 205)
  20. end
  21. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  22. '<center><img <<$set_imgh>> src="images/locations/city/island/dolls/dolls.jpg"></center>'
  23. 'The store has a small front on a side street but one glance is all you need to tell this is not your average clothing store. Inside the store, shelves and racks of alternative clothes crammed into every available space - anybody setting out to find an inch of wall would have their work cut out for them. The checkout counter is near the entrance.'
  24. if doll_staff_day ! daystart:
  25. if rand(0,1) = 0:
  26. doll_staff = 0
  27. doll_staff_day = daystart
  28. else
  29. doll_staff = 1
  30. doll_staff_day = daystart
  31. end
  32. end
  33. act 'shop':
  34. cla
  35. *clr
  36. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  37. '<center><img <<$set_imgh>> src="images/locations/city/island/dolls/dollsshop.jpg"></center>'
  38. *nl
  39. *nl
  40. *nl
  41. *nl
  42. *nl
  43. *nl
  44. *nl
  45. '<center><a href="exec:gt ''dolls'', ''clothing''">Look at the clothing</a></center>'
  46. '<center><a href="exec:gt ''dolls'', ''shoes''">Look at the shoes</a></center>'
  47. '<center><a href="exec:gt ''dolls'', ''purses''">Look at the purses</a></center>'
  48. !! '<center><a href="exec:gt ''dolls'', ''jewelry''">Look at the jewelry</a></center>'
  49. !! '<center><a href="exec:gt ''dolls'', ''piecrings''">Look at the piecrings</a></center>'
  50. act 'Return': gt 'dolls', 'start'
  51. end
  52. !!here should be a list of clothing you can buy. shoes, jewelry, clothing, piecrings, etc. Just a list of things to buy and click it takes you to a page showing all the items for sale. Like how most shops are done.
  53. if doll_staff = 0:
  54. if know_Savva = 1: 'As you walk in, Savva waves at you and smiles. "Hi <<$pcs_nickname>>, great to see you again! Let me know if I can help you with anything."'
  55. act 'Go to the counter': gt 'dolls', 'savva'
  56. else
  57. if know_Viola = 1: 'As you walk in, Viola winks at you.'
  58. act 'Go to the counter': gt 'dolls', 'viola'
  59. end
  60. act 'Leave': gt 'island'
  61. end
  62. if $ARGS[0] = 'clothing':
  63. $metka = 'clothing'
  64. $loc = 'dolls'
  65. cls
  66. gs'stat'
  67. '<center><b><font color="maroon">Viewing Patchwork Dolls clothing</font></b></center>'
  68. *nl
  69. $Headerstring = '<TH>Prostitute clothing '
  70. if clothingfilter_prost = 0:
  71. $Headerstring += '<a href="exec:clothingfilter_prost = 1 & gt ''dolls'', ''clothing''">Included</a></TH>'
  72. else
  73. $Headerstring += '<a href="exec:clothingfilter_prost = 0 & gt ''dolls'', ''clothing''">Excluded</a></TH>'
  74. end
  75. $Headerstring += '<TH>Bimbo clothing '
  76. if clothingfilter_bimbo = 0:
  77. $Headerstring += '<a href="exec:clothingfilter_bimbo = 1 & gt ''dolls'', ''clothing''">Included</a></TH>'
  78. else
  79. $Headerstring += '<a href="exec:clothingfilter_bimbo = 0 & gt ''dolls'', ''clothing''">Excluded</a></TH>'
  80. end
  81. $Headerstring += '<TH>Clothing you are comfortable wearing '
  82. if clothingfilter_comf = 0:
  83. $Headerstring += '<a href="exec:clothingfilter_comf = 1 & gt ''dolls'', ''clothing''">Included</a></TH>'
  84. else
  85. $Headerstring += '<a href="exec:clothingfilter_comf = 0 & gt ''dolls'', ''clothing''">Excluded</a></TH>'
  86. end
  87. $Headerstring += '<TH>Daring clothing '
  88. if clothingfilter_daring = 0:
  89. $Headerstring += '<a href="exec:clothingfilter_daring = 1 & gt ''dolls'', ''clothing''">Included</a></TH>'
  90. else
  91. $Headerstring += 'g<a href="exec:clothingfilter_daring = 0 & gt ''dolls'', ''clothing''">Excluded</a></TH>'
  92. end
  93. $Headerstring += '<TH>Too daring for you clothing '
  94. if clothingfilter_too_daring = 0:
  95. $Headerstring += '<a href="exec:clothingfilter_too_daring = 1 & gt ''dolls'', ''clothing''">Included</a></TH>'
  96. else
  97. $Headerstring += '<a href="exec:clothingfilter_too_daring = 0 & gt ''dolls'', ''clothing''">Excluded</a></TH>'
  98. end
  99. act 'Return':
  100. cla
  101. minut += 5
  102. gt 'dolls', 'start'
  103. end
  104. if Clothingstock > 15:
  105. i = 1
  106. elseif Clothingstock > 7:
  107. i = 3
  108. else
  109. i = 2
  110. end
  111. :loopalt
  112. if alternative[i] = 0:
  113. gs 'clothing_attributes', 'alternative', i
  114. if clothingfilter_comf = 0 and CloExhibit + 10 < pcs_exhibition:
  115. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''dolls'', ''alternative''"><img src="images/pc/clothing/14alternative/<<i>>.jpg" height="250" /></a>'
  116. elseif clothingfilter_daring = 0 and CloExhibit + 10 >= pcs_exhibition and CloExhibit <= pcs_exhibition:
  117. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''dolls'', ''alternative''"><img src="images/pc/clothing/14alternative/<<i>>.jpg" height="250" /></a>'
  118. elseif clothingfilter_too_daring = 0 and CloExhibit > pcs_exhibition:
  119. if (clothingfilter_prost = 0 or CloStyle ! 4) and (clothingfilter_bimbo = 0 or CloBimbo = 0): *p '<a href="exec: i = <<i>> & gt ''dolls'', ''alternative''"><img src="images/pc/clothing/14alternative/<<i>>.jpg" height="250" /></a>'
  120. end
  121. end
  122. i += 3
  123. if i <= 129:jump 'loopalt'
  124. end
  125. if $ARGS[0] = 'alternative':
  126. cla
  127. if alternative[i] ! 0:
  128. msg 'You already own these clothes.'
  129. gt 'dolls', 'clothing'
  130. end
  131. gt 'clothing', 'view_clothing_item', 'shop', 'alternative',i, 10000
  132. end
  133. if $ARGS[0] = 'shoes':
  134. $metka = 'shoes'
  135. $loc = 'dolls'
  136. *clr
  137. cla
  138. gs'stat'
  139. act 'Return':
  140. cla
  141. minut += 5
  142. gt 'dolls', 'start'
  143. end
  144. if Clothingstock > 11:
  145. i = 1
  146. else
  147. i = 2
  148. end
  149. :loopdolls_shoes
  150. if sdolls[i] = 0:*p '<a href="exec: i = <<i>> & gt ''dolls'', ''dolls_shoes''"><img src="images/pc/shoes/Dolls/<<i>>.jpg" height="250" /></a>'
  151. i += 2
  152. if i <= 27:jump 'loopdolls_shoes'
  153. end
  154. if $ARGS[0] = 'dolls_shoes': gt 'shoes', 'view_shoe_item', 'shop', 'dolls',i, 5000
  155. if $ARGS[0] = 'purses':
  156. $metka = 'purses'
  157. $loc = 'dolls'
  158. *clr
  159. cla
  160. gs'stat'
  161. act 'Return':
  162. cla
  163. minut += 5
  164. gt 'dolls', 'start'
  165. end
  166. i = 1
  167. :loopdolls_purses
  168. if dolls_purse[i] = 0:*p '<a href="exec: i = <<i>> & gt ''dolls'', ''purses2''"><img src="images/pc/purses/dolls/<<i>>.jpg" height="250" /></a>'
  169. i += 1
  170. if i <= 22:jump 'loopdolls_purses'
  171. end
  172. if $ARGS[0] = 'purses2': gt 'purses', 'view_purse_item', 'shop', 'dolls',i, 7000
  173. if $ARGS[0] = 'savva':
  174. *clr
  175. cla
  176. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  177. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  178. if know_Savva = 0:
  179. 'At the counter you see a young man; he looks about your sister''s age but he has a shy, quiet, almost girlish quality about him. As you approach the counter, he quietly asks if you need help, so softly you can barely hear him. "Can I help you?"'
  180. else
  181. 'Savva is working the counter today. As you walk up, he gives you a friendly smile. "Hey <<$pcs_nickname>>, nice to see you again. What can I help you with?"'
  182. end
  183. act 'Ask him about the shop':
  184. *clr
  185. cla
  186. npc_rel['A204'] += 2
  187. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  188. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  189. 'You ask him about the shop. He tells you it opened a few years ago and they mostly cater to the college kids. Occasionally they get hassled by the local gopniks or police, but he likes the job. Then asks if you need help finding a outfit.'
  190. act 'Continue': gt 'dolls', 'savva'
  191. end
  192. !!this only shows up as a option if Anushka sent Sveta to the store from one of her chat options in anushka file or anushapt file.
  193. if Anush_dolls = 2:
  194. act 'Anushka sent me':
  195. *clr
  196. cla
  197. npc_rel['A204'] += 3
  198. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  199. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  200. '"A friend of mine Anushka sent me." You tell him with a smile.'
  201. 'He laughs a bit. "Well you must lead a real interesting life then, if she is your friend. So you from Pavlovsk too?"'
  202. 'You nod a bit. "Yeah we go to school together actually."'
  203. 'He nods a bit. "Cool, I still find it hard to believe that a girl like that has good enough grades to go to the University, guess when that happens I will see a lot more of her."'
  204. *nl
  205. '"She is a wild one that''s for sure, anyways she told me you could help and that you owe her one."'
  206. 'He snorts and shakes his head. "She must be failing math, she doesn''t seem to grasp how to count. But she''s pretty cool and if she sent you, then you have to be ok. So what''s your name?" You tell him your name and he types out a few things on the computer and a few moments later, you hear the sound of something printing. Then he hands over a card. "Here is a VIP customer card, it is good for ten percent off anything in the store. Now you can tell her, she owes me, like I am ever likely to collect." He says with a laugh.'
  207. !!can this be coded so Sveta gets a discount on all items here after this conversation.
  208. act 'Continue': gt 'dolls', 'savva'
  209. end
  210. end
  211. act 'Flirt with him':
  212. *clr
  213. cla
  214. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  215. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  216. 'You think he is pretty cute in a girlish kinda way, so you chat with him about a variety of things and flirt for all you are worth. He seems happy to talk, especially about fashion and music... but either he''s gay or completely oblivious to your flirting.'
  217. act 'Continue': gt 'dolls', 'savva'
  218. end
  219. act 'Chat with him':
  220. *clr
  221. cla
  222. know_Savva = 1
  223. npc_rel['A204'] += 3
  224. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  225. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  226. 'You decide to chat with him. He seems happy to talk with you, especially about fashion and music. You spend some time chatting about a variety of topics.'
  227. if npc_rel['A204'] > 50:'As you do, you eventually touch upon his latest date, some "cutest boy he''s ever seen" that he met in the shop some time ago. He seems to have been dying to tell somebody about it because he just gushes about how handsome the young man is and how great the sex was... Next week, he will likely be talking about another one.'
  228. act 'Continue': gt 'dolls', 'savva'
  229. end
  230. act 'Return': gt 'dolls', 'start'
  231. end
  232. if $ARGS[0] = 'viola':
  233. *clr
  234. cla
  235. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  236. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  237. if know_Viola = 0:
  238. 'At the counter you see a young woman, maybe as old as your sister or a year or two older. She is reading a magazine when you walk up, only glancing up at you as you stop at the counter. "How can I help you?"'
  239. else
  240. '"What''s up, <<$pcs_nickname>>? You here to do a little shopping or to kill some time?"'
  241. end
  242. act 'Ask her about the shop':
  243. *clr
  244. cla
  245. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  246. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  247. 'You ask her about the shop. She tells you the place is only a few years old and is about the only place to buy a decent outfit in the whole city; unless you are willing to shop online, that is, which leads her to talking about the woes of online shopping where clothes don''t fit and never seem to have anywhere near as good a quality as they seem to on the pictures. You get the impression that the topic really bothers her and she could go on for some time if you let her.'
  248. act 'Continue': gt 'dolls', 'viola'
  249. end
  250. !!this only shows up as a option if Anushka sent Sveta to the store from one of her chat options in anushka file or anushapt file.
  251. if Anush_dolls = 2:
  252. act 'Anushka sent me':
  253. *clr
  254. cla
  255. Anush_dolls = 3
  256. npc_rel['A205'] += 5
  257. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  258. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  259. '"A friend of mine Anushka sent me." You tell her with a smile.'
  260. 'Viola perks up a bit at the mention of Anushka. "Oh? You''re friends with Nush? Why didn''t you say so, anyways how is she doing? Raising hell and having fun if I know her."'
  261. *nl
  262. 'You can''t help but grin a little, if you are not mistaken Viola has a thing for Anushka. "She''s good, I was asking her about her clothes. You know she has such good tastes and I asked her where she got them and she said here and you guys could help me out. Oh and she said to tell you, that you owe her one or something like that."'
  263. *nl
  264. 'Viola laughs at that last bit. "I seem to always be owing her, not sure how math works in her head. But if she sent you, then you are in good hands, whats your name?" You tell her your name and she types out a few things on the computer and a few moments later, you hear the sound of something printing. Then she hands over a card. "Here is a VIP customer card, it is good for ten percent off anything in the store. Now you can tell her, she owes me." Viola says with a wink.'
  265. !!can this be coded so Sveta gets a discount on all items here after this conversation.
  266. act 'Continue': gt 'dolls', 'viola'
  267. end
  268. end
  269. act 'Flirt with her':
  270. *clr
  271. cla
  272. npc_rel['A205'] += 3
  273. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  274. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  275. 'As you talk to her, you start flirting and she returns the favor to a point, occasionally touching your hand or shoulder, laughing at some of the things you say... but she never fully commits to flirting with you; either she''s playing hard to get, trying to put you in a good mood to buy stuff, or she is messing with you - you are unsure which one it is.'
  276. act 'Continue': gt 'dolls', 'viola'
  277. end
  278. act 'Chat with her':
  279. *clr
  280. cla
  281. know_Viola = 1
  282. npc_rel['A205'] += 2
  283. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  284. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  285. 'You decide to chat with her and the two of you talk about a variety of topics. She seems happy to talk with you, especially about fashion, techniques on dying your hair, music, and the injustices of life. She mentions how the gopniks hassle some of the gay boys that shop here and some time passes, before you decide to do something else.'
  286. act 'Continue': gt 'dolls', 'viola'
  287. end
  288. act 'Return': gt 'dolls', 'start'
  289. end
  290. --- dolls ---------------------------------