pav_pharmacy.qsrc 33 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481
  1. # pav_pharmacy
  2. $location_type = 'public_indoors'
  3. if $ARGS[0] = 'start' or $message ! '':
  4. CLOSE ALL
  5. *clr & cla
  6. $loc = 'pav_pharmacy'
  7. $loc_arg = 'start'
  8. $menu_loc = 'pav_pharmacy'
  9. $menu_arg = 'start'
  10. menu_off = 0
  11. if sound = 0:PLAY 'sound/shop.mp3',30
  12. gs 'stat'
  13. if gatabletkiday ! daystart: gap_bc_count = 0
  14. if galubriday ! daystart: gap_lub_count = 0
  15. if gapregday ! daystart: gap_preg_count = 0
  16. if gaprezikday ! daystart: gap_condom_count = 0
  17. if gabotsmlday ! daystart: gap_botsml_count = 0
  18. if gabotmedday ! daystart: gap_botmed_count = 0
  19. if (hour >= 9 and hour < 13) or (hour >= 14 and hour <= 18) and week < 6:
  20. gaptek_aunt_hours = 1
  21. else
  22. gaptek_aunt_hours = 0
  23. end
  24. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  25. if gaptek_aunt_hours = 1:
  26. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  27. else
  28. if pav_pharma_day ! daystart: pav_pharma_day = daystart & pav_pharma_picrand = rand(1,4)
  29. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_worker_'+pav_pharma_picrand+'.jpg"></center>'
  30. end
  31. *nl
  32. act 'Leave the pharmacy':gt 'pav_commercial'
  33. if $message ! '':
  34. $message
  35. killvar '$message'
  36. '"Do you need anything else?"'
  37. else
  38. if StoryLine = 0 or gaptek_aunt_hours = 0:
  39. 'The woman behind the counter in a white coat greets you, "Hello, what you need?"'
  40. else
  41. 'Aunt Luda is sitting behind the counter, as usual. She gives you a friendly nod when she sees you: "Hi <<$pcs_firstname>>! How are you?"'
  42. end
  43. end
  44. *nl
  45. *pl '<center><table align="center" width=80%>'
  46. !!I want to change this so Sveta can always buy the stuff below regardless who is working. Not sure how to change the code so just leaving this note. The first time Sveta buys condoms, pregnancy test, birth control, or lubricant I want it to go to if $ARGS[0] = 'first_time_buy_luda':
  47. if gaptek_aunt_hours = 0 or StoryLine = 0:
  48. if preziktype = 0:
  49. *P FUNC ('$stock_item', 5, 'Condoms', 300, 'prezik', 'pav_pharmacy', 'start')
  50. elseif preziktype = 1 or preziktype = 2:
  51. *P FUNC ('$stock_item', 5, 'Condoms', 300, 'prezikcount', 'pav_pharmacy', 'start')
  52. end
  53. *P FUNC ('$stock_item', 1, 'Pregnancy test', 530, 'pregtest', 'pav_pharmacy', 'start')
  54. *P FUNC ('$stock_item', 1, 'Birth control pills', 1870, 'tabletki', 'pav_pharmacy', 'start')
  55. *P FUNC ('$stock_item', 1, 'Morning after pill', 740, 'morning_after_pill', 'pav_pharmacy', 'start')
  56. *P FUNC ('$stock_item', 10, 'Antibiotics', 580, 'lekarstvo', 'pav_pharmacy', 'start')
  57. *P FUNC ('$stock_item', 30, 'Vitamins', 130, 'vitamin', 'pav_pharmacy', 'start')
  58. *P FUNC ('$stock_item', 50, 'Painkillers', 435, 'painkiller', 'pav_pharmacy', 'start')
  59. *P FUNC ('$stock_item', 10, 'Ointments for chafing', 372, 'mosolmaz', 'pav_pharmacy', 'start')
  60. *P FUNC ('$stock_item', 20, 'Lubricant', 145, 'lubri', 'pav_pharmacy', 'start')
  61. *P FUNC ('$stock_item', 30, 'Lip balm', 127, 'lipbalm', 'pav_pharmacy', 'start')
  62. *P FUNC ('$stock_item', 12, 'Weight loss pill', 248, 'fatdel', 'pav_pharmacy', 'start')
  63. *P FUNC ('$stock_item', 20, 'Tampons', 200, 'tampon', 'pav_pharmacy', 'start')
  64. *P FUNC ('$stock_item', 20, 'Sanitary napkins', 100, 'sanpad', 'pav_pharmacy', 'start')
  65. *P FUNC ('$single_stock_item', 1, 'Enema kit', 1250, 'klisma', 'pav_pharmacy', 'start')
  66. *P FUNC ('$single_stock_item', 1, 'Breast pump', 2500, 'breastpump', 'pav_pharmacy', 'start')
  67. *P FUNC ('$stock_item', 3, 'Breastmilk bottle S', 930, 'bpbottles', 'pav_pharmacy', 'start')
  68. *P FUNC ('$stock_item', 2, 'Breastmilk bottle M', 930, 'bpbottlem', 'pav_pharmacy', 'start')
  69. if pcs_knows_nipplecream = 1:
  70. *P FUNC ('$stock_item', 20, 'Nipplebalm', 600, 'bpnipplebalm', 'pav_pharmacy', 'start')
  71. end
  72. *P FUNC ('$single_stock_item', 1, 'Antifungal medication', 1050, 'Kandidoz', 'pav_pharmacy', 'start')
  73. *P '</table></center>'
  74. else
  75. if preziktype = 0:
  76. *P FUNC ('$stock_item', 5, 'Condoms', 300, 'prezik', 'pav_pharmacy', 'buy_condoms')
  77. elseif preziktype = 1 or preziktype = 2:
  78. *P FUNC ('$stock_item', 5, 'Condoms', 300, 'prezikcount', 'pav_pharmacy', 'buy_condoms')
  79. end
  80. *P FUNC ('$stock_item', 1, 'Pregnancy test', 530, 'pregtest', 'pav_pharmacy', 'buy_preg_test')
  81. *P FUNC ('$stock_item', 1, 'Birth control pills', 1870, 'tabletki', 'pav_pharmacy', 'buy_birth_control')
  82. *P FUNC ('$stock_item', 1, 'Morning after pill', 740, 'morning_after_pill', 'pav_pharmacy', 'buy_morning_after')
  83. *P FUNC ('$stock_item', 10, 'Antibiotics', 580, 'lekarstvo', 'pav_pharmacy', 'start')
  84. *P FUNC ('$stock_item', 30, 'Vitamins', 130, 'vitamin', 'pav_pharmacy', 'start')
  85. *P FUNC ('$stock_item', 50, 'Painkillers', 435, 'painkiller', 'pav_pharmacy', 'start')
  86. *P FUNC ('$stock_item', 10, 'Ointments for chafing', 372, 'mosolmaz', 'pav_pharmacy', 'start')
  87. *P FUNC ('$stock_item', 20, 'Lubricant', 145, 'lubri', 'pav_pharmacy', 'buy_lube')
  88. *P FUNC ('$stock_item', 30, 'Lip balm', 127, 'lipbalm', 'pav_pharmacy', 'start')
  89. *P FUNC ('$stock_item', 12, 'Weight loss pill', 248, 'fatdel', 'pav_pharmacy', 'start')
  90. *P FUNC ('$stock_item', 20, 'Tampons', 200, 'tampon', 'pav_pharmacy', 'start')
  91. *P FUNC ('$stock_item', 20, 'Sanitary napkins', 100, 'sanpad', 'pav_pharmacy', 'start')
  92. if klisma > 0:
  93. *P FUNC ('$single_stock_item', 1, 'Enema kit', 1250, 'klisma', 'pav_pharmacy', 'start')
  94. else
  95. *P FUNC ('$single_stock_item', 1, 'Enema kit', 1250, 'klisma', 'pav_pharmacy', 'start')
  96. end
  97. if breastpump > 0:
  98. *P FUNC ('$single_stock_item', 1, 'Breast pump', 2500, 'breastpump', 'pav_pharmacy', 'start')
  99. else
  100. *P FUNC ('$single_stock_item', 1, 'Breast pump', 2500, 'breastpump', 'pav_pharmacy', 'start')
  101. end
  102. *P FUNC ('$stock_item', 3, 'Breastmilk bottle S', 930, 'bpbottles', 'pav_pharmacy', 'start')
  103. *P FUNC ('$stock_item', 2, 'Breastmilk bottle M', 930, 'bpbottlem', 'pav_pharmacy', 'start')
  104. if pcs_knows_nipplecream = 1:
  105. *P FUNC ('$stock_item', 20, 'Nipplebalm', 600, 'bpnipplebalm', 'pav_pharmacy', 'start')
  106. end
  107. if KandidNapr = 1: *P FUNC ('$single_stock_item', 1, 'Antifungal medication', 1050, 'Kandidoz', 'pav_pharmacy', 'start')
  108. *P '</table></center>'
  109. end
  110. end
  111. if $ARGS[0] = 'buy_condoms':
  112. menu_off = 1
  113. *clr & cla
  114. if gaptek_timers['condom'] = daystart:
  115. gt 'pav_pharmacy', 'start'
  116. else
  117. gaptek_timers['condom'] = daystart
  118. end
  119. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  120. gs 'stat'
  121. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  122. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  123. 'You pretend to look at the goods positioned on the shelves, while you consider how to best approach your aunt.'
  124. act'Meekly ask':
  125. cla
  126. *nl
  127. 'Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  128. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  129. if gaptekfirstcondom = 0:
  130. gaptekfirstcondom = 1
  131. minut += 2
  132. if pav_slut > 150:
  133. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word, while looking at the condoms.'
  134. '"What you mean is condoms so you can have sex with boys." She says with a smile.'
  135. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  136. 'You''re not really sure what to say now and your words become a blubbering mess: "Well... but I..." You''re deeply embarrassed that your aunt, and apparently everyone else in town, knows about your promiscuous behavior.'
  137. 'She chuckles at you stumbling over your words, and gives you a reassuring smile: "Don''t worry <<$pcs_nickname>>, I''m just teasing you. I''m not here to judge. I guess it runs in the family; maybe we all carry a slut gene or something. Come on, I''ll show you what we have." She takes you by the hand and leads you to the counter holding the condoms. "We also have birth control pills if you prefer bareback."'
  138. else
  139. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word.'
  140. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  141. 'You blush as you realize she is going to make you say it: "I know, aunt... I need some condoms..."'
  142. 'She just laughs. "Just teasing, <<$pcs_nickname>>. I''ll show you what we have." She takes you by the hand and leads you to the counter holding the condoms. "We also have birth control pills if you prefer bareback."'
  143. end
  144. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  145. if momslut = 1:
  146. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  147. 'You sigh a little. "Yes I know all about <<$npc_nickname[''A29'']>>. I just don''t want to hear about it from her is all."'
  148. 'Luda nods and hands over the package. "Here you go <<$pcs_nickname>>. Don''t use them all at once!" She adds with a wink, you just take your purchase.'
  149. else
  150. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret." Reassured she won''t tell your <<$npc_nickname[''A29'']>>, you pick out the things you need, after that she rings up your purchase and hands you the bag. "Here you go <<$pcs_nickname>>. Don''t use them all at once!" She adds with a wink, you just take your purchase.'
  151. end
  152. else
  153. minut += rand(2, 5)
  154. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  155. if pcs_inhib < 50:
  156. '"Hi Aunt Luda, I need some more condoms." You tell her slightly blushing.'
  157. '"You''re going through them quite fast," she chuckles, as you try to hide your blush.'
  158. 'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
  159. else
  160. '"Hi Aunt Luda, I need some more condoms."'
  161. '"You''re going through them quite fast," she chuckles.'
  162. 'You smile back and shrug non-committally as she holds out the bag for you. "Thank you, Aunt Luda."'
  163. end
  164. '"No problem <<$pcs_nickname>>, have fun," she says as you take your bag.'
  165. end
  166. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  167. end
  168. act'Openly ask':
  169. minut += 1
  170. 'You wait in line until she''s done helping her current customer and walk up to her at the counter.'
  171. cla
  172. if gaptekfirstcondom = 0:
  173. gaptekfirstcondom = 1
  174. '"Hi Aunt Luda. Can I buy some condoms?"'
  175. '"I guess it runs in the family," she chuckles, leading you over to the family planning counter. "Maybe we all carry a slut gene or something. Come on, I''ll show you what we have." As she hands you the pack of condoms, she adds, "We also have birth control pills if you prefer bareback and you know you''re having sex with someone you can trust to be STD free."'
  176. else
  177. '"Hi Aunt Luda, I need some more condoms."'
  178. '"You''re going through them quite fast," she chuckles.'
  179. '"Just being safe," you shrug as you take the condoms from her. "Thanks, Aunt Luda."'
  180. '"Any time, <<$pcs_nickname>>!"'
  181. end
  182. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  183. end
  184. end
  185. if $ARGS[0] = 'buy_birth_control':
  186. menu_off = 1
  187. *clr & cla
  188. if gaptek_timers['birth_control'] = daystart:
  189. gt 'pav_pharmacy', 'start'
  190. else
  191. gaptek_timers['birth_control'] = daystart
  192. end
  193. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 2
  194. gs 'stat'
  195. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  196. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  197. 'You look at the goods positioned on the shelves, while you consider how to best approach your aunt. Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  198. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  199. act'Meekly ask':
  200. cla
  201. if gaptekfirstbirthcontrol = 0:
  202. gaptekfirstbirthcontrol = 1
  203. minut += 2
  204. if pav_slut > 150:
  205. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word, while looking at the birth control pills.'
  206. '"What you mean is birth control pills so you can have sex with boys, without using a condom." She says with a smile.'
  207. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  208. 'You''re not really sure what to say now and your words become a blubbering mess: "Well... but I..." You''re deeply embarrassed that your aunt, and apparently everyone else in town, knows about your promiscuous behavior.'
  209. 'She chuckles at you stumbling over your words, and gives you a reassuring smile: "Don''t worry <<$pcs_nickname>>, I''m just teasing you. I''m not here to judge. I guess it runs in the family; maybe we all carry a slut gene or something. Come on, I''ll show you what we have." She takes you by the hand and leads you to the counter holding the birth control pills. "You might consider condoms too since you seem to have a lot of partners, to protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
  210. else
  211. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word.'
  212. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  213. 'You blush as you realize she is going to make you say it: "I know, aunt... I need some birth control pills..."'
  214. 'She just laughs: "Just teasing, <<$pcs_nickname>>. I''ll show you what we have." She takes you by the hand and leads you to the counter holding the birth control pills. "We also have condoms if you are worried about STD''s. You can never tell who''s clean and who isn''t these days."'
  215. end
  216. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  217. if momslut = 1:
  218. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  219. 'You sigh a little. "Yes I know all about <<$npc_nickname[''A29'']>>. I just don''t want to hear about it from her is all."'
  220. 'Luda nods and hands over the package. "Here you go <<$pcs_nickname>>. Don''t use it all at once!" She adds with a wink, you just take your purchase.'
  221. else
  222. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret." Reassured she won''t tell your <<$npc_nickname[''A29'']>>, you pick out the things you need, after that she rings up your purchase and hands you the bag. "Here you go <<$pcs_nickname>>. Don''t use it all at once!" She adds with a wink, you just take your purchase.'
  223. end
  224. else
  225. minut += rand(2, 5)
  226. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  227. if pcs_inhib < 50:
  228. '"Hi Aunt Luda, I need some more birth control pills." You say as your face heats up.'
  229. '"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'
  230. 'You intently stare at the items, avoiding her gaze as she hands you the bag. "Thank you, Aunt..."'
  231. else
  232. '"Hi Aunt Luda, I need some more birth control pills."'
  233. '"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'
  234. if pilldays >= 18:
  235. '"Mhm, I know. I''ve been on the pill for a while now, but thanks anyway Aunt Luda."'
  236. else
  237. '"Okay, thanks for the advice Aunt Luda."'
  238. end
  239. end
  240. '"No problem <<$pcs_nickname>>. Have fun!" she says as you take your bag.'
  241. end
  242. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  243. end
  244. act'Openly ask':
  245. cla
  246. if gaptekfirstbirthcontrol = 0:
  247. gaptekfirstbirthcontrol = 1
  248. minut += 2
  249. '"Hi Aunt Luda. Can I buy some birth control pills?"'
  250. '"I guess it runs in the family," she chuckles, leading you over to the family planning counter. "Maybe we all carry a slut gene or something. Come on, I''ll show you what we have." As she hands you a box of pills she adds, "You might consider condoms too since you seem to have a lot of partners, to protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
  251. else
  252. '"Hi Aunt Luda, I need some more birth control pills."'
  253. '"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'
  254. if tabletkicpd >= 2:
  255. '"Mhm, I know. I''ve been on the pill for a while now, but thank you anyway Aunt Luda."'
  256. else
  257. '"Okay, thanks for the advice Aunt Luda."'
  258. end
  259. '"No problem <<$pcs_nickname>>, have fun," she says as you take your bag.'
  260. end
  261. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  262. end
  263. end
  264. if $ARGS[0] = 'buy_preg_test':
  265. menu_off = 1
  266. *clr & cla
  267. if gaptek_timers['preg_test'] = daystart:
  268. gt 'pav_pharmacy', 'start'
  269. else
  270. gaptek_timers['preg_test'] = daystart
  271. end
  272. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] = 10
  273. gs 'stat'
  274. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  275. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  276. 'You pretend to look at the goods positioned on the shelves, while you consider how to best approach your aunt. Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  277. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  278. if gaptekfirstpregtest = 0:
  279. gaptekfirstpregtest = 1
  280. minut += 2
  281. prezikcount += 5
  282. if pav_slut > 150:
  283. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word, while looking at the pregnancy tests.'
  284. '"What you mean is pregnancy test so you can see if one of those boys you have been having sex with has knocked you up. You should be more careful and take birth control or start using condoms" She says in a serious tone.'
  285. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  286. 'You''re not really sure what to say now and your words become a blubbering mess: "Well... but I..." You''re deeply embarrassed that your aunt, and apparently everyone else in town, knows about your promiscuous behavior.'
  287. 'She chuckles at you stumbling over your words, and gives you a reassuring smile: "I''m not here to judge. I guess it runs in the family; maybe we all carry a slut gene or something, but you really should take precautions if you are going to have fun. Come on, I''ll show you what we have." She takes you by the hand and takes you to the family planning counter that holds the pregnancy tests as well as birth control pills and condoms. You should really buy some of each for protection against this and STD''s."'
  288. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  289. else
  290. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word.'
  291. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  292. 'You blush as you realize she is going to make you say it: "I know, aunt... I need a pregnancy test..."'
  293. 'She looks a little shocked. "<<$pcs_nickname>> oh my god." Then she shakes her head. "If you are going to be sexual active you really need to use birth control or carry some condoms with you. But let me show you what we have in the way of tests." She takes you by the hand and takes you to the family planning counter that holds the pregnancy tests as well as birth control pills and condoms. "You should really buy some of each for protection against this and STD''s."'
  294. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  295. end
  296. if momslut = 1:
  297. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  298. 'You sigh a little. "Yes I know all about <<$npc_nickname[''A29'']>>. I just don''t want to hear about it from her is all."'
  299. 'Luda nods and hands over the package. "It''s our secret for now, though if that test is positive there''s nothing that will stop her from noticing when your belly starts to round out. Whether it is or it isn''t, I threw in a box of condoms so this doesn''t happen again, okay?"'
  300. else
  301. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret." Reassured she won''t tell your <<$npc_nickname[''A29'']>>, you pick out the things you need, after that she rings up your purchase and hands you the bag. "It''s our secret for now, though if that test is positive there''s nothing that will stop her from noticing when your belly starts to round out. Whether it is or it isn''t, I threw in a box of condoms so this doesn''t happen again, okay?"'
  302. end
  303. 'You gulp, nodding and taking the bag. "Thank you, Aunt Luda."'
  304. '"No problem <<$pcs_nickname>>, but do try to be careful okay?"'
  305. else
  306. minut += rand(2, 5)
  307. prezikcount += 5
  308. if pcs_inhib < 50:
  309. '"Hi Aunt Luda, I need another pregnancy test." You tell her slightly blushing.'
  310. 'She sighs slightly and shakes her head. "You really need to be more careful <<$pcs_nickname>>. Here, take a box of condoms as well and make sure to use them." she says, as you try to hide your blush, as she rings up your purchase before slipping the condoms into your bag.'
  311. 'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
  312. else
  313. '"Hi Aunt Luda, I need another pregnancy test."'
  314. 'She sighs slightly and shakes her head. "You really need to be more careful <<$pcs_nickname>>. Here, take a box of condoms as well and make sure to use them." she says as she rings up your purchase before slipping the condoms into your bag.'
  315. '"Thank you, Aunt."'
  316. end
  317. '"No problem <<$pcs_nickname>>, but seriously! Be careful!" she says as you take your bag.'
  318. end
  319. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  320. end
  321. if $ARGS[0] = 'buy_lube':
  322. menu_off = 1
  323. *clr & cla
  324. if gaptek_timers['lube'] = daystart:
  325. gt 'pav_pharmacy', 'start'
  326. else
  327. gaptek_timers['lube'] = daystart
  328. end
  329. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  330. gs 'stat'
  331. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  332. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  333. 'You pretend to look at the goods positioned on the shelves, while you consider how to best approach your aunt. Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  334. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  335. if gaptekfirstlube = 0:
  336. gaptekfirstlube = 1
  337. minut += 2
  338. if pav_slut > 150:
  339. 'You pretend to look at the goods positioned on the shelves, while you consider how to best approach your aunt. Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  340. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  341. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word, while looking at the lube.'
  342. '"What you mean is lube so you can lets the boys stick their dicks up your ass." She says with a smile.'
  343. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  344. 'You''re not really sure what to say now and your words become a blubbering mess: "Well... but I..." You''re deeply embarrassed that your aunt, and apparently everyone else in town, knows about your promiscuous behavior.'
  345. 'She chuckles at you stumbling over your words, and gives you a reassuring smile: "Don''t worry <<$pcs_nickname>>, I''m just teasing you. I''m not here to judge. I guess it runs in the family; maybe we all carry a slut gene or something. Come on, I''ll show you what we have." She takes you by the hand and leads you to the counter holding the lube, "We also have birth control pills and condoms if you want to things other than anal."'
  346. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  347. else
  348. 'You pretend to look at the goods positioned on the shelves, while you consider how to best approach your aunt. Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  349. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  350. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word, while looking at the lube.'
  351. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  352. 'You blush as you realize she is going to make you say it: "I know, aunt... I need some lube..."'
  353. '"Trying to get around your mothers tests?" She laughs. "Just teasing, <<$pcs_nickname>>. I''ll show you what we have." She takes you by the hand and leads you to the counter holding the lube, "We also have birth control pills and condoms if you want them to fuck your pussy, instead of your butt."'
  354. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  355. end
  356. if momslut = 1:
  357. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  358. 'You sigh a little. "Yes I know all about <<$npc_nickname[''A29'']>>. I just don''t want to hear about it from her is all."'
  359. 'Luda nods and hands over the package. "Here you go <<$pcs_nickname>>. Don''t use it all at once!" She adds with a wink, you just take your purchase.'
  360. else
  361. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret." Reassured she won''t tell your <<$npc_nickname[''A29'']>>, you pick out the things you need, after that she rings up your purchase and hands you the bag. "Here you go <<$pcs_nickname>>. Don''t use it all at once!" She adds with a wink, you just take your purchase.'
  362. end
  363. else
  364. minut += rand(2, 5)
  365. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  366. if pcs_inhib < 50:
  367. '"Hi Aunt Luda, I need some more lube." You tell her slightly blushing.'
  368. '"If you''re going through it fast, you might want to tell the boys to give your poor butt a rest once in awhile," she chuckles, as you try to hide your blush.'
  369. 'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
  370. else
  371. '"Hi Aunt Luda, I need some more lube."'
  372. '"If you''re going through it fast, you might want to tell the boys to give your poor butt a rest once in awhile," she chuckles.'
  373. 'You roll your eyes at her teasing. "As long as I have this my butt will be just fine. Thank you for the lube Aunt Luda."'
  374. end
  375. '"No problem, <<$pcs_nickname>>, have fun," she says as you take your bag.'
  376. end
  377. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  378. end
  379. if $ARGS[0] = 'buy_morning_after':
  380. menu_off = 1
  381. *clr & cla
  382. if gaptek_timers['morning_after'] = daystart:
  383. gt 'pav_pharmacy', 'start'
  384. else
  385. gaptek_timers['morning_after'] = daystart
  386. end
  387. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 2
  388. gs 'stat'
  389. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  390. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  391. 'You look at the goods positioned on the shelves, while you consider how to best approach your aunt. Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  392. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  393. act'Meekly ask':
  394. cla
  395. if gaptekfirstmorningafter = 0:
  396. gaptekfirstmorningafter = 1
  397. minut += 2
  398. if pav_slut > 150:
  399. '"Erm... yes aunt. I need..." You take a deep breath. "I need some Plan B..."'
  400. '"I was wondering if this was going to happen," she sighs, shaking her head.'
  401. 'When she notices your confusion, she adds, "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  402. 'You''re not really sure what to say now and your words become a blubbering mess. "Well... but I..." You''re deeply embarrassed that your aunt, and apparently everyone else in town, knows about your promiscuous behavior.'
  403. '"I guess it runs in the family; maybe we all carry a slut gene or something. I''d hoped you were being safe, but I suppose we all slip up sometimes," she says, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that." She hands you the box.'
  404. '"Take this as soon as possible. It''s most effective the sooner you take it. And if you''re not going to be strict about your condom usage, you should really buy some birth control pills <<$pcs_nickname>>! With how many boys you''ve been seeing, you really ought to be taking it anyways."'
  405. else
  406. '"Erm... yes aunt. I need..." You take a deep breath. "Aunt Luda, I need some Plan B..."'
  407. '"<<$pcs_nickname>>! You need to be more careful!" she says, immediately scurrying over towards the birth control counter.'
  408. 'You blush in embarrassment. "I know, aunt... I just... made a mistake."'
  409. '"Well, we''re all guilty of making those sometimes," she says, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that." She hands you the box.'
  410. '"Take this as soon as possible. It''s most effective the sooner you take it. And maybe you should also buy some birth control pills <<$pcs_nickname>> while you''re here? Then this just has to be a one time thing."'
  411. end
  412. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  413. if momslut = 1:
  414. 'Your aunt gives you a odd look. "You might be surprised dear."'
  415. 'You sigh a little. "Yes I know all about <<$npc_nickname[''A29'']>>. I just don''t want to hear about it from her is all."'
  416. 'Luda nods. "Well, even so, I''m sure she''d prefer hearing that you''re taking this than to find out you''re not. But I promise, this will be our little secret."'
  417. else
  418. 'Luda nods. "Well, even so, I''m sure she''d prefer hearing you''re having sex and taking this than to find out you''re pregnant. But I promise, this will be our little secret."'
  419. end
  420. else
  421. minut += rand(2, 5)
  422. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  423. if pcs_inhib < 50:
  424. '"Aunt Luda," you whisper. "I need another plan B pill."'
  425. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  426. else
  427. '"Hi Aunt Luda, I need another plan B pill."'
  428. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  429. end
  430. '"How many times are you going to make the same mistake <<$pcs_nickname>>?" She shakes her head as she puts the box into the bag and hands it to you. "You need to buy some birth control already. It really isn''t that hard to just take a pill every day you know."'
  431. end
  432. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  433. end
  434. act'Openly ask':
  435. cla
  436. if gaptekfirstmorningafter = 0:
  437. gaptekfirstmorningafter = 1
  438. minut += 2
  439. '"Hi Aunt Luda. I need a Plan B pill."'
  440. if pav_slut > 150:
  441. '"I was wondering if this was going to happen," she sighs, shaking her head.'
  442. 'When she notices your confusion, she adds, "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  443. '"Oh." You wonder how your aunt found out about your sex life. Is your reputation in town really that bad?'
  444. '"I guess it runs in the family; maybe we all carry a slut gene or something. I''d hoped you were being safe, but I suppose we all slip up sometimes," she says, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that." She hands you the box.'
  445. '"Take this as soon as possible. It''s most effective the sooner you take it. And if you''re not going to be strict about your condom usage, you should really buy some birth control pills <<$pcs_nickname>>! With how many boys you''ve been seeing, you really ought to be taking it anyways."'
  446. else
  447. '"<<$pcs_nickname>>! You need to be more careful!" she says, immediately scurrying over towards the birth control counter.'
  448. 'You sigh. "I know, aunt. I just made a mistake this time."'
  449. '"Well, we''re all guilty of making those sometimes," she says, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that." She hands you the box.'
  450. '"Take this as soon as possible. It''s most effective the sooner you take it. And maybe you should also buy some birth control pills <<$pcs_nickname>> while you''re here? Then this just has to be a one time thing."'
  451. end
  452. else
  453. minut += rand(2, 5)
  454. '"Hi Aunt Luda. I need another Plan B pill."'
  455. if pcs_inhib < 50:
  456. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  457. else
  458. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  459. end
  460. '"How many times are you going to make the same mistake <<$pcs_nickname>>?" She shakes her head as she puts the box into the bag and hands it to you. "You need to buy some birth control already. It really isn''t that hard to just take a pill every day you know."'
  461. end
  462. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  463. end
  464. end
  465. --- pav_pharmacy ---------------------------------