1
0

pav_pharmacy.qsrc 91 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132113311341135113611371138113911401141114211431144114511461147114811491150115111521153115411551156115711581159116011611162116311641165116611671168116911701171117211731174117511761177117811791180118111821183118411851186118711881189119011911192119311941195119611971198119912001201120212031204120512061207120812091210121112121213121412151216121712181219122012211222122312241225122612271228122912301231123212331234123512361237123812391240124112421243124412451246124712481249125012511252125312541255125612571258125912601261126212631264126512661267126812691270127112721273127412751276127712781279128012811282128312841285128612871288128912901291129212931294129512961297129812991300130113021303130413051306130713081309131013111312131313141315131613171318131913201321132213231324132513261327132813291330133113321333133413351336133713381339134013411342134313441345134613471348134913501351135213531354135513561357135813591360136113621363136413651366136713681369137013711372137313741375137613771378137913801381138213831384138513861387138813891390139113921393139413951396139713981399140014011402140314041405140614071408140914101411141214131414141514161417141814191420142114221423142414251426142714281429143014311432143314341435143614371438143914401441144214431444144514461447144814491450145114521453145414551456145714581459146014611462146314641465146614671468146914701471147214731474147514761477147814791480148114821483148414851486148714881489149014911492149314941495149614971498149915001501150215031504150515061507150815091510151115121513151415151516151715181519152015211522152315241525152615271528152915301531153215331534153515361537153815391540154115421543154415451546154715481549155015511552155315541555155615571558155915601561156215631564156515661567156815691570157115721573157415751576157715781579158015811582158315841585158615871588158915901591159215931594159515961597159815991600160116021603160416051606160716081609161016111612161316141615161616171618161916201621162216231624162516261627162816291630163116321633163416351636163716381639164016411642164316441645164616471648164916501651165216531654165516561657165816591660166116621663166416651666166716681669167016711672167316741675167616771678167916801681168216831684168516861687
  1. # pav_pharmacy
  2. $location_type = 'public_indoors'
  3. !! LudaQW['KnowsSexActive'] is for her quest with Olu
  4. !! LudaQW['knows_sex'] is just to check whether she knows for sure whether or not you are sexually active
  5. !! pharmacy['arrive'] is to determine what kind of dialogue you get from who''s behind the counter
  6. !! pharmacy['first_purchase'] = 1 will skip the prologue dialogue when buying multiple items in a row
  7. if $ARGS[0] = 'start':
  8. CLOSE ALL
  9. *clr & cla
  10. $loc = 'pav_pharmacy'
  11. $loc_arg = 'start'
  12. $menu_loc = 'pav_pharmacy'
  13. $menu_arg = 'start'
  14. menu_off = 0
  15. if sound = 0:PLAY 'sound/shop.mp3',30
  16. gs 'stat'
  17. if gatabletkiday ! daystart: gap_bc_count = 0
  18. if galubriday ! daystart: gap_lub_count = 0
  19. if gapregday ! daystart: gap_preg_count = 0
  20. if gaprezikday ! daystart: gap_condom_count = 0
  21. if gabotsmlday ! daystart: gap_botsml_count = 0
  22. if gabotmedday ! daystart: gap_botmed_count = 0
  23. if ((hour >= 9 and hour < 13) or (hour >= 14 and hour <= 18)) and week < 6:
  24. LudaQW['work_hours'] = 1
  25. else
  26. LudaQW['work_hours'] = 0
  27. end
  28. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  29. if LudaQW['work_hours'] = 1:
  30. if LudaQW['free_condoms'] = 0 and $message = '':gt'pav_pharmacy','luda_free_condoms'
  31. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  32. if pharmacy_timers['birth_control'] > 0 and pharmacy_timers['birth_control'] < daystart - 30 and LudaQW['birth_control_worry'] = 0 and LudaQW['bc_shot_know'] = 0:gt'pav_pharmacy','luda_birth_control_worry'
  33. else
  34. if pav_pharma_day ! daystart: pav_pharma_day = daystart & pav_pharma_picrand = rand(1,4)
  35. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_worker_'+pav_pharma_picrand+'.jpg"></center>'
  36. end
  37. *nl
  38. act 'Leave the pharmacy':pharmacy['arrive'] = 0 & pharmacy['first_purchase'] = 0 & gt 'pav_commercial'
  39. if pharmacy['arrive'] = 1 or $message ! '':
  40. if $message ! '':
  41. $message
  42. killvar '$message'
  43. end
  44. '"Do you need anything else?"'
  45. else
  46. pharmacy['arrive'] = 1
  47. if LudaQW['work_hours'] = 0:
  48. 'The woman behind the counter in a white coat greets you, "Hello, what you need?"'
  49. else
  50. 'Aunt Luda is sitting behind the counter and greets you as you walk in.'
  51. '"Hi <<$pcs_nickname>>, are you looking for something?"'
  52. !! if rand(0,1) = 1:
  53. !! '"Hi <<$pcs_firstname>>! How are you?"'
  54. !! else
  55. !! 'She''s busy with a customer right now but acknowledges you with a glance.'
  56. !! end
  57. end
  58. end
  59. *nl
  60. *pl '<center><table align="center" width=80%>'
  61. !!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':
  62. if LudaQW['work_hours'] = 0:
  63. if preziktype = 0:
  64. *P func ('$stock_item', 5, 'Condoms', 300, 'prezik', 'pav_pharmacy', 'start')
  65. elseif preziktype = 1 or preziktype = 2:
  66. *P func ('$stock_item', 5, 'Condoms', 300, 'prezikcount', 'pav_pharmacy', 'start')
  67. end
  68. *P func ('$stock_item', 1, 'Pregnancy test', 530, 'pregtest', 'pav_pharmacy', 'start')
  69. if therapistFuckedPussyStage < 2:
  70. *P func ('$stock_item', 1, 'Birth control pills', 1870, 'tabletki', 'pav_pharmacy', 'start')
  71. end
  72. *P func ('$stock_item', 1, 'Morning after pill', 740, 'morning_after_pill', 'pav_pharmacy', 'start')
  73. *P func('$stock_item', 10, 'Antibiotics', 580, 'lekarstvo', 'pav_pharmacy', 'start')
  74. *P func ('$stock_item', 30, 'Vitamins', 130, 'vitamin', 'pav_pharmacy', 'start')
  75. *P func ('$stock_item', 50, 'Painkillers', 435, 'painkiller', 'pav_pharmacy', 'start')
  76. *P func ('$stock_item', 10, 'Ointments for chafing', 372, 'mosolmaz', 'pav_pharmacy', 'start')
  77. *P func ('$stock_item', 20, 'Lubricant', 145, 'lubri', 'pav_pharmacy', 'start')
  78. *P func ('$stock_item', 30, 'Lip balm', 127, 'lipbalm', 'pav_pharmacy', 'start')
  79. *P func ('$stock_item', 12, 'Weight loss pill', 248, 'fatdel', 'pav_pharmacy', 'start')
  80. *P func ('$stock_item', 20, 'Tampons', 200, 'tampon', 'pav_pharmacy', 'start')
  81. *P func ('$stock_item', 20, 'Sanitary napkins', 100, 'sanpad', 'pav_pharmacy', 'start')
  82. *P func ('$single_stock_item', 1, 'Enema kit', 1250, 'klisma', 'pav_pharmacy', 'start')
  83. *P func ('$single_stock_item', 1, 'Breast pump', 2500, 'breastpump', 'pav_pharmacy', 'start')
  84. *P func ('$stock_item', 3, 'Breastmilk bottle S', 930, 'bpbottles', 'pav_pharmacy', 'start')
  85. *P func ('$stock_item', 2, 'Breastmilk bottle M', 930, 'bpbottlem', 'pav_pharmacy', 'start')
  86. if pcs_knows_nipplecream = 1:
  87. *P func ('$stock_item', 20, 'Nipplebalm', 600, 'bpnipplebalm', 'pav_pharmacy', 'start')
  88. end
  89. *P func ('$single_stock_item', 1, 'Antifungal medication', 1050, 'Kandidoz', 'pav_pharmacy', 'start')
  90. *P '</table></center>'
  91. else
  92. if preziktype = 0:
  93. *P func ('$stock_item', 5, 'Condoms', 300, 'prezik', 'pav_pharmacy', 'buy_condoms')
  94. elseif preziktype = 1 or preziktype = 2:
  95. *P func ('$stock_item', 5, 'Condoms', 300, 'prezikcount', 'pav_pharmacy', 'buy_condoms')
  96. end
  97. *P func ('$stock_item', 1, 'Pregnancy test', 530, 'pregtest', 'pav_pharmacy', 'buy_preg_test')
  98. if therapistFuckedPussyStage < 2:
  99. *P func ('$stock_item', 1, 'Birth control pills', 1870, 'tabletki', 'pav_pharmacy', 'buy_birth_control')
  100. end
  101. *P func ('$stock_item', 1, 'Morning after pill', 740, 'morning_after_pill', 'pav_pharmacy', 'buy_morning_after')
  102. *P func ('$stock_item', 10, 'Antibiotics', 580, 'lekarstvo', 'pav_pharmacy', 'start')
  103. *P func ('$stock_item', 30, 'Vitamins', 130, 'vitamin', 'pav_pharmacy', 'start')
  104. *P func ('$stock_item', 50, 'Painkillers', 435, 'painkiller', 'pav_pharmacy', 'start')
  105. *P func ('$stock_item', 10, 'Ointments for chafing', 372, 'mosolmaz', 'pav_pharmacy', 'ointment')
  106. *P func ('$stock_item', 20, 'Lubricant', 145, 'lubri', 'pav_pharmacy', 'buy_lube')
  107. *P func ('$stock_item', 30, 'Lip balm', 127, 'lipbalm', 'pav_pharmacy', 'start')
  108. *P func ('$stock_item', 12, 'Weight loss pill', 248, 'fatdel', 'pav_pharmacy', 'start')
  109. *P func ('$stock_item', 20, 'Tampons', 200, 'tampon', 'pav_pharmacy', 'start')
  110. *P func ('$stock_item', 20, 'Sanitary napkins', 100, 'sanpad', 'pav_pharmacy', 'start')
  111. *P func ('$single_stock_item', 1, 'Enema kit', 1250, 'klisma', 'pav_pharmacy', 'start')
  112. *P func ('$single_stock_item', 1, 'Breast pump', 2500, 'breastpump', 'pav_pharmacy', 'start')
  113. *P func ('$stock_item', 3, 'Breastmilk bottle S', 930, 'bpbottles', 'pav_pharmacy', 'start')
  114. *P func ('$stock_item', 2, 'Breastmilk bottle M', 930, 'bpbottlem', 'pav_pharmacy', 'start')
  115. if pcs_knows_nipplecream = 1:
  116. *P func ('$stock_item', 20, 'Nipplebalm', 600, 'bpnipplebalm', 'pav_pharmacy', 'start')
  117. end
  118. *P func ('$single_stock_item', 1, 'Antifungal medication', 1050, 'Kandidoz', 'pav_pharmacy', 'start')
  119. *P '</table></center>'
  120. end
  121. end
  122. if $ARGS[0] = 'buy_condoms':
  123. menu_off = 1
  124. minut += 2
  125. *clr & cla
  126. if pharmacy_timers['condom_timer'] = daystart or LudaQW['birth_control_timer'] = daystart:
  127. gt 'pav_pharmacy', 'start'
  128. else
  129. pharmacy_timers['condom_timer'] = daystart
  130. end
  131. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  132. gs 'stat'
  133. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  134. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  135. act'Meekly ask':
  136. cla & *nl
  137. act 'Continue':gt 'pav_pharmacy', 'start'
  138. if pharmacy['first_purchase'] = 0:
  139. pharmacy['first_purchase'] = 1
  140. 'You awkwardly avoid eye contact, letting your gaze "wander" the shelves behind her, pretending to be looking for anything <i>except</i> condoms. You gulp, feeling your cheeks redden.'
  141. end
  142. !! '"Hi <<$pcs_nickname>>, are you looking for something?"'
  143. if pharmacy['morning_after'] > 0 and LudaQW['condom_scold'] < pharmacy['morning_after']:
  144. LudaQW['condom_scold'] = pharmacy['morning_after']
  145. '"I need some <i>stuff</i>, Aunt Luda," you say in a low voice, trying to be discreet.'
  146. if fame['pav_slut'] > 150:
  147. '"<<$pcs_nickname>>..."'
  148. 'She gives you a flat stare. "Be straight with me. We both know what this is about. If you''re going to be sexually active, especially if you''re going to go so far to end up as a town bicycle, you can''t be embarrassed about buying ''stuff.'' Now, speak clearly. Are you looking fror something?"'
  149. 'You take a deep breath, feeling like you''re a child again, being forced to apologize for breaking something.'
  150. '"I need some condoms Aunt Luda," you mumble, looking down. Luda smiles at you and plops a box immediately onto the counter. <i>How did she know I wanted condoms?</i>'
  151. '"See? Was that so hard?" She continues to smile at you as you snatch it up and stuff it into your purse. "Now, was there anything else you needed?"'
  152. else
  153. '"What do you mean stuff?" she asks innocently. "We have all kinds of stuff. Do you mean lip balm? Or anti-itch cream? Or birth control? Or by chance, maybe some anal lub-"'
  154. '"Condoms!" you hiss, looking around the room to see if anybody is watching. "I need condoms Aunt Luda."'
  155. 'Luda chuckles and pulls out a box of condoms that she was clearly holding right behind the counter.'
  156. '"Glad to see you''re being safer about it this time," she says, handing it over. "Now, was there anything else you needed?"'
  157. end
  158. gs 'pav_pharmacy', 'dont_tell'
  159. elseif LudaQW['condoms'] = 0 and LudaQW['knows_sex'] ! 1:
  160. LudaQW['condoms'] = 1
  161. LudaQW['knows_sex'] = 1
  162. '"I need some <i>stuff</i>, Aunt Luda," you say in a low voice, trying to be discreet.'
  163. if fame['pav_slut'] > 150:
  164. if LudaQW['condom_give_day'] - daystart < 7:
  165. '"You''ve used up my gift already?" Luda laughs in surprise, which only serves to make you blush even harder. "Everyone in Pavlovsk calls you a <<$gnikname>>, but it hasn''t even been a week yet darling."'
  166. else
  167. '"Used up my gift already?" Luda asks, which only serves to make you blush even harder. "I''m not surprised, given what I hear about you around town. Everyone in Pavlovsk seems to think of you as a <<$gnikname>>."'
  168. end
  169. '"Well... but I..." Deeply embarrassed that your aunt —and apparently everyone else in town— knows about your promiscuous behavior, you''re not really sure what to say. She chuckles and gives you a reassuring smile.'
  170. '"Don''t worry <<$pcs_nickname>>, I''m just teasing," she giggles, putting a box of condoms into a bag and sliding it across the counter to you. "I''m not here to judge. Goodness knows, I''d be one to talk."'
  171. 'She pulls a box of condoms from behind the counter and places into a paper bag, sliding it across the counter towards you.'
  172. if pharmacyfirstbirthcontrol = 0:
  173. '"We also have birth control pills if you''d like to start going bareback."'
  174. gs 'pav_pharmacy', 'birth_control_addon'
  175. end
  176. else
  177. if LudaQW['condom_give_day'] - daystart < 7:
  178. '"You''ve used up my gift already?" Luda laughs in surprise, which only serves to make you blush even harder. "Darling, it hasn''t even been a week!"'
  179. else
  180. '"Used up my gift already?" Luda asks, which only serves to make you blush even harder. "I''m glad it went to good use."'
  181. end
  182. 'She pulls a box of condoms from behind the counter and places into a paper bag, sliding it across the counter towards you.'
  183. if pharmacyfirstbirthcontrol = 0:
  184. '"We also have birth control pills if you''d like to start going bareback."'
  185. gs 'pav_pharmacy', 'birth_control_addon'
  186. end
  187. end
  188. gs 'pav_pharmacy', 'dont_tell'
  189. else
  190. '"Aunt Luda," you whisper quickly, feeling your face heat up even as you try to rush through the words. "I need some more condoms."'
  191. if pcs_inhib < 50:
  192. '"You''re going through them quite fast," she chuckles slipping a box of condoms into a paper bag and you feel your blush intensify.'
  193. '"Thank you, Aunt..." you mumble, taking the bag and stuffing it into your purse.'
  194. else
  195. '"You''re going through them quite fast." Your aunt smiles at you as she slips a box of condoms into a paper bag, holding it out. You blush, but smile back anyways, shrugging non-committally as you take the bag.'
  196. '"Thank you, Aunt Luda."'
  197. end
  198. '"No problem darling. Have fun!" she smirks.'
  199. end
  200. end
  201. act'Openly ask':
  202. minut += 1
  203. cla & *nl
  204. if LudaQW['condoms'] = 0:
  205. LudaQW['condoms'] = 1
  206. '"Hi Aunt Luda. Can I buy some condoms?"'
  207. if LudaQW['knows_sex'] = 0:
  208. LudaQW['knows_sex'] = 1
  209. if LudaQW['condom_give_day'] - daystart < 7:
  210. '"You''ve used up my gift already?" Luda laughs in surprise. "Darling, it hasn''t even been a week!"'
  211. 'You shrug casually.'
  212. '"Turns out I really like having sex."'
  213. '"It runs in the family," she chuckles, smiling at you fondly and reaching for a box of rubbers and puts them into a bag. "Maybe we all carry a slut gene or something."'
  214. else
  215. '"Used up my gift already?" Luda smiles. "I''m glad it went to good use."'
  216. end
  217. act 'Continue':gt 'pav_pharmacy', 'start'
  218. if pharmacyfirstbirthcontrol = 0:
  219. '"We also have birth control pills if you''d like to start going bareback."'
  220. gs 'pav_pharmacy', 'birth_control_addon'
  221. end
  222. elseif pharmacyfirstbirthcontrol = 1:
  223. '"Are you seeing someone new?" Luda asks curiously as she gets a box of rubbers and places in in a bag. "Or just being careful? I thought you were already on birth control."'
  224. act'Someone new':
  225. cla & *nl
  226. '"Someone new," you smile. "Haven''t gotten around to making sure they''re clean yet."'
  227. '"Well I hope you do it soon." She hands you the bag before cupping a hand around her mouth and leaning in. "I prefer bareback too."'
  228. '"Thanks Aunt Luda," you say, rolling your eyes affectionately.'
  229. '"Any time darling."'
  230. act 'Continue':gt 'pav_pharmacy', 'start'
  231. end
  232. act'Hookups':
  233. cla & *nl
  234. '"I''ve been having a lot of one night stands lately," you tell her.'
  235. '"Ahh. Glad to know my neice is popular <i>and</i> smart," she winks. "Stay safe, darling."'
  236. '"That''s why I''m here, Aunt Luda," you wink back, taking the rubbers.'
  237. act 'Continue':gt 'pav_pharmacy', 'start'
  238. end
  239. act'Just being safe':
  240. cla & *nl
  241. '"Just being safe," you shrug. "Birth control can too. Condoms can too. Better if I use both, isn''t it?"'
  242. '"Good girl." She smiles at you proudly, handing you the box.'
  243. '"Thanks, Aunt Luda."'
  244. '"Any time, darling!"'
  245. act 'Continue':gt 'pav_pharmacy', 'start'
  246. end
  247. elseif pharmacyfirstbirthcontrol = 0:
  248. '"Of course, darling." She rummages around the counter and comes up with a box of rubbers. "We also have birth control pills if you prefer bareback. As long as you know your partner is clean, of course."'
  249. gs 'pav_pharmacy', 'birth_control_addon'
  250. else
  251. '"Of course, darling!" Luda rummages around under the counter and comes up with a box of rubbers and slides them across to you.'
  252. '"Keep coming back," she winks.'
  253. act 'Continue':gt 'pav_pharmacy', 'start'
  254. end
  255. else
  256. '"Hi Aunt Luda, I need some more condoms."'
  257. '"You''re going through them quite fast," she chuckles reaching below the counter and pulling up a box of condoms.'
  258. act'Just being safe':
  259. cla & *nl
  260. '"Just being safe," you shrug, taking the box from her. "Thanks, Aunt Luda."'
  261. '"Any time, darling!"'
  262. act 'Continue':gt 'pav_pharmacy', 'start'
  263. end
  264. act'I''m having a lot of sex':
  265. cla & *nl
  266. '"I''m not sure if this is a contributing factor," you say, pretending to think. "But it might be because I''m having a lot of sex."'
  267. 'You grin at your aunt and she laughs openly.'
  268. '"And a lot of fun too, I hope," she winks. "Stay safe, darling."'
  269. '"That''s why I''m here, Aunt Luda," you wink back, taking the rubbers.'
  270. act 'Continue':gt 'pav_pharmacy', 'start'
  271. end
  272. end
  273. end
  274. end
  275. if $ARGS[0] = 'condom_addon_start1':
  276. if LudaQW['condoms'] = 0:
  277. '"Since you seem to have a lot of partners, did you want some more condoms? To protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
  278. gs 'pav_pharmacy', 'condom_addon'
  279. end
  280. end
  281. if $ARGS[0] = 'condom_addon_start':
  282. if LudaQW['condoms'] = 0:
  283. '"We also have condoms if you are worried about STD''s. You can never tell who''s clean and who isn''t these days."'
  284. gs 'pav_pharmacy', 'condom_addon'
  285. end
  286. end
  287. if $ARGS[0] = 'condom_addon':
  288. if money >= 300:
  289. act'Might as well':
  290. LudaQW['condoms'] = 1
  291. LudaQW['knows_sex'] = 1
  292. money -= 300
  293. if preziktype = 0:
  294. prezik += 5
  295. elseif preziktype = 1 or preziktype = 2:
  296. prezikcount += 5
  297. end
  298. cla & *clr
  299. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  300. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  301. '"I might as well," you nod. "Just to be safe."'
  302. '"It always pays to be safe," Luda says, nodding once and adding a box of condoms to your purchase.'
  303. act 'Continue':gt 'pav_pharmacy', 'start'
  304. end
  305. end
  306. if LudaQW['knows_sex'] = 0:
  307. act'It''s for my cycle':
  308. cla & *clr
  309. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  310. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  311. '"It''s just for my cycle Aunt Luda," you protest. She smiles at you with a suspicious twist at the corner of her mouth. "I''m not having sex."'
  312. '"Well, I can''t prove otherwise, so I suppose I''ll just have to take you at your word..."'
  313. act 'Continue':gt 'pav_pharmacy', 'start'
  314. end
  315. end
  316. end
  317. if $ARGS[0] = 'buy_birth_control':
  318. menu_off = 1
  319. *clr & cla
  320. if pharmacy_timers['birth_control'] = daystart or LudaQW['birth_control_timer'] = daystart:
  321. gt 'pav_pharmacy', 'start'
  322. else
  323. pharmacy_timers['birth_control'] = daystart
  324. end
  325. if LudaQW['birth_control_worry'] >= 2:gt 'pav_pharmacy', 'luda_birth_control_start_again_meek'
  326. if LudaQW['birth_control_worry'] = 1: LudaQW['birth_control_worry'] = 0
  327. gs 'stat'
  328. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  329. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  330. if pharmacy['first_purchase'] = 0:
  331. pharmacy['first_purchase'] = 1
  332. 'You awkwardly avoid eye contact, letting your gaze "wander" around the pharmacy, pretending you don''t know what you''re here for. Finally, you take a deep breath, feeling your cheeks redden.'
  333. end
  334. !! '"Hi <<$pcs_nickname>>, are you looking for something?"'
  335. act'Meekly ask':
  336. cla & *clr
  337. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  338. if pharmacyfirstbirthcontrol = 0:
  339. pharmacyfirstbirthcontrol = 1
  340. minut += 2
  341. if pharmacy['morning_after'] > 2 or pharmacyfirstpregtest > 0:
  342. '"Erm... yes aunt. I need some <i>stuff</i>," you say looking meaningfully at the birth control pills.'
  343. '"Well it''s about time," Luda says, rolling her eyes dramatically, swiftly grabbing a package and placing it on top of the counter. "I was wondering how many accidents you''d go through before you would wise up and do the safe thing."'
  344. elseif fame['pav_slut'] > 150:
  345. LudaQW['knows_sex'] = 1
  346. '"Erm... yes aunt. I need some <i>stuff</i>," you say, looking to the side, avoiding eye contact.'
  347. '"What you mean is birth control pills so you can start having fun without fear," she says with a smile. You look at her surprised. "I''m not deaf <<$pcs_nickname>>. I can hear just about everyone in Pavlovsk calling you a <<$gnikname>>."'
  348. act'Stammer':
  349. cla & *clr
  350. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  351. '"Well... but I..." You''re not really sure what to say and you''re deeply embarrassed that your aunt, and apparently everyone else in town, knows about your promiscuous behavior. She chuckles and gives you a reassuring smile.'
  352. '"Don''t worry <<$pcs_nickname>>, I''m just teasing," she giggles, putting a box of pills into a bag and sliding it across the counter to you. "I''m not here to judge. It runs in the family; maybe we all carry a slut gene or something."'
  353. act 'Continue':gt 'pav_pharmacy', 'start'
  354. if LudaQW['condoms'] = 0:
  355. '"Since you seem to have a lot of partners, did you want some condoms too? To protect you from STD''s of course. You can never tell who''s clean and who isn''t these days."'
  356. gs 'pav_pharmacy', 'condom_addon'
  357. end
  358. gs 'pav_pharmacy', 'dont_tell'
  359. end
  360. act'You want to stop using condoms':
  361. cla & *clr
  362. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  363. '"I don''t like using condoms..." you mumble. The admission somehow manages to make your face grow even hotter.'
  364. '"Neither do I," Luda giggles, putting a box of pills into a bag and sliding it across the counter to you. "I think it runs in the family."'
  365. act 'Continue':gt 'pav_pharmacy', 'start'
  366. gs 'pav_pharmacy', 'dont_tell'
  367. end
  368. act'I''m just being safe':
  369. cla & *clr
  370. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  371. '"I''m just being safe," you mumble, feeling your face somehow grow even hotter. "I still use condoms, but I don''t want to rely only on them."'
  372. '"I''m glad my neice is being smart," she nods, putting a box of pills into a bag and sliding it across the counter to you. "It''s good to protect yourself from STD''s too. You never know who''s clean these days. Since that''s the case, would you get some more condoms while you''re here?"'
  373. act 'No thanks':gt 'pav_pharmacy', 'start'
  374. gs 'pav_pharmacy', 'condom_addon'
  375. gs 'pav_pharmacy', 'dont_tell'
  376. end
  377. else
  378. 'You take a deep breath.'
  379. '"Erm... yes aunt. I need some <i>stuff</i>," you say, looking meaningfully at the birth control pills.'
  380. '"Used up my gift already?" Luda asks, smiling impishly. "Or did you just decide you prefer it bareback?"'
  381. act'Ran out':
  382. LudaQW['knows_sex'] = 1
  383. cla & *clr
  384. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  385. if LudaQW['condom_give_day'] - daystart < 7:
  386. '"I ran out," you admit, blushing deeply and Luda laughs in surprise.'
  387. '"Darling, it hasn''t even been a week!"'
  388. 'Your blush deepens.'
  389. '"Oh don''t worry. I''m not slut shaming you. It runs in the family," she chuckles, smiling at you fondly and reaching for a box of rubbers and puts them into a bag.'
  390. else
  391. '"I ran out," you admit, blushing deeply.'
  392. end
  393. *nl
  394. 'Luda takes a small glance backwards as she finishes ringing you up.'
  395. '"Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  396. act 'No thanks':gt 'pav_pharmacy', 'start'
  397. gs 'pav_pharmacy', 'condom_addon'
  398. gs 'pav_pharmacy', 'dont_tell'
  399. end
  400. act'Hate condoms':
  401. LudaQW['knows_sex'] = 1
  402. cla & *clr
  403. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  404. '"I don''t like using condoms," you blush. "They''re kind of a hassle."'
  405. '"Maybe I should''ve given you pills from the start," she chuckles, ringing up your purchase. "I know you don''t like them, but can I interest you in some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  406. act 'No thanks':gt 'pav_pharmacy', 'start'
  407. gs 'pav_pharmacy', 'condom_addon'
  408. gs 'pav_pharmacy', 'dont_tell'
  409. end
  410. act'Want to try bareback':
  411. LudaQW['knows_sex'] = 1
  412. cla & *clr
  413. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  414. '"I want to see what it''s like without a rubber," you admit, blushing. "But I don''t want to get pregnant either."'
  415. '"Oh, it''s <i>wonderful</i> darling," Luda gushes and your blush deepens. "If you''re anything like the other women in our family, you''ll love it. Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  416. act 'No thanks':gt 'pav_pharmacy', 'start'
  417. gs 'pav_pharmacy', 'condom_addon'
  418. gs 'pav_pharmacy', 'dont_tell'
  419. end
  420. act'Prefer bareback':
  421. LudaQW['knows_sex'] = 1
  422. cla & *clr
  423. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  424. '"It''s not the same with a rubber," you admit, blushing.'
  425. '"I agree," she smirks and your blush deepens. "I should have guessed it runs in the family when your sister started the pill for the same reason. Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  426. act 'No thanks':gt 'pav_pharmacy', 'start'
  427. gs 'pav_pharmacy', 'condom_addon'
  428. gs 'pav_pharmacy', 'dont_tell'
  429. end
  430. act'Being safe':
  431. LudaQW['knows_sex'] = 1
  432. cla & *clr
  433. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  434. if age < 20:
  435. '"I''m still using condoms," you blush. "But the pill will provide an extra safety net. I''d really like to avoid becoming a teen mom."'
  436. '"I would like that too," she smirks, ringing up your purchase. "Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  437. else
  438. '"I''m still using condoms," you blush. "But the pill will provide an extra safety net. I''m not ready to become a mom."'
  439. '"Good," she smiles, ringing up your purchase. "You should enjoy your youth without the responsibility of parenthood. Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  440. end
  441. act 'No thanks':gt 'pav_pharmacy', 'start'
  442. gs 'pav_pharmacy', 'condom_addon'
  443. gs 'pav_pharmacy', 'dont_tell'
  444. end
  445. if (pcs_cp_safe_known + pcs_cp_notsafe_known + pcs_cp_risky_known) > 0:
  446. act'Found out I like creampies':
  447. cla & *clr
  448. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  449. '"Actually I... found out I like it when guys finish inside," you confess. "It feels really good."'
  450. 'Luda raises an eyebrow and you feel a blush spread through your cheeks. '
  451. '"I hope you used my other gift then when you found out?" she asks.'
  452. if stat['morning_after_pill'] > 0:
  453. '"I did," you nod, blush intensifying as you do.'
  454. '"Good," she says, ringing up your purchase. "You''d be a fool if you didn''t."'
  455. *nl
  456. '"Remeber to take these every day," she advises, handing over the pills. "It doesn''t work unless it''s every single day. In fact, they''ll make it more likely for you to get pregnant instead. Which is very bad news for a girl who likes creampies."'
  457. '"Thank you, Aunt Luda..." you say, taking them and putting them into your purse.'
  458. else
  459. 'Your stomach drops and you feel the blood drain from your face.'
  460. '"I, uhh... I forgot...?" you say, cringing.'
  461. '"<<$pcs_firstname>>!" she says, putting her hands on her hips. "What is the matter with you? How could you forget! This is why I gave it to you in the first place!"'
  462. 'Luda shakes her head, making clicking noises with her tongue to herself as she rings up your purchase.'
  463. *nl
  464. '"<i>Don''t</i> forget to take these," she warns, handing over the pills. "Every day young lady, or they won''t work. In fact, they''ll make it more likely for you to get pregnant instead."'
  465. '"Yes, Aunt Luda..." you say, taking them and putting them into your purse.'
  466. end
  467. act 'Continue':gt 'pav_pharmacy', 'start'
  468. end
  469. end
  470. if LudaQW['knows_sex'] = 0:
  471. act'It''s for my cycle':
  472. cla & *clr
  473. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  474. if stat['think_virgin'] = 1:
  475. '"I just want to regulate my cycle Aunt Luda," you protest, blushing deeply. "I''m not having sex."'
  476. else
  477. '"I just want to regulate my cycle Aunt Luda," you lie, blushing deeply. "I''m not having sex."'
  478. end
  479. 'She smiles at you with a suspicious twist at the corner of her mouth.'
  480. '"Well, I can''t prove otherwise, so I suppose I''ll just have to take you at your word..."'
  481. act 'Continue':gt 'pav_pharmacy', 'start'
  482. end
  483. end
  484. end
  485. else
  486. if pcs_inhib < 50:
  487. '"I need some more birth control pills, Aunt Luda," you mumble.'
  488. '"Make sure you take them every day," she says, ringing you up and putting the pills into a bag. "Skipping days is dangerous, it will make you more likely to get pregnant than less."'
  489. 'You stare down at the counter, avoiding her gaze as she hands you your purchase.'
  490. '"Thank you, Aunt..."'
  491. else
  492. '"I need some more birth control pills, Aunt Luda." You manage to say it with a straight face, though you still feel your cheeks heat up.'
  493. '"Make sure you don''t miss a single day or they might not work," she says, ringing you up and putting the pills into a bag. "Skipping days is dangerous, it will make you more likely to get pregnant than less."'
  494. if birth_control['think_safe'] = 1:
  495. '"Mhm, I know. I''ve been on the pill for a while now, but thanks anyway Aunt Luda."'
  496. else
  497. '"Okay, thanks for the advice Aunt Luda."'
  498. end
  499. end
  500. '"No problem <<$pcs_nickname>>. Have fun!" she winks.'
  501. act 'Continue':gt 'pav_pharmacy', 'start'
  502. end
  503. end
  504. act'Openly ask':
  505. cla & *clr
  506. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  507. if pharmacyfirstbirthcontrol = 0:
  508. pharmacyfirstbirthcontrol = 1
  509. minut += 2
  510. if pharmacy['morning_after'] > 2 or pharmacyfirstpregtest > 0:
  511. '"Hi Aunt Luda. Can I buy some birth control pills?"'
  512. '"Well it''s about time," Luda says, rolling her eyes dramatically, swiftly grabbing a package and placing it on top of the counter. "I was wondering how many accidents you''d go through before you would wise up and do the safe thing."'
  513. elseif LudaQW['condoms'] = 0:
  514. '"Hi Aunt Luda. Can I buy some birth control pills?"'
  515. '"Did you use up my gift already?" Luda asks, smiling impishly. "Or did you just decide you prefer it bareback?"'
  516. act'Ran out':
  517. LudaQW['knows_sex'] = 1
  518. cla & *clr
  519. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  520. '"I ran out," you admit. "Thank you for your gift by the way."'
  521. if LudaQW['condom_give_day'] - daystart < 7:
  522. '"I ran out," you admit and Luda laughs in surprise.'
  523. '"Darling, it hasn''t even been a week!"'
  524. 'You shrug casually.'
  525. '"Turns out I really like having sex."'
  526. '"It runs in the family," she chuckles, smiling at you fondly and reaching for a box of rubbers and puts them into a bag. "Maybe we all carry a slut gene or something."'
  527. else
  528. '"I ran out," you admit. "But the pill seems like less hassle.'
  529. end
  530. '"I''m glad it went to good use," she chuckles, ringing up your purchase. "Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  531. act 'No thanks':gt 'pav_pharmacy', 'start'
  532. gs 'pav_pharmacy', 'condom_addon'
  533. end
  534. act'Hate condoms':
  535. LudaQW['knows_sex'] = 1
  536. cla & *clr
  537. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  538. '"I''m sick of using condoms," you say, grimacing. "It''s just too much of a hassle. I appreciate the gift, but maybe you should''ve given me a box of pills instead."'
  539. '"I suppose that would have been a little easier," she chuckles, ringing up your purchase. "I know you don''t like them, but can I interest you in some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  540. act 'No thanks':gt 'pav_pharmacy', 'start'
  541. gs 'pav_pharmacy', 'condom_addon'
  542. end
  543. act'Want to try bareback':
  544. LudaQW['knows_sex'] = 1
  545. cla & *clr
  546. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  547. '"I want to see what it''s like without a rubber," you admit, smiling. "But I don''t want the risk that comes with it. Not without birth control at least."'
  548. '"Oh, it''s <i>wonderful</i> darling," Luda gushes. "If you''re anything like the other women in our family, you''ll love it. Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  549. act 'No thanks':gt 'pav_pharmacy', 'start'
  550. gs 'pav_pharmacy', 'condom_addon'
  551. gs 'pav_pharmacy', 'dont_tell'
  552. end
  553. act'Prefer bareback':
  554. LudaQW['knows_sex'] = 1
  555. cla & *clr
  556. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  557. '"Bareback," you admit, smiling. "It''s not the same with a rubber. I can''t feel him inside me. I appreciate the gift, but maybe you should''ve given me a box of pills instead."'
  558. '"I probably should have," she chuckles. "I should have guessed it runs in the family when your sister started the pill for the same reason. Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  559. act 'No thanks':gt 'pav_pharmacy', 'start'
  560. gs 'pav_pharmacy', 'condom_addon'
  561. end
  562. act'Being safe':
  563. LudaQW['knows_sex'] = 1
  564. cla & *clr
  565. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  566. if age < 20:
  567. '"I''m still using condoms," you shrug. "But the pill will provide an extra safety net. I''d really like to avoid becoming a teen mom."'
  568. '"I would like that too," she smirks, ringing up your purchase. "Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  569. else
  570. '"I''m still using condoms," you shrug. "But the pill will provide an extra safety net. I''m not ready to become a mom."'
  571. '"Good," she smiles, ringing up your purchase. "You should enjoy your youth without the responsibility of parenthood. Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  572. end
  573. act 'No thanks':gt 'pav_pharmacy', 'start'
  574. gs 'pav_pharmacy', 'condom_addon'
  575. end
  576. if (pcs_cp_safe_known + pcs_cp_notsafe_known + pcs_cp_risky_known) > 0:
  577. act'Found out I like creampies':
  578. cla & *clr
  579. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  580. '"Actually I... found out I like creampies," you confess, with a wide smile. "It feels really good."'
  581. '"I hope you used my other gift upond discovery?" she asks.'
  582. if stat['morning_after_pill'] > 0:
  583. '"I did," you nod. "It really helped me enjoy the creampie without worry."'
  584. '"Well," she says, returning your smile as she rings up your purchase. "That''s what the gift was for. So you could experiment without fear. So I''m happy it came in handy."'
  585. *nl
  586. '"Remeber to take these every day," she advises, handing over the pills. "It doesn''t work unless it''s every single day. In fact, they''ll make it more likely for you to get pregnant instead. Which is very bad news for a girl who likes creampies."'
  587. '"Thank you, Aunt Luda," you say, taking them and putting them into your purse.'
  588. else
  589. '"Uhh..." You put up your hands and awkwardly smile at her. "Actually... I forgot to...?"'
  590. '"<<$pcs_firstname>>!" she says, putting her hands on her hips. "What is the matter with you? How could you forget! This is why I gave it to you in the first place!"'
  591. 'Luda shakes her head, making clicking noises with her tongue to herself as she rings up your purchase.'
  592. *nl
  593. '"Well <i>don''t</i> forget to take these," she warns, handing over the pills. "Every day young lady, or they won''t work. In fact, they''ll make it more likely for you to get pregnant instead."'
  594. '"Yes, Aunt Luda," you say, giving another cringeworthy smile and putting them into your purse.'
  595. end
  596. act 'Continue':gt 'pav_pharmacy', 'start'
  597. end
  598. end
  599. if LudaQW['knows_sex'] = 0:
  600. act'It''s for my cycle':
  601. cla & *clr
  602. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  603. '"I just want to regulate my cycle Aunt Luda," you protest. "I''m not having sex."'
  604. 'She smiles at you with a suspicious twist at the corner of her mouth.'
  605. '"Well, I can''t prove otherwise, so I suppose I''ll just have to take you at your word..."'
  606. act 'Continue':gt 'pav_pharmacy', 'start'
  607. end
  608. end
  609. !! gs 'pav_pharmacy', 'condom_addon_start'
  610. end
  611. else
  612. '"Can I have some more birth control pills please?"'
  613. '"Of course darling," she says, ringing you up and passing the pills across the counter to you.'
  614. end
  615. act 'Continue':gt 'pav_pharmacy', 'start'
  616. end
  617. end
  618. if $ARGS[0] = 'birth_control_addon':
  619. act'I prefer condoms':
  620. cla & *nl
  621. '"Thanks for the offer, but I''d rather stick to condoms."'
  622. '"If you say so..." Your aunt looks back at you with skepticism. "But even your mother is on the pill now."'
  623. act 'Continue':gt 'pav_pharmacy', 'start'
  624. end
  625. if money < 1870:
  626. act'I don''t have the money':
  627. cla & *nl
  628. '"I don''t have the money," you shrug, smiling wistfully. "Condoms are cheaper."'
  629. '"Well at least you''re being safe in the mean time," she says, handing them over.'
  630. '"Thanks, Aunt Luda."'
  631. '"Any time, darling!"'
  632. act 'Continue':gt 'pav_pharmacy', 'start'
  633. end
  634. else
  635. act'Not a bad idea (buy birth control)':
  636. cla & *nl
  637. pharmacyfirstbirthcontrol = 1
  638. tabletki += 1
  639. money -= 1870
  640. gs 'stat'
  641. '"That''s... not a bad idea. I guess I could while I''m here."'
  642. '"Good choice," Luda says, nodding once and adding on pills to your purchase. "It pays to be safe."'
  643. act 'Continue':gt 'pav_pharmacy', 'start'
  644. end
  645. act'Might as well be safe (buy birth control)':
  646. cla & *nl
  647. pharmacyfirstbirthcontrol = 1
  648. tabletki += 1
  649. money -= 1870
  650. gs 'stat'
  651. '"I guess I might as well. Just to be safe."'
  652. '"It always pays to be safe," Luda says, nodding once and adding on pills to your purchase.'
  653. act 'Continue':gt 'pav_pharmacy', 'start'
  654. end
  655. end
  656. end
  657. if $ARGS[0] = 'buy_preg_test':
  658. menu_off = 1
  659. *clr & cla
  660. if pharmacy_timers['preg_test'] = daystart:
  661. gt 'pav_pharmacy', 'start'
  662. else
  663. pharmacy_timers['preg_test'] = daystart
  664. end
  665. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] = 10
  666. LudaQW['knows_sex'] = 1
  667. gs 'stat'
  668. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  669. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  670. 'You awkwardly avoid eye contact, your stomach a bundle of nerves, stressing you out with what you have to ask her for.'
  671. if pharmacyfirstpregtest = 0:
  672. pharmacyfirstpregtest = 1
  673. if preziktype = 0:
  674. prezik += 5
  675. elseif preziktype = 1 or preziktype = 2:
  676. prezikcount += 5
  677. end
  678. minut += 2
  679. prezikcount += 5
  680. if fame['pav_slut'] > 150:
  681. '"Aunt Luda... I need... I need a pregnancy test."'
  682. 'You glance up expecting an explosive reaction of surprise but are surprised yourself when you see her looking at you with what appeared to be disappointed resignation.'
  683. '"I was wondering if this might happen," she sighs. When she notices your surprised look she adds, "I''m not deaf <<$pcs_nickname>>. I can hear just about everyone in Pavlovsk calling you a <<$gnikname>>. I had just hoped you were being safe."'
  684. '"Well... but I..." Deeply embarrassed that your aunt —and apparently everyone else in town— knows about your promiscuous behavior, you''re not really sure what to say, but she gives you a rueful smile.'
  685. '"Don''t worry, <<$pcs_nickname>>. I''m not here to judge. Accidents happen. Goodness knows, your sister is living proof of that." She puts the test into a bag, sliding it across the counter towards you.'
  686. else
  687. '"Aunt Luda... I need... I need a pregnancy test."'
  688. 'Her eyes go wide.'
  689. '"<<$pcs_nickname>>! What happened??"'
  690. '"I know, Aunt," you say, deeply embarrassed. "I just... made a mistake..."'
  691. '"I guess we all make those," she sighs, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that. Literally."'
  692. 'She hands you the box and you gratefully tuck it into your purse.'
  693. !! if rape[2] > (daystart - 3):
  694. !! act'I was raped':gt 'pav_pharmacy', 'buy_morning_after_raped'
  695. !! end
  696. end
  697. act'Don''t tell <<$npc_nickname[''A29'']>>':
  698. cla & *clr
  699. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  700. LudaQW['dont_tell'] = 1
  701. if momslut >= 1:
  702. '"Please don''t tell <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  703. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  704. 'You sigh a little. "Yes I know all about <<$npc_nickname[''A29'']>>. I just don''t want to get an earful from her is all."'
  705. 'Luda nods and hands over the package. "It''s our secret for now, though if that test comes back positive, there''s nothing that will stop her from noticing when your belly starts to grow. Either way, I threw in a box of condoms so this doesn''t happen again, okay?"'
  706. else
  707. '"You might be surprised dear," your aunt says with an odd smile. "But anyways I promise this is our little secret. At least, if that test is negative. If it comes back positive, there''s nothing that will stop her from noticing when your belly starts to grow. Either way, I threw in a box of condoms so this doesn''t happen again, okay?"'
  708. end
  709. act 'Continue':gt 'pav_pharmacy', 'start'
  710. end
  711. else
  712. minut += rand(2, 5)
  713. prezikcount += 5
  714. act'Meekly ask':
  715. cla & *nl
  716. '"I need... I need another pregnancy test, Aunt Luda" you stammer.'
  717. '"<<$pcs_nickname>>..." she says, looking disappointed. "When are you going to learn?"'
  718. 'You look down, avoiding her gaze as she rings you up.'
  719. '"I''m not trying to lecture you, but seriously! Be careful!" she says as you take your bag. "Or soon there''s going to be more than just sperm swimming around in your belly."'
  720. act 'Continue':gt 'pav_pharmacy', 'start'
  721. end
  722. act'Openly ask':
  723. '"I need another pregnancy test, Aunt Luda," you say, shamelessly.'
  724. '"<<$pcs_nickname>>..." she says, looking disappointed. "When are you going to learn?"'
  725. 'You shrug. "It''s just a mistake auntie," you say, causing Luda to shake her head.'
  726. '"I''m not trying to lecture you, but seriously! Be careful!" she says as you take your bag. "Or soon there''s going to be more than just sperm swimming around in your belly."'
  727. act 'Continue':gt 'pav_pharmacy', 'start'
  728. end
  729. end
  730. end
  731. if $ARGS[0] = 'buy_lube':
  732. menu_off = 1
  733. *clr & cla
  734. if pharmacy_timers['lube'] = daystart:
  735. gt 'pav_pharmacy', 'start'
  736. else
  737. pharmacy_timers['lube'] = daystart
  738. end
  739. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  740. gs 'stat'
  741. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  742. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  743. if pharmacy['first_purchase'] = 0:
  744. pharmacy['first_purchase'] = 1
  745. 'You awkwardly avoid eye contact, letting your gaze "wander" around the pharmacy, pretending you don''t know what you''re here for. Finally, you take a deep breath, feeling your cheeks redden.'
  746. end
  747. if pharmacyfirstlube = 0:
  748. pharmacyfirstlube = 1
  749. minut += 2
  750. if fame['pav_slut'] > 150:
  751. '"Erm... yes aunt. I need some <i>stuff</i>," putting extra emphasis on the word, while looking at the lube.'
  752. '"I was wondering if you were going to ask me for this," she says with a smile. When she notices your surprised look she adds, "When everyone in Pavlovsk is calling you a <<$gnikname>>, it was only a matter of time before you started letting boys go in the back door."'
  753. '"Well... but I..." Deeply embarrassed that your aunt —and apparently everyone else in town— knows about your promiscuous behavior, you''re not really sure what to say. She chuckles and gives you a reassuring smile.'
  754. '"Don''t worry <<$pcs_nickname>>, I''m just teasing," she giggles, putting a box of condoms into a bag and sliding it across the counter to you. "I''m not here to judge. Goodness knows, I''d be one to talk. I go through two tubes a month!"'
  755. else
  756. '"Erm... yes aunt. I need some <i>stuff</i>," putting extra emphasis on the word, while looking at the lube.'
  757. '"Trying to get around your mother''s rules by using your ass, <<$pcs_nickname>>?" she asks, smirking.'
  758. 'Your face manages to heat up even more.'
  759. '"I, uhh..."'
  760. '"Don''t worry," she chuckles. "Your sister asked me for the same thing when she was your age. A little earlier, in fact."'
  761. end
  762. else
  763. if pcs_inhib < 50:
  764. '"Hi Aunt Luda, I need some more lube," You tell her slightly blushing.'
  765. '"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. You blush harder, avoiding her gaze as she hands you the bag.'
  766. else
  767. '"Hi Aunt Luda, I need some more lube."'
  768. '"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.'
  769. '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."'
  770. '"No problem, darling, have fun," she says as you take your bag.'
  771. end
  772. end
  773. act 'Continue':gt 'pav_pharmacy', 'start'
  774. end
  775. if $ARGS[0] = 'buy_morning_after':
  776. menu_off = 1
  777. *clr & cla
  778. if pharmacy_timers['morning_after'] = daystart:
  779. gt 'pav_pharmacy', 'start'
  780. else
  781. pharmacy_timers['morning_after'] = daystart
  782. end
  783. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 2
  784. gs 'stat'
  785. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  786. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  787. if pharmacy['first_purchase'] = 0:
  788. pharmacy['first_purchase'] = 1
  789. 'You awkwardly avoid eye contact, letting your gaze "wander" around the pharmacy, pretending you don''t know what you''re here for.'
  790. end
  791. act'Meekly ask':
  792. cla
  793. if pharmacy['morning_after'] = 0:
  794. pharmacy['morning_after'] += 1
  795. minut += 2
  796. if fame['pav_slut'] > 150:
  797. '"Erm... yes aunt. I need..." You take a deep breath. "I need some Plan B..."'
  798. '"I was wondering if this was going to happen," she sighs, shaking her head. You look at her confused and she gives you a flat stare. "Come on, <<$pcs_nickname>>. Everyone in Pavlovsk calls you a <<$gnikname>>. You think I haven''t heard?"'
  799. else
  800. '"Erm... yes aunt. I need..." You take a deep breath. "Aunt Luda, I need some Plan B..."'
  801. '"<<$pcs_nickname>>!" Her eyes go wide with shock. "What happened?" she says, immediately scurrying over towards the birth control counter.'
  802. end
  803. else
  804. if pcs_inhib < 50:
  805. '"Aunt Luda," you whisper. "I need another plan B pill."'
  806. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  807. else
  808. '"Hi Aunt Luda, I need another plan B pill."'
  809. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  810. end
  811. '"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."'
  812. end
  813. act'It''s for emergencies':gt 'pav_pharmacy', 'morning_after_emergency_embarrassed'
  814. act'I made a mistake':gt 'pav_pharmacy', 'morning_after_mistake_embarrassed'
  815. if stat['broken_condoms'] > 0:
  816. act'The condom broke':gt 'pav_pharmacy', 'buy_morning_after_condom_broke_meek'
  817. end
  818. act'Condom broke':gt 'pav_pharmacy', 'morning_after_mistake_embarrassed'
  819. if birth_control['condom_stealth'] >= daystart - 3:
  820. act'I got stealthed':gs 'pav_pharmacy', 'morning_after_stealth_meek'
  821. end
  822. !! if rape[2] > (daystart - 3):
  823. !! act'I was raped':gt 'pav_pharmacy', 'buy_morning_after_raped'
  824. !! end
  825. end
  826. act'Openly ask':
  827. cla
  828. if pharmacy['morning_after'] = 0:
  829. pharmacy['morning_after'] += 1
  830. minut += 2
  831. '"Hi Aunt Luda," you say casually. "I need a Plan B pill."'
  832. if fame['pav_slut'] > 150:
  833. '"I was wondering when this was going to happen," she sighs, shaking her head. You look at her confused and she gives you a flat stare. "Come on, <<$pcs_nickname>>. I hear your name and ''<<$gnikname>>'' practically every other day. It''s not hard to put the pieces together."'
  834. '"I guess I have been getting around a lot," you smile sheepishly. Luda rolls her eyes.'
  835. '"Based on what I''ve heard, that''s putting it lightly." She slaps the package down on the countertop.'
  836. else
  837. '"<<$pcs_nickname>>!" Her eyes go wide with shock. "What happened?" she says, immediately scurrying over towards the birth control counter.'
  838. end
  839. act'It''s for emergencies':gt 'pav_pharmacy', 'morning_after_emergency_open'
  840. act'I made a mistake':gt 'pav_pharmacy', 'morning_after_mistake_open'
  841. if stat['broken_condoms'] > 0:
  842. act'The condom broke':gt 'pav_pharmacy', 'buy_morning_after_condom_broke_meek'
  843. end
  844. if birth_control['condom_stealth'] >= daystart - 3:
  845. act'I got stealthed':gs 'pav_pharmacy', 'morning_after_stealth_open'
  846. end
  847. else
  848. minut += rand(2, 5)
  849. '"Hi Aunt Luda," you say casually. "I need another Plan B pill."'
  850. if pcs_inhib < 50:
  851. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  852. else
  853. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  854. end
  855. '"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."'
  856. act 'Continue':gt 'pav_pharmacy', 'start'
  857. if stat['broken_condoms'] > 0:
  858. act'The condom broke':gt 'pav_pharmacy', 'buy_morning_after_condom_broke_meek'
  859. end
  860. if birth_control['condom_stealth'] >= daystart - 3:
  861. act'I got stealthed':gs 'pav_pharmacy', 'morning_after_stealth_open'
  862. end
  863. end
  864. end
  865. end
  866. if $ARGS[0] = 'morning_after_emergency_embarrassed':
  867. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  868. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  869. if pharmacy['morning_after'] > 1: pharmacy['morning_after'] -= 1
  870. if pharmacyfirstbirthcontrol = 0:
  871. '"Nothing happened!" you say, quickly rushing to reassure her. "I- I uhmm... I just want it for emergencies... Just in case, you know?"'
  872. 'Luda heaves a mighty sigh.'
  873. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  874. '"Sorry," you cringe as she rings up the pill, shaking her head.'
  875. '"If you really want to be safe, you should start on the pill. I can give you a box right now for you to start. The sooner the better, it takes several weeks for it to become effective."'
  876. gs 'pav_pharmacy', 'birth_control_addon'
  877. else
  878. if birth_control['think_safe'] ! 1 and pillcon2 > 0:
  879. '"Nothing happened!" you say, quickly rushing to reassure her. "I- I uhmm... I just want it for emergencies... Just in case something happens before the pill fully kicks in?"'
  880. else
  881. '"Nothing happened!" you say, quickly rushing to reassure her. "I- I uhmm... I just want it for emergencies... Like if I forget my birth control for a few days..."'
  882. end
  883. 'Luda heaves a mighty sigh.'
  884. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  885. '"Sorry," you cringe as she rings you up, shaking her head.'
  886. act 'Continue':gt 'pav_pharmacy', 'start'
  887. end
  888. end
  889. if $ARGS[0] = 'morning_after_emergency_open':
  890. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  891. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  892. if pharmacy['morning_after'] > 1: pharmacy['morning_after'] -= 1
  893. if pharmacyfirstbirthcontrol = 0:
  894. '"Nothing happened Aunt Luda," you say with a relaxed smile. "I just want one for emergencies. In case a condom breaks or something."'
  895. 'Luda heaves a mighty sigh.'
  896. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  897. '"Sorry," you say with an only slightly guilty grin.'
  898. '"If you really want to be safe, you should start on the pill. I can give you a box right now for you to start. The sooner the better, it takes several weeks for it to become effective."'
  899. gs 'pav_pharmacy', 'birth_control_addon'
  900. else
  901. if birth_control['think_safe'] ! 1 and pillcon2 > 0:
  902. '"Nothing happened Aunt Luda," you say with a relaxed smile. "I just want one for emergencies. In case a condom breaks before my birth control kicks in."'
  903. else
  904. '"Nothing happened Aunt Luda," you say with a relaxed smile. "I just want one for emergencies. In case I get drunk and forget to take my birth control or something."'
  905. end
  906. 'Luda heaves a mighty sigh.'
  907. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  908. '"Sorry," you say with an only slightly guilty grin.'
  909. act 'Continue':gt 'pav_pharmacy', 'start'
  910. end
  911. end
  912. if $ARGS[0] = 'morning_after_mistake_embarrassed':
  913. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  914. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  915. if fame['pav_slut'] > 150:
  916. '"I''m normally careful!" you protest, cheeks burning with embarrassment that even Luda knows about your promiscuous behavior. "I just... made a mistake this time..."'
  917. '"I guess we all make those," she sighs again, walking across the back of the counter, taking a small box off the shelf and brings it back. "Goodness knows, your sister''s quite living proof of that. Literally."'
  918. 'She hands you the box and you gratefully tuck it into your purse.'
  919. else
  920. '"I know, Aunt," you blush in embarrassment. "I just... made a mistake..."'
  921. '"I guess we all make those," she says, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that. Literally."'
  922. 'She hands you the box and you gratefully tuck it into your purse.'
  923. end
  924. '"Thank you Aunt Luda," you mumble shamefully.'
  925. !! if pharmacy['morning_after'] = 1:
  926. '"Take it as soon as possible," she says warningly. "It''s most effective the sooner after your ''accident.'' 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."'
  927. !! else
  928. !! end
  929. act'I prefer condoms':
  930. if preziktype = 0:
  931. prezik += 5
  932. elseif preziktype = 1 or preziktype = 2:
  933. prezikcount += 5
  934. end
  935. cla & *nl
  936. '"I actually prefer using condoms," you say, embarrassedly.'
  937. '"Then <i>use</i> them for goodness sake!" Luda says, pulling a box of rubbers from behind the counter and exasperatedly throwing them at you. "That''s on the house as long as you don''t come back here to buy another pill."'
  938. gs 'pav_pharmacy', 'buy_morning_after_end'
  939. end
  940. if money < 1870:
  941. act'I don''t have the money':
  942. cla & *nl
  943. '"I would, Aunt Luda," you say. "I just don''t have the money right now..."'
  944. if pharmacy['bc_pills_free'] = 0:
  945. tabletki += 1
  946. 'Luda sighs deeply and pulls out a small box and slides it across the counter to you.'
  947. '"I guess I can give you some this one time..." she says. "But make sure you don''t miss a single day or they might not work!" She wags her finger at you. "And you better buy some next month or you''ll be in trouble."'
  948. else
  949. '"That''s what you said last time," she says dryly. "I''m not giving you another month''s worth for free. If you''re going to be having sex, the least you can do is take responsibility for your own body."'
  950. end
  951. gs 'pav_pharmacy', 'buy_morning_after_end'
  952. end
  953. end
  954. gs 'pav_pharmacy', 'buy_morning_after_end'
  955. end
  956. if $ARGS[0] = 'morning_after_mistake_open':
  957. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  958. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  959. if fame['pav_slut'] > 150:
  960. '"I''m normally careful!" you protest, a little annoyed that she''s making assumptions about you. "I just made a mistake this time."'
  961. '"I guess we all make those," she sighs as you tuck the box into your purse.'
  962. else
  963. '"I just made a mistake," you shrug. "Surely a girl''s allowed one or two of those, isn''t she?"'
  964. '"One mistake can still have lasting consequences," she says, taking a small box off the shelf. "Goodness knows, your sister''s living proof of that. Literally."'
  965. 'She hands you the box and you tuck it into your purse.'
  966. end
  967. '"Thanks Aunt Luda," you grin.'
  968. !! if pharmacy['morning_after'] = 1:
  969. '"Take it as soon as possible," she says warningly. "It''s most effective the sooner after your ''accident.'' 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."'
  970. !! else
  971. !! end
  972. act'I prefer condoms':
  973. if preziktype = 0:
  974. prezik += 5
  975. elseif preziktype = 1 or preziktype = 2:
  976. prezikcount += 5
  977. end
  978. cla & *nl
  979. '"I actually prefer using condoms," you say.'
  980. '"Then <i>use</i> them for goodness sake!" Luda says, pulling a box of rubbers from behind the counter and exasperatedly throwing them at you. "That''s on the house as long as you don''t come back here to buy another pill."'
  981. gs 'pav_pharmacy', 'buy_morning_after_end'
  982. end
  983. if money < 1870:
  984. act'I don''t have the money':
  985. cla & *nl
  986. '"I would, Aunt Luda," you say. "I''m just a little tight on funds right now. I can''t afford it."'
  987. if pharmacy['bc_pills_free'] = 0:
  988. tabletki += 1
  989. 'Luda sighs deeply and pulls out a small box and slides it across the counter to you.'
  990. '"I guess I can give you some this one time..." she says. "But make sure you don''t miss a single day or they might not work!" She wags her finger at you. "And you better buy some next month or you''ll be in trouble."'
  991. else
  992. '"That''s what you said last time," she says dryly. "I''m not giving you another month''s worth for free. If you''re going to be having sex, the least you can do is take responsibility for your own body."'
  993. end
  994. gs 'pav_pharmacy', 'buy_morning_after_end'
  995. end
  996. end
  997. gs 'pav_pharmacy', 'buy_morning_after_end'
  998. end
  999. if $ARGS[0] = 'morning_after_stealth_meek':
  1000. cla & *clr
  1001. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1002. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1003. '"The guy I was with stealthed me," you say embarrassedly. "He was, erm, ''behind'' me and I asked him to put on a condom. He lied and said he did before he, uhh... ''finished'' in me..."'
  1004. '"Oh darling," Luda says, shaking her head sympathetically. "Men are pigs. That''s why you can''t let down your guard around them. If you want them to use a condom, you need to put it on them yourself. Can''t trust them otherwise. It only takes one."'
  1005. 'Luda hands you a bag with the pill in it.'
  1006. '"But how did you not notice?" she asks, puzzled. "Couldn''t you feel the difference? It''s the reason why your mother and I don''t use condoms."'
  1007. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1008. end
  1009. if $ARGS[0] = 'morning_after_stealth_open':
  1010. cla & *clr
  1011. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1012. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1013. '"It''s not my fault!" you say. "The guy stealthed me! He mounted me from behind and lied when I told him to put on a condom. Bastard even had the nerve to come inside me after!"'
  1014. '"Oh darling," Luda says, shaking her head sympathetically. "Men are pigs. That''s why you can''t let down your guard around them. If you want them to use a condom, you need to put it on them yourself. Can''t trust them otherwise. It only takes one."'
  1015. 'Luda hands you a bag with the pill in it.'
  1016. '"But how did you not notice?" she asks, puzzled. "Couldn''t you feel the difference? It''s the reason why your mother and I don''t use condoms."'
  1017. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1018. end
  1019. if $ARGS[0] = 'buy_morning_after_condom_broke_meek':
  1020. cla & *nl
  1021. if LudaQW['broken_condoms'] = 0:
  1022. '"The condom broke," you mumble embarrassedly.'
  1023. '"Well, I suppose that''s not your fault," Luda sighs as she hands over the bag. "But that''s why it''s better to double up your protection."'
  1024. else
  1025. '"The condom broke again," you mumble embarrassedly.'
  1026. if LudaQW['broken_condoms'] <= 5:
  1027. '"You must have some bad luck," Luda says, shaking her head as she hands over the bag. "Are you sure you don''t want to start the pill?"'
  1028. else
  1029. '"This is just getting ridiculous," Luda huffs in exhasperation as she hands over the bag. "Just start the bloody pill already <<$pcs_firstname>>!"'
  1030. end
  1031. end
  1032. LudaQW['broken_condoms'] += 1
  1033. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1034. end
  1035. if $ARGS[0] = 'buy_morning_after_condom_broke_open':
  1036. cla & *nl
  1037. if LudaQW['broken_condoms'] = 0:
  1038. '"It''s not my fault," you shrug. "Condom broke."'
  1039. '"Well, I suppose that''s does happen from time to time," Luda sighs as she hands over the bag. "But that''s why it''s better to double up your protection."'
  1040. else
  1041. '"The condom broke again," you shrug.'
  1042. if LudaQW['broken_condoms'] <= 5:
  1043. '"You must have some bad luck," Luda says, shaking her head as she hands over the bag. "Are you sure you don''t want to start the pill?"'
  1044. else
  1045. '"This is just getting ridiculous," Luda huffs in exhasperation as she hands over the bag. "Just start the bloody pill already <<$pcs_firstname>>!"'
  1046. end
  1047. end
  1048. LudaQW['broken_condoms'] += 1
  1049. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1050. end
  1051. if $ARGS[0] = 'buy_morning_after_raped':
  1052. cla & *clr
  1053. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1054. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1055. if fame['pav_slut'] > 150:
  1056. '"Well... but I..." You''re not really sure what to say now and your words become a blubbering mess. You''re deeply embarrassed that even Luda knows about your promiscuous behavior.'
  1057. '"I guess it runs in the family," she sighs again. "Maybe we all carry a slut gene or something. I''d hoped you were being safe, but I suppose we all slip up sometimes." Luda walks across the back of the counter, taking a small box off the shelf and brings it back. "Goodness knows, your sister''s living proof of that." You nod shamefully.'
  1058. else
  1059. 'You blush in embarrassment. "I know, aunt... I just... made a mistake."'
  1060. '"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.'
  1061. '"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."'
  1062. 'You nod shamefully.'
  1063. end
  1064. '"Please don''t tell <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  1065. if momslut >= 1:
  1066. 'Your aunt gives you a odd look. "You might be surprised dear."'
  1067. '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."'
  1068. '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."'
  1069. else
  1070. '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."'
  1071. end
  1072. end
  1073. if $ARGS[0] = 'buy_morning_after_end':
  1074. act 'Continue':gt 'pav_pharmacy', 'start'
  1075. act'Don''t tell <<$npc_nickname[''A29'']>>':
  1076. cla & *clr
  1077. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1078. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1079. if LudaQW['momslut_know'] = 1:
  1080. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1081. '"It''ll be our secret," Luda winks.'
  1082. elseif momslut >= 1:
  1083. LudaQW['momslut_know'] = 1
  1084. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1085. '"You might be surprised dear," Luda says with a wry smile and you sigh tiredly.'
  1086. '"Yes Aunt, I know all about <<$npc_nickname[''A29'']>>''s... habits. I just don''t want to hear about it from her is all."'
  1087. 'Luda nods. "Even so, I''m sure she''d prefer hearing that you''re taking this than to see you get pregnant. But I promise, this will be our little secret."'
  1088. else
  1089. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say. "She wouldn''t understand."'
  1090. '"You might be surprised dear," Luda says with a wry smile and you cock your head in confusion.'
  1091. *nl
  1092. '<i>What''s that supposed to mean?</i>'
  1093. *nl
  1094. '"Well, even so," she continues. "I''m sure she''d prefer hearing you''re having sex and taking this than to see you get pregnant. But I promise, this will be our little secret."'
  1095. end
  1096. act 'Continue':gt 'pav_pharmacy', 'start'
  1097. end
  1098. end
  1099. if $ARGS[0] = 'morning_after_no_money':
  1100. if money < 740:
  1101. act'Ask Luda for a morning after pill (meekly)':
  1102. cla & *clr
  1103. gs 'stat'
  1104. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1105. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1106. if pharmacy['morning_after_free'] < 10:
  1107. pharmacy['morning_after_free'] += 1
  1108. else
  1109. end
  1110. end
  1111. act'Ask Luda for a morning after pill (openly)':
  1112. cla & *clr
  1113. gs 'stat'
  1114. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1115. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1116. if pharmacy['morning_after_free'] < 10:
  1117. pharmacy['morning_after_free'] += 1
  1118. else
  1119. end
  1120. end
  1121. !!{ else
  1122. !! lie that you don''t have enough money
  1123. act'Ask Luda for a morning after pill (meekly)':
  1124. cla & *clr
  1125. gs 'stat'
  1126. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1127. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1128. if pharmacy['morning_after_free'] < 10:
  1129. pharmacy['morning_after_free'] += 1
  1130. else
  1131. end
  1132. end
  1133. act'Ask Luda for a morning after pill (openly)':
  1134. cla & *clr
  1135. gs 'stat'
  1136. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1137. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1138. if pharmacy['morning_after_free'] < 10:
  1139. pharmacy['morning_after_free'] += 1
  1140. else
  1141. end
  1142. end}
  1143. end
  1144. end
  1145. if $ARGS[0] = 'ointment':
  1146. if mosol > 0:
  1147. cla
  1148. if pharmacy_timers['morning_after'] = daystart:
  1149. gt 'pav_pharmacy', 'start'
  1150. else
  1151. pharmacy_timers['morning_after'] = daystart
  1152. end
  1153. act'Meekly ask':
  1154. cla & *clr
  1155. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1156. '"I need, uh, some... ointment for something..." You stand there twiddling your thumbs as Aunt Luda glances you up and down before her lips twist into a smirk.'
  1157. '"Been going commando lately?" she asks. You feel your face instantly heat up and she gives a bark of laughter. "Yes, I know the feeling. I can tell just by the way you''re standing. Goodness knows it took me a while to get used to it when I was your age. I loved the look of my ass in jeans without panty lines."'
  1158. if PCloskirt = 0:
  1159. 'She pulls a small tube of something off a shelf. "But don''t worry," she says, handing it to you in a paper bag. "You''ll get used to it eventually. Rub this into your pussy twice every day and that will help alleviate the itch. If you want to give yourself a break, try skirts for a little while," she adds with a wink.'
  1160. else
  1161. 'She pulls a small tube of something off a shelf. "But don''t worry," she says, handing it to you in a paper bag. "You''ll get used to it eventually. Rub this into your pussy twice every day and that will help alleviate the itch. Keep wearing skirts too. That''ll help a lot," she adds with a wink.'
  1162. end
  1163. '"Aunt Luda!" you hiss, causing her to laugh again.'
  1164. '"Have a nice day, darling," she says innocently.'
  1165. act 'Continue':gt 'pav_pharmacy', 'start'
  1166. end
  1167. act'Openly ask':
  1168. cla & *clr
  1169. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1170. '"Hi Aunt Luda," you say, leaning over the counter. "I haven''t been wearing panties lately and my pants are <i>really</i> starting to make my pussy itch. Do you have something for that?"'
  1171. '"I''ve got just the thing," she says, pulling a small tube of something off a shelf and putting it into a paper bag. "I used to do the same thing when I was your age, so I have a pretty good understanding of what you''re going through right now."'
  1172. '"No panty lines at least," you shrug as she comes back to the counter.'
  1173. if PCloskirt = 0:
  1174. '"<i>Exactly</i>," Luda says as she hands you a small paper bag. "Rub that into your pussy twice a day, once in the morning and once at night and it will go away in a few days. And be sure to give yourself a break now and then," she smiles. "Try skirts for a change. They''re <i>very</i> freeing."'
  1175. else
  1176. '"<i>Exactly</i>," Luda says as she hands you a small paper bag. "Rub that into your pussy twice a day, once in the morning and once at night and it will go away in a few days. In the mean time, keep wearing skirts," she smiles. "The breeze is nice and it''s good to air it out when it''s irritated."'
  1177. end
  1178. '"Thanks for the advice Aunt Luda."'
  1179. '"Any time darling."'
  1180. act 'Continue':gt 'pav_pharmacy', 'start'
  1181. end
  1182. else
  1183. gt 'pav_pharmacy', 'start'
  1184. end
  1185. end
  1186. if $ARGS[0] = 'dont_tell':
  1187. if LudaQW['dont_tell'] = 0:
  1188. act'Don''t tell <<$npc_nickname[''A29'']>>':
  1189. LudaQW['dont_tell'] = 1
  1190. cla & *clr
  1191. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1192. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1193. if LudaQW['momslut_know'] = 1:
  1194. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1195. '"It''ll be our secret," Luda winks.'
  1196. elseif momslut >= 1:
  1197. LudaQW['momslut_know'] = 1
  1198. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1199. '"You might be surprised, darling," Luda says with a wry smile and you sigh tiredly.'
  1200. '"Yes Aunt, I know all about <<$npc_nickname[''A29'']>>''s... habits. I just don''t want to get an earful from her."'
  1201. 'Luda nods. "Even so, I''m sure she''d prefer hearing that you''re being safe. But I promise, this will be our little secret."'
  1202. else
  1203. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say. "She wouldn''t understand."'
  1204. '"You might be surprised, darling," Luda says with a wry smile and you cock your head in confusion.'
  1205. *nl
  1206. '<i>What''s that supposed to mean?</i>'
  1207. *nl
  1208. '"Well, even so," she continues. "I''m sure she''d prefer hearing you''re having sex and being safe about it than to hear otherwise. But I promise, this will be our little secret."'
  1209. 'She gives you a wink and hands you the bag.'
  1210. '"Here you go darling. Don''t use them all at once!"'
  1211. end
  1212. act 'Continue':gt 'pav_pharmacy', 'start'
  1213. end
  1214. end
  1215. end
  1216. if $ARGS[0] = 'luda_free_condoms':
  1217. LudaQW['free_condoms'] = 1
  1218. gs 'pav_pharmacy', 'luda_free_condoms_give'
  1219. cla & *clr
  1220. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1221. 'As you enter the pharmacy, your Aunt Luda glances up from the register and smiles at you.'
  1222. '"<<$pcs_nickname>>! I''ve been wondering when I''d see you. I have a gift for you."'
  1223. '"A gift?" you ask as she comes out with a small paper bag.'
  1224. if fame['pav_slut'] > 150:
  1225. LudaQW['knows_sex'] = 1
  1226. '"I''ve been hearing on the grapevine that you''re very popular with the boys," she says. "And while I don''t disapprove, I am also not ready for my sister to become a grandmother. It would make me feel old."'
  1227. act'Deny it':
  1228. cla & *nl
  1229. '"Uhh, I don''t know what you''ve been hearing but-"'
  1230. '"Oh hush, darling," she cuts you off wearing an impish smile and hands you the bag. "There''s no need to be embarrassed. It runs in the family. We must have some kind of slut gene. But, that being the case, I wanted you to have these."'
  1231. 'You open it and look inside, revealing a box containing 10 condoms and a morning after pill.'
  1232. '"Have fun," she says, giving you a meaningful look. "But be <i>safe</i> while you do it."'
  1233. act 'Continue':gt 'pav_pharmacy', 'start'
  1234. end
  1235. act'Is it that obvious?':
  1236. cla & *nl
  1237. '"Is it really that obvious?" you ask, blushing.'
  1238. '"It runs in the family," she grins back, handing you the bag. "We must have some kind of slut gene. But, that being the case, I wanted you to have these."'
  1239. 'You open it and look inside, revealing a box containing 10 condoms and a morning after pill.'
  1240. '"Have fun," she says, giving you a meaningful look. "But be <i>safe</i> while you do it."'
  1241. act 'Continue':gt 'pav_pharmacy', 'start'
  1242. end
  1243. act'Reassure her':
  1244. cla & *nl
  1245. '"Aunt," you say. "I promise you, I''m already being safe. You don''t have to worry about becoming a grandaunt yet."'
  1246. '"<i>Ooh!</i> Don''t even say that word!" Luda shivers, but grins at you. "Just hearing it makes me feel like I''m growing wrinkles. I''m glad to hear you''re being smart, but like I said, this is a gift."'
  1247. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1248. '"Add it to your stash," she winks. "Plus a little something for emergencies."'
  1249. act 'Continue':gt 'pav_pharmacy', 'start'
  1250. end
  1251. else
  1252. '"And a little something for emergencies too," she says, coming out from behind the counter holding a small paper bag. "You''re getting to be that age when boys and girls stop looking at each other and start <i>doing</i> each other instead."'
  1253. act'Ew!':
  1254. cla & *nl
  1255. '"Ew!" you grimace. "Aunt Luda! Don''t talk like that! It''s gross!"'
  1256. '"Just being realistic," she grins back. "And being a realist, the last thing I want to happen is to become a grandaunt at my age. I would feel positively ancient! So, here''s your gift!"'
  1257. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1258. '"Just in case," she winks.'
  1259. act 'Continue':gt 'pav_pharmacy', 'start'
  1260. end
  1261. act'Blush':
  1262. cla & *nl
  1263. 'Your cheeks flush and her smile breaks into a full blown grin.'
  1264. '"So I wanted to give you something ahead of time," Luda continues. "Make sure you stay safe. If I became a grandaunt at my age, I would feel positively ancient!"'
  1265. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1266. '"Just in case," she winks.'
  1267. !!{ act'Tell her you don''t need them':
  1268. cla & *nl
  1269. '"I appreciate the thought Aunt Luda, but I don''t need these," you say, pushing them back towards her.'
  1270. '"I know that''s what they say, <<$pcs_nickname>>," she says shaking her head. "But no matter how much boys insist that they''re going to pull out in time, they never-"'
  1271. act'Saving yourself for marriage':
  1272. cla & *clr
  1273. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1274. '"No! That''s not what I meant!" you interrupt her, cringing in disgust. "I''m not going to have sex Aunt Luda. I''m going to save my virginity for marriage."'
  1275. '"Oh, darling..." She smiles sadly at you. "You say that now, but... Not everything goes to plan. I''m afraid you''re living proof of that dear."'
  1276. act'Insist you don''t need them':
  1277. LudaQW['free_condoms'] = 2
  1278. cla & *nl
  1279. '"I''m not going to be like my mother," you shake your head. "I appreciate your thought Aunt Luda, but I don''t need your present."'
  1280. 'She sighs, but gives you another small smile and takes the bag back from you.'
  1281. '"Well, if you insist. But if you ever change your mind, these will be right here waiting for you."'
  1282. end
  1283. act'Just in case...':
  1284. end
  1285. end
  1286. act'':
  1287. end
  1288. act 'Continue':gt 'pav_pharmacy', 'start'
  1289. end}
  1290. act 'Continue':gt 'pav_pharmacy', 'start'
  1291. end
  1292. if stat['think_virgin'] ! 1:
  1293. act'Admit you''ve been having sex':
  1294. LudaQW['knows_sex'] = 1
  1295. cla & *nl
  1296. '"Well, I can''t deny that," you say, giving her a rueful smile.'
  1297. '"<<$pcs_nickname>>!" Luda says, smiling back at you in surprise. "I guess my gift is coming a little late, but I hope you''ll still have use for it anyways. If I became a grandaunt at my age, I would feel positively ancient!"'
  1298. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1299. '"Have fun," she winks before giving you a meaningful look.'
  1300. act 'Continue':gt 'pav_pharmacy', 'start'
  1301. end
  1302. end
  1303. end
  1304. end
  1305. if $ARGS[0] = 'luda_free_condoms_give':
  1306. LudaQW['condom_give_day'] = daystart
  1307. if preziktype = 0:
  1308. prezik += 10
  1309. elseif preziktype = 1 or preziktype = 2:
  1310. prezikcount += 10
  1311. end
  1312. morning_after_pill += 1
  1313. end
  1314. if $ARGS[0] = 'luda_change_mind':
  1315. if LudaQW['free_condoms'] = 2:
  1316. act'Ask your Aunt for her present':
  1317. cla & *clr
  1318. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1319. LudaQW['free_condoms'] = 1
  1320. '"Aunt Luda..." you say.'
  1321. '"Yes, darling?"'
  1322. act'Embarrassed':
  1323. cla
  1324. '"I... I need your present after all..." you stammer.'
  1325. 'Luda gives you a gleaming smile in return as she reaches under the counter and produces the same paper bag you gave back to her.'
  1326. '"What made you change your mind?"'
  1327. act'There''s this boy...':
  1328. end
  1329. act'':
  1330. end
  1331. end
  1332. act'Open':
  1333. end
  1334. end
  1335. end
  1336. end
  1337. if $ARGS[0] = 'luda_birth_control_worry':
  1338. LudaQW['birth_control_timer'] = daystart
  1339. LudaQW['birth_control_worry'] = 1
  1340. cla & *clr
  1341. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1342. 'As you enter the pharmacy, your Aunt Luda glances up from the register, looking at you with concern. Puzzled, you walk up to her as she waves you over.'
  1343. '"<<$pcs_nickname>>! I''m glad I saw you. You haven''t bought any birth control pills from me in over a month! Is everything alright? Did you forget to keep taking them?"'
  1344. act'Oh shit!':
  1345. cla & *clr
  1346. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1347. 'The color drains from your face as you gasp, covering your mouth with your hand in shock.'
  1348. '"Oh shit! I totally forgot!"'
  1349. '"<<$pcs_firstname>>!" Luda scolds you. "This is very important! You buy some more right now! And get some condoms too, so you don''t get pregnant while the hormones build back up!"'
  1350. act 'Just joking':
  1351. *clr & cla
  1352. 'You burst into a fit of giggles as you look at aunt Luda.'
  1353. '"What <<$pcs_nickname>>? This is no laughing matter!" She responds looking quite cross.'
  1354. '"Oh Luda, I''m sorry but I just couldn''t resist. I''m just pulling your leg. I have some spare at home and don''t forget I can also get them here from your assistant."'
  1355. '"<<$pcs_nickname>> don''t do that to me, you nearly gave me a heart attack"'
  1356. 'She then breaks out into a huge grin and give you a friendly soft punch on the arm. "You can be evil to your auntie at times you know."'
  1357. act'Continue':gt'pav_pharmacy', 'start'
  1358. end
  1359. end
  1360. act'I have a stockpile':
  1361. cla & *nl
  1362. '"Don''t worry Aunt Luda," you laugh. "Just have a big stockpile. I haven''t needed to buy any in a while and I''ve still got more."'
  1363. 'Relief floods through your aunt''s face and she presses her hand to her breast as she takes deep breaths.'
  1364. '"Oh! I nearly had a heart attack!" she says, grinning back at you.'
  1365. '"Sorry," you smile back apologetically.'
  1366. LudaQW['birth_control_worry'] = 1
  1367. act'Continue':gt'pav_pharmacy', 'start'
  1368. end
  1369. act'Buying elsewhere':
  1370. cla & *nl
  1371. '"Don''t worry Aunt Luda," you laugh. "I''m still on the pill, I''ve just been shopping elsewhere."'
  1372. 'Relief floods through your aunt''s face and she presses her hand to her breast as she takes deep breaths.'
  1373. '"Oh! I nearly had a heart attack!" she says, grinning back at you. "Where are you buying these days?"'
  1374. act'The city':
  1375. cla & *nl
  1376. '"I''ve been in the city a lot lately," you tell her. "I shop at the pharmacy there sometimes."'
  1377. '"Ahh," Luda nods. "That explains it."'
  1378. LudaQW['birth_control_worry'] = 1
  1379. act'Continue':gt'pav_pharmacy', 'start'
  1380. end
  1381. act'The market':
  1382. cla & *nl
  1383. '"I''ve been buying them from the market," you tell her. "It''s really easy to find a discount there!"'
  1384. '"Hmm," Luda frowns. "You really shouldn''t buy medicine off the street, darling. You never know if you''re getting some kind of cheap knock off, or worse, something completely different than what they''re advertising."'
  1385. LudaQW['birth_control_worry'] = 1
  1386. act'Continue':gt'pav_pharmacy', 'start'
  1387. end
  1388. act 'I get them here from your assistant':
  1389. cla & *nl
  1390. '"No need to worry Luda, I''ve been buying them here when your assistant was serving."'
  1391. 'With a look of relief on her face Luda replies. "Oh! Okay, yes that''d explain it. I was just concerned in case you''d forgotten and it''s important to keep taking them without a break."'
  1392. '"Thanks for your concern Luda but no need to worry." You say to her with a smile.'
  1393. LudaQW['birth_control_worry'] = 1
  1394. act'Continue':gt'pav_pharmacy', 'start'
  1395. end
  1396. act'Continue':gt'pav_pharmacy', 'start'
  1397. end
  1398. act'I stopped on purpose':
  1399. LudaQW['birth_control_worry'] = 1
  1400. cla & *clr
  1401. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1402. '"I didn''t forget Aunt," you say, shaking your head. "I stopped on purpose."'
  1403. '"Why would you do that?" Luda asks, looking worried.'
  1404. *nl
  1405. act'Messing with my hormones':
  1406. cla
  1407. '"I don''t like that it messes with my hormones," you explain. "I don''t think it''s smart to screw around with my body like that."'
  1408. '"I understand <<$pcs_firstname>>, but it''s better than being pregnant! Especially at your age."'
  1409. *nl
  1410. gs'pav_pharmacy', 'luda_birth_control_worry2'
  1411. end
  1412. act'Killing my sex drive':
  1413. cla
  1414. '"It''s totally killing my sex drive!" you moan loudly. "The whole reason I started it was so I could have sex without worry but it''s messing my hormones up so badly that I don''t even want to have sex anymore!"'
  1415. '"Oh dear!" Luda looks taken aback, but nods understandingly right after. "That is a common problem with women who use this kind of birth control. I suppose I understand if you don''t want to use the pill anymore. But you''re still being safe, right? No unprotected sex?"'
  1416. *nl
  1417. gs'pav_pharmacy', 'luda_birth_control_worry2'
  1418. end
  1419. if pcs_lovers - pcs_girlfriends > 0:
  1420. act'Trying for a baby with my boyfriend':
  1421. LudaQW['birth_control_worry'] = 3
  1422. cla
  1423. '"I''m trying for a baby with my boyfriend," you smile, unable to contain your overwhelming desire for motherhood. Luda goes pale instead.'
  1424. if age < 20:
  1425. '"<<$pcs_firstname>>! You''re still a teenager! That can''t be wise! You still have your whole life ahead of you! It''s too early to make this kind of decision!"'
  1426. else
  1427. '"<<$pcs_firstname>>! That can''t be wise at your age! You still have your whole life ahead of you! It''s too early to make this kind of decision!"'
  1428. end
  1429. '"He loves me!" you snap back at her. "He''s going to make a great father and I want to have his baby!"'
  1430. '"<<$pcs_firstname>>!"'
  1431. act'You can''t tell my mother':
  1432. cla & *nl
  1433. '"Don''t even think about running off to tell my mother about this," you say, pointing accusingly at her. "This is between me and my boyfriend, it''s our decision!"'
  1434. '"<<$pcs_firstname>>..." Luda says again, looking pleadingly at you.'
  1435. '"I mean it!" you snarl.'
  1436. '"I... I won''t..." your aunt reluctantly agrees. "But please, I hope you''ll see reason soon... Before it''s too late..."'
  1437. act'Continue':gt'pav_pharmacy', 'start'
  1438. end
  1439. end
  1440. else
  1441. act'Trying for a baby':
  1442. LudaQW['birth_control_worry'] = 2
  1443. cla
  1444. '"I want to have a baby," you smile, unable to contain your overwhelming desire for motherhood. Luda goes pale instead.'
  1445. if age < 20:
  1446. '"<<$pcs_firstname>>! You''re still a teenager! That can''t be wise! You still have your whole life ahead of you! Do you even have someone to take care of it with you?"'
  1447. else
  1448. '"<<$pcs_firstname>>! That can''t be wise at your age! You still have your whole life ahead of you! Do you even have someone to take care of it with you?"'
  1449. end
  1450. '"No," you say stubbornly. "I don''t need someone else, I want to be a mother and I''m not going to wait!"'
  1451. '"<<$pcs_firstname>>!"'
  1452. act'You can''t tell my mother':
  1453. cla & *nl
  1454. '"Don''t even think about running off to tell my mother about this," you say, pointing accusingly at her. "This is my decision and my body, I can do what I want."'
  1455. '"<<$pcs_firstname>>..." Luda says again, looking pleadingly at you.'
  1456. '"I mean it!" you snarl.'
  1457. '"I... I won''t..." your aunt reluctantly agrees. "But please, I hope you''ll see reason soon... Before it''s too late..."'
  1458. act'Continue':gt'pav_pharmacy', 'start'
  1459. end
  1460. end
  1461. end
  1462. end
  1463. if tabletkishot > 0:
  1464. act'I switched to the shot':
  1465. cla & *nl
  1466. '"Don''t worry Aunt Luda," you laugh. "I just switched to the shot. It''s easier and more reliable than the pill."'
  1467. 'Relief floods through your aunt''s face and she presses her hand to her breast as she takes deep breaths.'
  1468. '"Oh! I nearly had a heart attack!" she says, grinning back at you.'
  1469. '"Sorry," you smile back apologetically.'
  1470. LudaQW['bc_shot_know'] = 1
  1471. act'Continue':gt'pav_pharmacy', 'start'
  1472. end
  1473. end
  1474. end
  1475. if $ARGS[0] = 'luda_birth_control_worry2':
  1476. act'Still using condoms':
  1477. cla
  1478. '"Don''t worry Aunt Luda," you smile. "I''m still using condoms."'
  1479. '"Well, as long as you''re doing that much..." she says with clear relief.'
  1480. act'Continue':gt'pav_pharmacy', 'start'
  1481. end
  1482. act'Switching to the calendar method':
  1483. cla
  1484. '"I''m switching to the calendar method," you smile. "I''ve already started keeping track of my cycle."'
  1485. '"Trying to track your cycle is very unreliable as birth control," Luda frets insistently. "Please, won''t you at least use condoms?"'
  1486. '"I''ll be careful Aunt Luda, I promise."'
  1487. '"But even the most careful of us still make mistakes," she says with obvious concern.'
  1488. act'Continue':gt'pav_pharmacy', 'start'
  1489. end
  1490. act'I''m being careful':
  1491. cla
  1492. '"Don''t worry Aunt Luda," you smile. "I''m being careful."'
  1493. '"Careful with a condom?" Luda asks insistently.'
  1494. '"Just careful. I''ll be fine, I promise."'
  1495. '"But even the most careful of us still make mistakes," she says with obvious concern.'
  1496. act'Continue':gt'pav_pharmacy', 'start'
  1497. end
  1498. end
  1499. if $ARGS[0] = 'luda_birth_control_start_again_meek':
  1500. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1501. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1502. 'You hesitantly approach the counter, feeling incredibly embarrassed by your past actions and what you have to do next.'
  1503. 'Luda can see it on your face and looks at you with concern.'
  1504. '"Yes, <<$pcs_firstname>>? Is everything all right?"'
  1505. 'You take a deep breath.'
  1506. *nl
  1507. '"Aunt Luda, I... need some birth control pills."'
  1508. 'Her eyes go wide with shock and she rushes to grab them as if worried that if she isn''t fast enough you''ll change your mind.'
  1509. if LudaQW['birth_control_worry'] = 2:
  1510. '"What happened to your... plans...?" she asks hesitantly.'
  1511. '"I thought better of it," you mumble back, unable to look her in the eye after what you said before.'
  1512. *nl
  1513. 'When you finally turn your gaze back towards her, Luda is looking at you with love and compassion.'
  1514. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1515. 'You nod back gratefully, taking the box of pills from her."'
  1516. act'Continue':gt'pav_pharmacy', 'start'
  1517. elseif LudaQW['birth_control_worry'] = 3:
  1518. '"What happened to you and your... boyfriend...?" she asks hesitantly.'
  1519. act'Changed my mind':
  1520. '"I thought better of it," you mumble back, unable to look her in the eye after what you said before.'
  1521. *nl
  1522. 'When you finally turn your gaze back towards her, Luda is looking at you with love and compassion.'
  1523. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1524. 'You nod back gratefully, taking the box of pills from her."'
  1525. act'Continue':gt'pav_pharmacy', 'start'
  1526. end
  1527. act'We broke up':
  1528. '"We broke up," you mumble back, blinking back tears, unable to look her in the eye after what you said before.'
  1529. *nl
  1530. 'When you finally turn your gaze back towards her, Luda is looking at you with love and compassion.'
  1531. '"I really thought he loved me," you sniff. "I thought he was the one."'
  1532. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1533. 'You nod back gratefully, taking the box of pills from her."'
  1534. act'Continue':gt'pav_pharmacy', 'start'
  1535. end
  1536. end
  1537. LudaQW['birth_control_worry'] = 0
  1538. end
  1539. if $ARGS[0] = 'luda_birth_control_start_again_open':
  1540. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1541. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1542. 'You take a deep breath and woman up, approaching the counter without hesitation but feeling incredibly embarrassed by your past actions and what you have to do next.'
  1543. 'Luda can see it on your face and looks at you with concern.'
  1544. '"Yes, <<$pcs_firstname>>? Is everything all right?"'
  1545. *nl
  1546. '"Aunt Luda," you say firmly. "I would like some birth control pills."'
  1547. 'Her eyes go wide with shock and relief and she rushes to grab them as if worried that if she isn''t fast enough you''ll change your mind.'
  1548. if LudaQW['birth_control_worry'] = 2:
  1549. '"What happened to your... plans...?" she asks hesitantly.'
  1550. '"I realized I was being stupid," you reply, sighing. "You were right Aunt Luda. I wasn''t ready."'
  1551. *nl
  1552. 'Luda smiles back at you with compassion.'
  1553. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1554. 'You nod back gratefully, taking the box of pills from her."'
  1555. act'Continue':gt'pav_pharmacy', 'start'
  1556. elseif LudaQW['birth_control_worry'] = 3:
  1557. '"What happened to you and your... boyfriend...?" she asks hesitantly.'
  1558. act'I was being dumb':
  1559. '"I realized I was being stupid," you reply, sighing. "You were right Aunt Luda. I wasn''t ready."'
  1560. *nl
  1561. 'Luda smiles back at you with compassion.'
  1562. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1563. 'You nod back gratefully, taking the box of pills from her."'
  1564. end
  1565. act'We broke up':
  1566. '"We broke up," you say. Your face goes rigid, trying your best not to let the pain show, but Luda gives you a soft, knowing look.'
  1567. *nl
  1568. act'He was an asshole':
  1569. cla & *clr
  1570. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1571. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1572. '"He was an asshole," you grumble, your expression finally breaking into a twist of in pain and anger. "I can''t believe I thought I wanted him to be the father of my child."'
  1573. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1574. 'You nod back gratefully, taking the box of pills from her."'
  1575. act'Continue':gt'pav_pharmacy', 'start'
  1576. end
  1577. act'I thought he loved me':
  1578. cla & *clr
  1579. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1580. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1581. '"I really thought he loved me," you say, voice warbling as you struggle to hold back tears. "I thought he was the one."'
  1582. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1583. 'You nod back gratefully, taking the box of pills from her."'
  1584. act'Continue':gt'pav_pharmacy', 'start'
  1585. end
  1586. end
  1587. end
  1588. LudaQW['birth_control_worry'] = 0
  1589. end
  1590. --- pav_pharmacy ---------------------------------