pav_pharmacy.qsrc 32 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469
  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. *P FUNC ('$single_stock_item', 1, 'Enema kit', 1250, 'klisma', 'pav_pharmacy', 'start')
  93. *P FUNC ('$single_stock_item', 1, 'Breast pump', 2500, 'breastpump', 'pav_pharmacy', 'start')
  94. *P FUNC ('$stock_item', 3, 'Breastmilk bottle S', 930, 'bpbottles', 'pav_pharmacy', 'start')
  95. *P FUNC ('$stock_item', 2, 'Breastmilk bottle M', 930, 'bpbottlem', 'pav_pharmacy', 'start')
  96. if pcs_knows_nipplecream = 1:
  97. *P FUNC ('$stock_item', 20, 'Nipplebalm', 600, 'bpnipplebalm', 'pav_pharmacy', 'start')
  98. end
  99. *P FUNC ('$single_stock_item', 1, 'Antifungal medication', 1050, 'Kandidoz', 'pav_pharmacy', 'start')
  100. *P '</table></center>'
  101. end
  102. end
  103. if $ARGS[0] = 'buy_condoms':
  104. menu_off = 1
  105. *clr & cla
  106. if gaptek_timers['condom'] = daystart:
  107. gt 'pav_pharmacy', 'start'
  108. else
  109. gaptek_timers['condom'] = daystart
  110. end
  111. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  112. gs 'stat'
  113. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  114. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  115. 'You pretend to look at the goods positioned on the shelves, while you consider how to best approach your aunt.'
  116. act'Meekly ask':
  117. cla
  118. *nl
  119. 'Your aunt notices you staring at the shelves, and comes from behind the counter when she''s done helping her last customer.'
  120. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  121. if gaptekfirstcondom = 0:
  122. gaptekfirstcondom = 1
  123. minut += 2
  124. if pav_slut > 150:
  125. '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.'
  126. '"What you mean is condoms so you can have sex with boys." She says with a smile.'
  127. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  128. '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.'
  129. '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."'
  130. else
  131. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word.'
  132. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  133. 'You blush as you realize she is going to make you say it: "I know, aunt... I need some condoms..."'
  134. '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."'
  135. end
  136. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  137. if momslut = 1:
  138. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  139. '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."'
  140. '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.'
  141. else
  142. '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.'
  143. end
  144. else
  145. minut += rand(2, 5)
  146. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  147. if pcs_inhib < 50:
  148. '"Hi Aunt Luda, I need some more condoms." You tell her slightly blushing.'
  149. '"You''re going through them quite fast," she chuckles, as you try to hide your blush.'
  150. 'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
  151. else
  152. '"Hi Aunt Luda, I need some more condoms."'
  153. '"You''re going through them quite fast," she chuckles.'
  154. 'You smile back and shrug non-committally as she holds out the bag for you. "Thank you, Aunt Luda."'
  155. end
  156. '"No problem <<$pcs_nickname>>, have fun," she says as you take your bag.'
  157. end
  158. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  159. end
  160. act'Openly ask':
  161. minut += 1
  162. 'You wait in line until she''s done helping her current customer and walk up to her at the counter.'
  163. cla
  164. if gaptekfirstcondom = 0:
  165. gaptekfirstcondom = 1
  166. '"Hi Aunt Luda. Can I buy some condoms?"'
  167. '"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."'
  168. else
  169. '"Hi Aunt Luda, I need some more condoms."'
  170. '"You''re going through them quite fast," she chuckles.'
  171. '"Just being safe," you shrug as you take the condoms from her. "Thanks, Aunt Luda."'
  172. '"Any time, <<$pcs_nickname>>!"'
  173. end
  174. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  175. end
  176. end
  177. if $ARGS[0] = 'buy_birth_control':
  178. menu_off = 1
  179. *clr & cla
  180. if gaptek_timers['birth_control'] = daystart:
  181. gt 'pav_pharmacy', 'start'
  182. else
  183. gaptek_timers['birth_control'] = daystart
  184. end
  185. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 2
  186. gs 'stat'
  187. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  188. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  189. '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.'
  190. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  191. act'Meekly ask':
  192. cla
  193. if gaptekfirstbirthcontrol = 0:
  194. gaptekfirstbirthcontrol = 1
  195. minut += 2
  196. if pav_slut > 150:
  197. '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.'
  198. '"What you mean is birth control pills so you can have sex with boys, without using a condom." She says with a smile.'
  199. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  200. '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.'
  201. '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."'
  202. else
  203. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word.'
  204. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  205. 'You blush as you realize she is going to make you say it: "I know, aunt... I need some birth control pills..."'
  206. '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."'
  207. end
  208. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  209. if momslut = 1:
  210. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  211. '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."'
  212. '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.'
  213. else
  214. '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.'
  215. end
  216. else
  217. minut += rand(2, 5)
  218. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  219. if pcs_inhib < 50:
  220. '"Hi Aunt Luda, I need some more birth control pills." You say as your face heats up.'
  221. '"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'
  222. 'You intently stare at the items, avoiding her gaze as she hands you the bag. "Thank you, Aunt..."'
  223. else
  224. '"Hi Aunt Luda, I need some more birth control pills."'
  225. '"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'
  226. if pilldays >= 18:
  227. '"Mhm, I know. I''ve been on the pill for a while now, but thanks anyway Aunt Luda."'
  228. else
  229. '"Okay, thanks for the advice Aunt Luda."'
  230. end
  231. end
  232. '"No problem <<$pcs_nickname>>. Have fun!" she says as you take your bag.'
  233. end
  234. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  235. end
  236. act'Openly ask':
  237. cla
  238. if gaptekfirstbirthcontrol = 0:
  239. gaptekfirstbirthcontrol = 1
  240. minut += 2
  241. '"Hi Aunt Luda. Can I buy some birth control pills?"'
  242. '"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 to protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
  243. else
  244. '"Hi Aunt Luda, I need some more birth control pills."'
  245. '"Make sure you don''t miss a single day or they might not work." she says, as you try to hide your blush.'
  246. if tabletkicpd >= 2:
  247. '"Mhm, I know. I''ve been on the pill for a while now, but thank you anyway Aunt Luda."'
  248. else
  249. '"Okay, thanks for the advice Aunt Luda."'
  250. end
  251. '"No problem <<$pcs_nickname>>, have fun," she says as you take your bag.'
  252. end
  253. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  254. end
  255. end
  256. if $ARGS[0] = 'buy_preg_test':
  257. menu_off = 1
  258. *clr & cla
  259. if gaptek_timers['preg_test'] = daystart:
  260. gt 'pav_pharmacy', 'start'
  261. else
  262. gaptek_timers['preg_test'] = daystart
  263. end
  264. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] = 10
  265. gs 'stat'
  266. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  267. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  268. '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.'
  269. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  270. if gaptekfirstpregtest = 0:
  271. gaptekfirstpregtest = 1
  272. minut += 2
  273. prezikcount += 5
  274. if pav_slut > 150:
  275. '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.'
  276. '"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.'
  277. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  278. '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.'
  279. '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."'
  280. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  281. else
  282. 'You take a deep breath and say: "Erm... yes aunt. I need some ''stuff''," putting extra emphasis on the word.'
  283. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  284. 'You blush as you realize she is going to make you say it: "I know, aunt... I need a pregnancy test..."'
  285. '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."'
  286. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  287. end
  288. if momslut = 1:
  289. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  290. '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."'
  291. '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?"'
  292. else
  293. '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?"'
  294. end
  295. 'You gulp, nodding and taking the bag. "Thank you, Aunt Luda."'
  296. '"No problem <<$pcs_nickname>>, but do try to be careful okay?"'
  297. else
  298. minut += rand(2, 5)
  299. prezikcount += 5
  300. if pcs_inhib < 50:
  301. '"Hi Aunt Luda, I need another pregnancy test." You tell her slightly blushing.'
  302. '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.'
  303. 'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
  304. else
  305. '"Hi Aunt Luda, I need another pregnancy test."'
  306. '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.'
  307. '"Thank you, Aunt."'
  308. end
  309. '"No problem <<$pcs_nickname>>, but seriously! Be careful!" she says as you take your bag.'
  310. end
  311. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  312. end
  313. if $ARGS[0] = 'buy_lube':
  314. menu_off = 1
  315. *clr & cla
  316. if gaptek_timers['lube'] = daystart:
  317. gt 'pav_pharmacy', 'start'
  318. else
  319. gaptek_timers['lube'] = daystart
  320. end
  321. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  322. gs 'stat'
  323. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  324. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  325. '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.'
  326. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  327. if gaptekfirstlube = 0:
  328. gaptekfirstlube = 1
  329. minut += 2
  330. if pav_slut > 150:
  331. '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.'
  332. '"What you mean is lube so you can lets the boys stick their dicks up your ass." She says with a smile.'
  333. 'When she notices your surprised look she adds. "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  334. '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.'
  335. '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."'
  336. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  337. else
  338. '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.'
  339. 'Your aunt pretends to be confused, and teases you, "<<$pcs_nickname>>, what kind of stuff? We sell all kinds of things!"'
  340. 'You blush as you realize she is going to make you say it: "I know, aunt... I need some lube..."'
  341. '"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."'
  342. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  343. end
  344. if momslut = 1:
  345. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  346. '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."'
  347. '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.'
  348. else
  349. '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.'
  350. end
  351. else
  352. minut += rand(2, 5)
  353. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  354. if pcs_inhib < 50:
  355. '"Hi Aunt Luda, I need some more lube." You tell her slightly blushing.'
  356. '"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.'
  357. 'You intently stare at the items, avoiding her gaze as you mutter: "Thank you, Aunt..."'
  358. else
  359. '"Hi Aunt Luda, I need some more lube."'
  360. '"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.'
  361. '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."'
  362. end
  363. '"No problem, <<$pcs_nickname>>, have fun," she says as you take your bag.'
  364. end
  365. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  366. end
  367. if $ARGS[0] = 'buy_morning_after':
  368. menu_off = 1
  369. *clr & cla
  370. if gaptek_timers['morning_after'] = daystart:
  371. gt 'pav_pharmacy', 'start'
  372. else
  373. gaptek_timers['morning_after'] = daystart
  374. end
  375. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 2
  376. gs 'stat'
  377. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  378. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  379. '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.'
  380. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  381. act'Meekly ask':
  382. cla
  383. if gaptekfirstmorningafter = 0:
  384. gaptekfirstmorningafter = 1
  385. minut += 2
  386. if pav_slut > 150:
  387. '"Erm... yes aunt. I need..." You take a deep breath. "I need some Plan B..."'
  388. '"I was wondering if this was going to happen," she sighs, shaking her head.'
  389. 'When she notices your confusion, she adds, "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  390. '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.'
  391. '"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.'
  392. '"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."'
  393. else
  394. '"Erm... yes aunt. I need..." You take a deep breath. "Aunt Luda, I need some Plan B..."'
  395. '"<<$pcs_nickname>>! You need to be more careful!" she says, immediately scurrying over towards the birth control counter.'
  396. 'You blush in embarrassment. "I know, aunt... I just... made a mistake."'
  397. '"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.'
  398. '"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."'
  399. end
  400. 'You can''t help but blush again. "Please don''t tell my <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  401. if momslut = 1:
  402. 'Your aunt gives you a odd look. "You might be surprised dear."'
  403. '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."'
  404. '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."'
  405. else
  406. '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."'
  407. end
  408. else
  409. minut += rand(2, 5)
  410. 'You wait until the last customer leaves the pharmacy, and quickly dart over to the counter.'
  411. if pcs_inhib < 50:
  412. '"Aunt Luda," you whisper. "I need another plan B pill."'
  413. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  414. else
  415. '"Hi Aunt Luda, I need another plan B pill."'
  416. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  417. end
  418. '"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."'
  419. end
  420. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  421. end
  422. act'Openly ask':
  423. cla
  424. if gaptekfirstmorningafter = 0:
  425. gaptekfirstmorningafter = 1
  426. minut += 2
  427. '"Hi Aunt Luda. I need a Plan B pill."'
  428. if pav_slut > 150:
  429. '"I was wondering if this was going to happen," she sighs, shaking her head.'
  430. 'When she notices your confusion, she adds, "Your reputation precedes you, <<$pcs_nickname>>. Everyone in Pavlovsk knows you''re a <<$gnikname>>."'
  431. '"Oh." You wonder how your aunt found out about your sex life. Is your reputation in town really that bad?'
  432. '"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.'
  433. '"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."'
  434. else
  435. '"<<$pcs_nickname>>! You need to be more careful!" she says, immediately scurrying over towards the birth control counter.'
  436. 'You sigh. "I know, aunt. I just made a mistake this time."'
  437. '"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.'
  438. '"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."'
  439. end
  440. else
  441. minut += rand(2, 5)
  442. '"Hi Aunt Luda. I need another Plan B pill."'
  443. if pcs_inhib < 50:
  444. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  445. else
  446. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  447. end
  448. '"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."'
  449. end
  450. act 'Move away from the counter':gt 'pav_pharmacy', 'start'
  451. end
  452. end
  453. --- pav_pharmacy ---------------------------------