1
0

dolls 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327
  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. '<center><table border=1><<$Headerstring>></center>'
  100. act 'Return':
  101. cla
  102. minut += 5
  103. gt 'dolls', 'start'
  104. end
  105. if Clothingstock > 15:
  106. i = 1
  107. elseif Clothingstock > 7:
  108. i = 3
  109. else
  110. i = 2
  111. end
  112. :loopalt
  113. if alternative[i] = 0:
  114. gs 'clothing_attributes', 'alternative', i
  115. if clothingfilter_comf = 0 and CloExhibit + 10 < pcs_exhibition:
  116. 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>'
  117. elseif clothingfilter_daring = 0 and CloExhibit + 10 >= pcs_exhibition and CloExhibit <= pcs_exhibition:
  118. 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>'
  119. elseif clothingfilter_too_daring = 0 and CloExhibit > pcs_exhibition:
  120. 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>'
  121. end
  122. end
  123. i += 3
  124. if i <= 129:jump 'loopalt'
  125. end
  126. if $ARGS[0] = 'alternative':
  127. cla
  128. if alternative[i] ! 0:
  129. msg 'You already own these clothes.'
  130. gt 'dolls', 'clothing'
  131. end
  132. gt 'clothing', 'view_clothing_item', 'shop', 'alternative',i, 10000
  133. end
  134. if $ARGS[0] = 'shoes':
  135. $metka = 'shoes'
  136. $loc = 'dolls'
  137. *clr
  138. cla
  139. gs'stat'
  140. act 'Return':
  141. cla
  142. minut += 5
  143. gt 'dolls', 'start'
  144. end
  145. if Clothingstock > 11:
  146. i = 1
  147. else
  148. i = 2
  149. end
  150. :loopdolls_shoes
  151. 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>'
  152. i += 2
  153. if i <= 27:jump 'loopdolls_shoes'
  154. end
  155. if $ARGS[0] = 'dolls_shoes': gt 'shoes', 'view_shoe_item', 'shop', 'dolls',i, 5000
  156. if $ARGS[0] = 'purses':
  157. $metka = 'purses'
  158. $loc = 'dolls'
  159. *clr
  160. cla
  161. gs'stat'
  162. act 'Return':
  163. cla
  164. minut += 5
  165. gt 'dolls', 'start'
  166. end
  167. i = 1
  168. :loopdolls_purses
  169. 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>'
  170. i += 1
  171. if i <= 22:jump 'loopdolls_purses'
  172. end
  173. if $ARGS[0] = 'purses2': gt 'purses', 'view_purse_item', 'shop', 'dolls',i, 7000
  174. if $ARGS[0] = 'savva':
  175. *clr
  176. cla
  177. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  178. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  179. if know_Savva = 0:
  180. '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?"'
  181. else
  182. '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?"'
  183. end
  184. act 'Ask him about the shop':
  185. *clr
  186. cla
  187. npc_rel['A204'] += 2
  188. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  189. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  190. '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.'
  191. act 'Continue': gt 'dolls', 'savva'
  192. end
  193. !!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.
  194. if Anush_dolls = 2:
  195. act 'Anushka sent me':
  196. *clr
  197. cla
  198. npc_rel['A204'] += 3
  199. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  200. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  201. '"A friend of mine Anushka sent me." You tell him with a smile.'
  202. 'He laughs a bit. "Well you must lead a real interesting life then, if she is your friend. So you from Pavlovsk too?"'
  203. 'You nod a bit. "Yeah we go to school together actually."'
  204. '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."'
  205. *nl
  206. '"She is a wild one that''s for sure, anyways she told me you could help and that you owe her one."'
  207. '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.'
  208. !!can this be coded so Sveta gets a discount on all items here after this conversation.
  209. act 'Continue': gt 'dolls', 'savva'
  210. end
  211. end
  212. act 'Flirt with him':
  213. *clr
  214. cla
  215. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  216. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  217. '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.'
  218. act 'Continue': gt 'dolls', 'savva'
  219. end
  220. act 'Chat with him':
  221. *clr
  222. cla
  223. know_Savva = 1
  224. npc_rel['A204'] += 3
  225. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  226. '<center><img <<$set_imgh>> src="images/characters/city/savva/savva.jpg"></center>'
  227. '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.'
  228. 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.'
  229. act 'Continue': gt 'dolls', 'savva'
  230. end
  231. act 'Return': gt 'dolls', 'start'
  232. end
  233. if $ARGS[0] = 'viola':
  234. *clr
  235. cla
  236. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  237. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  238. if know_Viola = 0:
  239. '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?"'
  240. else
  241. '"What''s up, <<$pcs_nickname>>? You here to do a little shopping or to kill some time?"'
  242. end
  243. act 'Ask her about the shop':
  244. *clr
  245. cla
  246. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  247. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  248. '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.'
  249. act 'Continue': gt 'dolls', 'viola'
  250. end
  251. !!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.
  252. if Anush_dolls = 2:
  253. act 'Anushka sent me':
  254. *clr
  255. cla
  256. Anush_dolls = 3
  257. npc_rel['A205'] += 5
  258. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  259. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  260. '"A friend of mine Anushka sent me." You tell her with a smile.'
  261. '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."'
  262. *nl
  263. '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."'
  264. *nl
  265. '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.'
  266. !!can this be coded so Sveta gets a discount on all items here after this conversation.
  267. act 'Continue': gt 'dolls', 'viola'
  268. end
  269. end
  270. act 'Flirt with her':
  271. *clr
  272. cla
  273. npc_rel['A205'] += 3
  274. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  275. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  276. '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.'
  277. act 'Continue': gt 'dolls', 'viola'
  278. end
  279. act 'Chat with her':
  280. *clr
  281. cla
  282. know_Viola = 1
  283. npc_rel['A205'] += 2
  284. '<center><b><font color="maroon">Patch Work Dolls</font></b></center>'
  285. '<center><img <<$set_imgh>> src="images/characters/city/viola/viola.jpg"></center>'
  286. '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.'
  287. act 'Continue': gt 'dolls', 'viola'
  288. end
  289. act 'Return': gt 'dolls', 'start'
  290. end
  291. --- dolls ---------------------------------