pav_pharmacy.qsrc 91 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576777879808182838485868788899091929394959697989910010110210310410510610710810911011111211311411511611711811912012112212312412512612712812913013113213313413513613713813914014114214314414514614714814915015115215315415515615715815916016116216316416516616716816917017117217317417517617717817918018118218318418518618718818919019119219319419519619719819920020120220320420520620720820921021121221321421521621721821922022122222322422522622722822923023123223323423523623723823924024124224324424524624724824925025125225325425525625725825926026126226326426526626726826927027127227327427527627727827928028128228328428528628728828929029129229329429529629729829930030130230330430530630730830931031131231331431531631731831932032132232332432532632732832933033133233333433533633733833934034134234334434534634734834935035135235335435535635735835936036136236336436536636736836937037137237337437537637737837938038138238338438538638738838939039139239339439539639739839940040140240340440540640740840941041141241341441541641741841942042142242342442542642742842943043143243343443543643743843944044144244344444544644744844945045145245345445545645745845946046146246346446546646746846947047147247347447547647747847948048148248348448548648748848949049149249349449549649749849950050150250350450550650750850951051151251351451551651751851952052152252352452552652752852953053153253353453553653753853954054154254354454554654754854955055155255355455555655755855956056156256356456556656756856957057157257357457557657757857958058158258358458558658758858959059159259359459559659759859960060160260360460560660760860961061161261361461561661761861962062162262362462562662762862963063163263363463563663763863964064164264364464564664764864965065165265365465565665765865966066166266366466566666766866967067167267367467567667767867968068168268368468568668768868969069169269369469569669769869970070170270370470570670770870971071171271371471571671771871972072172272372472572672772872973073173273373473573673773873974074174274374474574674774874975075175275375475575675775875976076176276376476576676776876977077177277377477577677777877978078178278378478578678778878979079179279379479579679779879980080180280380480580680780880981081181281381481581681781881982082182282382482582682782882983083183283383483583683783883984084184284384484584684784884985085185285385485585685785885986086186286386486586686786886987087187287387487587687787887988088188288388488588688788888989089189289389489589689789889990090190290390490590690790890991091191291391491591691791891992092192292392492592692792892993093193293393493593693793893994094194294394494594694794894995095195295395495595695795895996096196296396496596696796896997097197297397497597697797897998098198298398498598698798898999099199299399499599699799899910001001100210031004100510061007100810091010101110121013101410151016101710181019102010211022102310241025102610271028102910301031103210331034103510361037103810391040104110421043104410451046104710481049105010511052105310541055105610571058105910601061106210631064106510661067106810691070107110721073107410751076107710781079108010811082108310841085108610871088108910901091109210931094109510961097109810991100110111021103110411051106110711081109111011111112111311141115111611171118111911201121112211231124112511261127112811291130113111321133113411351136113711381139114011411142114311441145114611471148114911501151115211531154115511561157115811591160116111621163116411651166116711681169117011711172117311741175117611771178117911801181118211831184118511861187118811891190119111921193119411951196119711981199120012011202120312041205120612071208120912101211121212131214121512161217121812191220122112221223122412251226122712281229123012311232123312341235123612371238123912401241124212431244124512461247124812491250125112521253125412551256125712581259126012611262126312641265126612671268126912701271127212731274127512761277127812791280128112821283128412851286128712881289129012911292129312941295129612971298129913001301130213031304130513061307130813091310131113121313131413151316131713181319132013211322132313241325132613271328132913301331133213331334133513361337133813391340134113421343134413451346134713481349135013511352135313541355135613571358135913601361136213631364136513661367136813691370137113721373137413751376137713781379138013811382138313841385138613871388138913901391139213931394139513961397139813991400140114021403140414051406140714081409141014111412141314141415141614171418141914201421142214231424142514261427142814291430143114321433143414351436143714381439144014411442144314441445144614471448144914501451145214531454145514561457145814591460146114621463146414651466146714681469147014711472147314741475147614771478147914801481148214831484148514861487148814891490149114921493149414951496149714981499150015011502150315041505150615071508150915101511151215131514151515161517151815191520152115221523152415251526152715281529153015311532153315341535153615371538153915401541154215431544154515461547154815491550155115521553155415551556155715581559156015611562156315641565156615671568156915701571157215731574157515761577157815791580158115821583158415851586158715881589159015911592159315941595159615971598159916001601160216031604160516061607160816091610161116121613161416151616161716181619162016211622162316241625162616271628162916301631163216331634163516361637163816391640164116421643164416451646164716481649165016511652165316541655165616571658165916601661166216631664166516661667166816691670167116721673167416751676167716781679168016811682168316841685168616871688
  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, 'mc_inventory[''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, 'mc_inventory[''tampons'']', 'pav_pharmacy', 'start')
  81. *P func ('$stock_item', 20, 'Sanitary napkins', 100, 'mc_inventory[''sanitary_pads'']', '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, 'mc_inventory[''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, 'mc_inventory[''tampons'']', 'pav_pharmacy', 'start')
  110. *P func ('$stock_item', 20, 'Sanitary napkins', 100, 'mc_inventory[''sanitary_pads'']', '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. act 'Continue':gt 'pav_pharmacy', 'start'
  345. elseif fame['pav_slut'] > 150:
  346. LudaQW['knows_sex'] = 1
  347. '"Erm... yes aunt. I need some <i>stuff</i>," you say, looking to the side, avoiding eye contact.'
  348. '"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>>."'
  349. act'Stammer':
  350. cla & *clr
  351. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  352. '"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.'
  353. '"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."'
  354. act 'Continue':gt 'pav_pharmacy', 'start'
  355. if LudaQW['condoms'] = 0:
  356. '"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."'
  357. gs 'pav_pharmacy', 'condom_addon'
  358. end
  359. gs 'pav_pharmacy', 'dont_tell'
  360. end
  361. act'You want to stop using condoms':
  362. cla & *clr
  363. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  364. '"I don''t like using condoms..." you mumble. The admission somehow manages to make your face grow even hotter.'
  365. '"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."'
  366. act 'Continue':gt 'pav_pharmacy', 'start'
  367. gs 'pav_pharmacy', 'dont_tell'
  368. end
  369. act'I''m just being safe':
  370. cla & *clr
  371. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  372. '"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."'
  373. '"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?"'
  374. act 'No thanks':gt 'pav_pharmacy', 'start'
  375. gs 'pav_pharmacy', 'condom_addon'
  376. gs 'pav_pharmacy', 'dont_tell'
  377. end
  378. else
  379. 'You take a deep breath.'
  380. '"Erm... yes aunt. I need some <i>stuff</i>," you say, looking meaningfully at the birth control pills.'
  381. '"Used up my gift already?" Luda asks, smiling impishly. "Or did you just decide you prefer it bareback?"'
  382. act'Ran out':
  383. LudaQW['knows_sex'] = 1
  384. cla & *clr
  385. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  386. if LudaQW['condom_give_day'] - daystart < 7:
  387. '"I ran out," you admit, blushing deeply and Luda laughs in surprise.'
  388. '"Darling, it hasn''t even been a week!"'
  389. 'Your blush deepens.'
  390. '"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.'
  391. else
  392. '"I ran out," you admit, blushing deeply.'
  393. end
  394. *nl
  395. 'Luda takes a small glance backwards as she finishes ringing you up.'
  396. '"Did you want some more condoms while you''re here? It takes a few weeks for the pill to become effective."'
  397. act 'No thanks':gt 'pav_pharmacy', 'start'
  398. gs 'pav_pharmacy', 'condom_addon'
  399. gs 'pav_pharmacy', 'dont_tell'
  400. end
  401. act'Hate condoms':
  402. LudaQW['knows_sex'] = 1
  403. cla & *clr
  404. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  405. '"I don''t like using condoms," you blush. "They''re kind of a hassle."'
  406. '"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."'
  407. act 'No thanks':gt 'pav_pharmacy', 'start'
  408. gs 'pav_pharmacy', 'condom_addon'
  409. gs 'pav_pharmacy', 'dont_tell'
  410. end
  411. act'Want to try bareback':
  412. LudaQW['knows_sex'] = 1
  413. cla & *clr
  414. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  415. '"I want to see what it''s like without a rubber," you admit, blushing. "But I don''t want to get pregnant either."'
  416. '"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."'
  417. act 'No thanks':gt 'pav_pharmacy', 'start'
  418. gs 'pav_pharmacy', 'condom_addon'
  419. gs 'pav_pharmacy', 'dont_tell'
  420. end
  421. act'Prefer bareback':
  422. LudaQW['knows_sex'] = 1
  423. cla & *clr
  424. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  425. '"It''s not the same with a rubber," you admit, blushing.'
  426. '"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."'
  427. act 'No thanks':gt 'pav_pharmacy', 'start'
  428. gs 'pav_pharmacy', 'condom_addon'
  429. gs 'pav_pharmacy', 'dont_tell'
  430. end
  431. act'Being safe':
  432. LudaQW['knows_sex'] = 1
  433. cla & *clr
  434. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  435. if age < 20:
  436. '"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."'
  437. '"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."'
  438. else
  439. '"I''m still using condoms," you blush. "But the pill will provide an extra safety net. I''m not ready to become a mom."'
  440. '"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."'
  441. end
  442. act 'No thanks':gt 'pav_pharmacy', 'start'
  443. gs 'pav_pharmacy', 'condom_addon'
  444. gs 'pav_pharmacy', 'dont_tell'
  445. end
  446. if (pcs_cp_safe_known + pcs_cp_notsafe_known + pcs_cp_risky_known) > 0:
  447. act'Found out I like creampies':
  448. cla & *clr
  449. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  450. '"Actually I... found out I like it when guys finish inside," you confess. "It feels really good."'
  451. 'Luda raises an eyebrow and you feel a blush spread through your cheeks. '
  452. '"I hope you used my other gift then when you found out?" she asks.'
  453. if stat['morning_after_pill'] > 0:
  454. '"I did," you nod, blush intensifying as you do.'
  455. '"Good," she says, ringing up your purchase. "You''d be a fool if you didn''t."'
  456. *nl
  457. '"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."'
  458. '"Thank you, Aunt Luda..." you say, taking them and putting them into your purse.'
  459. else
  460. 'Your stomach drops and you feel the blood drain from your face.'
  461. '"I, uhh... I forgot...?" you say, cringing.'
  462. '"<<$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!"'
  463. 'Luda shakes her head, making clicking noises with her tongue to herself as she rings up your purchase.'
  464. *nl
  465. '"<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."'
  466. '"Yes, Aunt Luda..." you say, taking them and putting them into your purse.'
  467. end
  468. act 'Continue':gt 'pav_pharmacy', 'start'
  469. end
  470. end
  471. if LudaQW['knows_sex'] = 0:
  472. act'It''s for my cycle':
  473. cla & *clr
  474. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  475. if stat['think_virgin'] = 1:
  476. '"I just want to regulate my cycle Aunt Luda," you protest, blushing deeply. "I''m not having sex."'
  477. else
  478. '"I just want to regulate my cycle Aunt Luda," you lie, blushing deeply. "I''m not having sex."'
  479. end
  480. 'She smiles at you with a suspicious twist at the corner of her mouth.'
  481. '"Well, I can''t prove otherwise, so I suppose I''ll just have to take you at your word..."'
  482. act 'Continue':gt 'pav_pharmacy', 'start'
  483. end
  484. end
  485. end
  486. else
  487. if pcs_inhib < 50:
  488. '"I need some more birth control pills, Aunt Luda," you mumble.'
  489. '"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."'
  490. 'You stare down at the counter, avoiding her gaze as she hands you your purchase.'
  491. '"Thank you, Aunt..."'
  492. else
  493. '"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.'
  494. '"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."'
  495. if birth_control['think_safe'] = 1:
  496. '"Mhm, I know. I''ve been on the pill for a while now, but thanks anyway Aunt Luda."'
  497. else
  498. '"Okay, thanks for the advice Aunt Luda."'
  499. end
  500. end
  501. '"No problem <<$pcs_nickname>>. Have fun!" she winks.'
  502. act 'Continue':gt 'pav_pharmacy', 'start'
  503. end
  504. end
  505. act'Openly ask':
  506. cla & *clr
  507. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  508. if pharmacyfirstbirthcontrol = 0:
  509. pharmacyfirstbirthcontrol = 1
  510. minut += 2
  511. if pharmacy['morning_after'] > 2 or pharmacyfirstpregtest > 0:
  512. '"Hi Aunt Luda. Can I buy some birth control pills?"'
  513. '"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."'
  514. elseif LudaQW['condoms'] = 0:
  515. '"Hi Aunt Luda. Can I buy some birth control pills?"'
  516. '"Did you use up my gift already?" Luda asks, smiling impishly. "Or did you just decide you prefer it bareback?"'
  517. act'Ran out':
  518. LudaQW['knows_sex'] = 1
  519. cla & *clr
  520. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  521. '"I ran out," you admit. "Thank you for your gift by the way."'
  522. if LudaQW['condom_give_day'] - daystart < 7:
  523. '"I ran out," you admit and Luda laughs in surprise.'
  524. '"Darling, it hasn''t even been a week!"'
  525. 'You shrug casually.'
  526. '"Turns out I really like having sex."'
  527. '"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."'
  528. else
  529. '"I ran out," you admit. "But the pill seems like less hassle.'
  530. end
  531. '"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."'
  532. act 'No thanks':gt 'pav_pharmacy', 'start'
  533. gs 'pav_pharmacy', 'condom_addon'
  534. end
  535. act'Hate condoms':
  536. LudaQW['knows_sex'] = 1
  537. cla & *clr
  538. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  539. '"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."'
  540. '"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."'
  541. act 'No thanks':gt 'pav_pharmacy', 'start'
  542. gs 'pav_pharmacy', 'condom_addon'
  543. end
  544. act'Want to try bareback':
  545. LudaQW['knows_sex'] = 1
  546. cla & *clr
  547. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  548. '"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."'
  549. '"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."'
  550. act 'No thanks':gt 'pav_pharmacy', 'start'
  551. gs 'pav_pharmacy', 'condom_addon'
  552. gs 'pav_pharmacy', 'dont_tell'
  553. end
  554. act'Prefer bareback':
  555. LudaQW['knows_sex'] = 1
  556. cla & *clr
  557. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  558. '"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."'
  559. '"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."'
  560. act 'No thanks':gt 'pav_pharmacy', 'start'
  561. gs 'pav_pharmacy', 'condom_addon'
  562. end
  563. act'Being safe':
  564. LudaQW['knows_sex'] = 1
  565. cla & *clr
  566. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  567. if age < 20:
  568. '"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."'
  569. '"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."'
  570. else
  571. '"I''m still using condoms," you shrug. "But the pill will provide an extra safety net. I''m not ready to become a mom."'
  572. '"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."'
  573. end
  574. act 'No thanks':gt 'pav_pharmacy', 'start'
  575. gs 'pav_pharmacy', 'condom_addon'
  576. end
  577. if (pcs_cp_safe_known + pcs_cp_notsafe_known + pcs_cp_risky_known) > 0:
  578. act'Found out I like creampies':
  579. cla & *clr
  580. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  581. '"Actually I... found out I like creampies," you confess, with a wide smile. "It feels really good."'
  582. '"I hope you used my other gift upond discovery?" she asks.'
  583. if stat['morning_after_pill'] > 0:
  584. '"I did," you nod. "It really helped me enjoy the creampie without worry."'
  585. '"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."'
  586. *nl
  587. '"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."'
  588. '"Thank you, Aunt Luda," you say, taking them and putting them into your purse.'
  589. else
  590. '"Uhh..." You put up your hands and awkwardly smile at her. "Actually... I forgot to...?"'
  591. '"<<$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!"'
  592. 'Luda shakes her head, making clicking noises with her tongue to herself as she rings up your purchase.'
  593. *nl
  594. '"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."'
  595. '"Yes, Aunt Luda," you say, giving another cringeworthy smile and putting them into your purse.'
  596. end
  597. act 'Continue':gt 'pav_pharmacy', 'start'
  598. end
  599. end
  600. if LudaQW['knows_sex'] = 0:
  601. act'It''s for my cycle':
  602. cla & *clr
  603. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  604. '"I just want to regulate my cycle Aunt Luda," you protest. "I''m not having sex."'
  605. 'She smiles at you with a suspicious twist at the corner of her mouth.'
  606. '"Well, I can''t prove otherwise, so I suppose I''ll just have to take you at your word..."'
  607. act 'Continue':gt 'pav_pharmacy', 'start'
  608. end
  609. end
  610. !! gs 'pav_pharmacy', 'condom_addon_start'
  611. end
  612. else
  613. '"Can I have some more birth control pills please?"'
  614. '"Of course darling," she says, ringing you up and passing the pills across the counter to you.'
  615. end
  616. act 'Continue':gt 'pav_pharmacy', 'start'
  617. end
  618. end
  619. if $ARGS[0] = 'birth_control_addon':
  620. act'I prefer condoms':
  621. cla & *nl
  622. '"Thanks for the offer, but I''d rather stick to condoms."'
  623. '"If you say so..." Your aunt looks back at you with skepticism. "But even your mother is on the pill now."'
  624. act 'Continue':gt 'pav_pharmacy', 'start'
  625. end
  626. if money < 1870:
  627. act'I don''t have the money':
  628. cla & *nl
  629. '"I don''t have the money," you shrug, smiling wistfully. "Condoms are cheaper."'
  630. '"Well at least you''re being safe in the mean time," she says, handing them over.'
  631. '"Thanks, Aunt Luda."'
  632. '"Any time, darling!"'
  633. act 'Continue':gt 'pav_pharmacy', 'start'
  634. end
  635. else
  636. act'Not a bad idea (buy birth control)':
  637. cla & *nl
  638. pharmacyfirstbirthcontrol = 1
  639. tabletki += 1
  640. money -= 1870
  641. gs 'stat'
  642. '"That''s... not a bad idea. I guess I could while I''m here."'
  643. '"Good choice," Luda says, nodding once and adding on pills to your purchase. "It pays to be safe."'
  644. act 'Continue':gt 'pav_pharmacy', 'start'
  645. end
  646. act'Might as well be safe (buy birth control)':
  647. cla & *nl
  648. pharmacyfirstbirthcontrol = 1
  649. tabletki += 1
  650. money -= 1870
  651. gs 'stat'
  652. '"I guess I might as well. Just to be safe."'
  653. '"It always pays to be safe," Luda says, nodding once and adding on pills to your purchase.'
  654. act 'Continue':gt 'pav_pharmacy', 'start'
  655. end
  656. end
  657. end
  658. if $ARGS[0] = 'buy_preg_test':
  659. menu_off = 1
  660. *clr & cla
  661. if pharmacy_timers['preg_test'] = daystart:
  662. gt 'pav_pharmacy', 'start'
  663. else
  664. pharmacy_timers['preg_test'] = daystart
  665. end
  666. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] = 10
  667. LudaQW['knows_sex'] = 1
  668. gs 'stat'
  669. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  670. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  671. 'You awkwardly avoid eye contact, your stomach a bundle of nerves, stressing you out with what you have to ask her for.'
  672. if pharmacyfirstpregtest = 0:
  673. pharmacyfirstpregtest = 1
  674. if preziktype = 0:
  675. prezik += 5
  676. elseif preziktype = 1 or preziktype = 2:
  677. prezikcount += 5
  678. end
  679. minut += 2
  680. prezikcount += 5
  681. if fame['pav_slut'] > 150:
  682. '"Aunt Luda... I need... I need a pregnancy test."'
  683. '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.'
  684. '"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."'
  685. '"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.'
  686. '"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.'
  687. else
  688. '"Aunt Luda... I need... I need a pregnancy test."'
  689. 'Her eyes go wide.'
  690. '"<<$pcs_nickname>>! What happened??"'
  691. '"I know, Aunt," you say, deeply embarrassed. "I just... made a mistake..."'
  692. '"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."'
  693. 'She hands you the box and you gratefully tuck it into your purse.'
  694. !! if rape[2] > (daystart - 3):
  695. !! act'I was raped':gt 'pav_pharmacy', 'buy_morning_after_raped'
  696. !! end
  697. end
  698. act'Don''t tell <<$npc_nickname[''A29'']>>':
  699. cla & *clr
  700. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  701. LudaQW['dont_tell'] = 1
  702. if momslut >= 1:
  703. '"Please don''t tell <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  704. 'Your aunt gives you a odd smile. "You might be surprised dear, but anyways I promise this is our little secret."'
  705. '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."'
  706. '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?"'
  707. else
  708. '"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?"'
  709. end
  710. act 'Continue':gt 'pav_pharmacy', 'start'
  711. end
  712. else
  713. minut += rand(2, 5)
  714. prezikcount += 5
  715. act'Meekly ask':
  716. cla & *nl
  717. '"I need... I need another pregnancy test, Aunt Luda" you stammer.'
  718. '"<<$pcs_nickname>>..." she says, looking disappointed. "When are you going to learn?"'
  719. 'You look down, avoiding her gaze as she rings you up.'
  720. '"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."'
  721. act 'Continue':gt 'pav_pharmacy', 'start'
  722. end
  723. act'Openly ask':
  724. '"I need another pregnancy test, Aunt Luda," you say, shamelessly.'
  725. '"<<$pcs_nickname>>..." she says, looking disappointed. "When are you going to learn?"'
  726. 'You shrug. "It''s just a mistake auntie," you say, causing Luda to shake her head.'
  727. '"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."'
  728. act 'Continue':gt 'pav_pharmacy', 'start'
  729. end
  730. end
  731. end
  732. if $ARGS[0] = 'buy_lube':
  733. menu_off = 1
  734. *clr & cla
  735. if pharmacy_timers['lube'] = daystart:
  736. gt 'pav_pharmacy', 'start'
  737. else
  738. pharmacy_timers['lube'] = daystart
  739. end
  740. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 1
  741. gs 'stat'
  742. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  743. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  744. if pharmacy['first_purchase'] = 0:
  745. pharmacy['first_purchase'] = 1
  746. '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.'
  747. end
  748. if pharmacyfirstlube = 0:
  749. pharmacyfirstlube = 1
  750. minut += 2
  751. if fame['pav_slut'] > 150:
  752. '"Erm... yes aunt. I need some <i>stuff</i>," putting extra emphasis on the word, while looking at the lube.'
  753. '"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."'
  754. '"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.'
  755. '"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!"'
  756. else
  757. '"Erm... yes aunt. I need some <i>stuff</i>," putting extra emphasis on the word, while looking at the lube.'
  758. '"Trying to get around your mother''s rules by using your ass, <<$pcs_nickname>>?" she asks, smirking.'
  759. 'Your face manages to heat up even more.'
  760. '"I, uhh..."'
  761. '"Don''t worry," she chuckles. "Your sister asked me for the same thing when she was your age. A little earlier, in fact."'
  762. end
  763. else
  764. if pcs_inhib < 50:
  765. '"Hi Aunt Luda, I need some more lube," You tell her slightly blushing.'
  766. '"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.'
  767. else
  768. '"Hi Aunt Luda, I need some more lube."'
  769. '"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.'
  770. '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."'
  771. '"No problem, darling, have fun," she says as you take your bag.'
  772. end
  773. end
  774. act 'Continue':gt 'pav_pharmacy', 'start'
  775. end
  776. if $ARGS[0] = 'buy_morning_after':
  777. menu_off = 1
  778. *clr & cla
  779. if pharmacy_timers['morning_after'] = daystart:
  780. gt 'pav_pharmacy', 'start'
  781. else
  782. pharmacy_timers['morning_after'] = daystart
  783. end
  784. if LudaQW['KnowsSexActive'] < 10: LudaQW['KnowsSexActive'] += 2
  785. gs 'stat'
  786. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  787. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  788. if pharmacy['first_purchase'] = 0:
  789. pharmacy['first_purchase'] = 1
  790. 'You awkwardly avoid eye contact, letting your gaze "wander" around the pharmacy, pretending you don''t know what you''re here for.'
  791. end
  792. act'Meekly ask':
  793. cla
  794. if pharmacy['morning_after'] = 0:
  795. pharmacy['morning_after'] += 1
  796. minut += 2
  797. if fame['pav_slut'] > 150:
  798. '"Erm... yes aunt. I need..." You take a deep breath. "I need some Plan B..."'
  799. '"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?"'
  800. else
  801. '"Erm... yes aunt. I need..." You take a deep breath. "Aunt Luda, I need some Plan B..."'
  802. '"<<$pcs_nickname>>!" Her eyes go wide with shock. "What happened?" she says, immediately scurrying over towards the birth control counter.'
  803. end
  804. else
  805. if pcs_inhib < 50:
  806. '"Aunt Luda," you whisper. "I need another plan B pill."'
  807. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  808. else
  809. '"Hi Aunt Luda, I need another plan B pill."'
  810. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  811. end
  812. '"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."'
  813. end
  814. act'It''s for emergencies':gt 'pav_pharmacy', 'morning_after_emergency_embarrassed'
  815. act'I made a mistake':gt 'pav_pharmacy', 'morning_after_mistake_embarrassed'
  816. if stat['broken_condoms'] > 0:
  817. act'The condom broke':gt 'pav_pharmacy', 'buy_morning_after_condom_broke_meek'
  818. end
  819. act'Condom broke':gt 'pav_pharmacy', 'morning_after_mistake_embarrassed'
  820. if birth_control['condom_stealth'] >= daystart - 3:
  821. act'I got stealthed':gs 'pav_pharmacy', 'morning_after_stealth_meek'
  822. end
  823. !! if rape[2] > (daystart - 3):
  824. !! act'I was raped':gt 'pav_pharmacy', 'buy_morning_after_raped'
  825. !! end
  826. end
  827. act'Openly ask':
  828. cla
  829. if pharmacy['morning_after'] = 0:
  830. pharmacy['morning_after'] += 1
  831. minut += 2
  832. '"Hi Aunt Luda," you say casually. "I need a Plan B pill."'
  833. if fame['pav_slut'] > 150:
  834. '"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."'
  835. '"I guess I have been getting around a lot," you smile sheepishly. Luda rolls her eyes.'
  836. '"Based on what I''ve heard, that''s putting it lightly." She slaps the package down on the countertop.'
  837. else
  838. '"<<$pcs_nickname>>!" Her eyes go wide with shock. "What happened?" she says, immediately scurrying over towards the birth control counter.'
  839. end
  840. act'It''s for emergencies':gt 'pav_pharmacy', 'morning_after_emergency_open'
  841. act'I made a mistake':gt 'pav_pharmacy', 'morning_after_mistake_open'
  842. if stat['broken_condoms'] > 0:
  843. act'The condom broke':gt 'pav_pharmacy', 'buy_morning_after_condom_broke_meek'
  844. end
  845. if birth_control['condom_stealth'] >= daystart - 3:
  846. act'I got stealthed':gs 'pav_pharmacy', 'morning_after_stealth_open'
  847. end
  848. else
  849. minut += rand(2, 5)
  850. '"Hi Aunt Luda," you say casually. "I need another Plan B pill."'
  851. if pcs_inhib < 50:
  852. '"Again?!" she asks, aghast. Your face heats up in a crimson blush.'
  853. else
  854. '"Again?!" she asks, aghast. Your only response is to give a sort of sorry shrug.'
  855. end
  856. '"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."'
  857. act 'Continue':gt 'pav_pharmacy', 'start'
  858. if stat['broken_condoms'] > 0:
  859. act'The condom broke':gt 'pav_pharmacy', 'buy_morning_after_condom_broke_meek'
  860. end
  861. if birth_control['condom_stealth'] >= daystart - 3:
  862. act'I got stealthed':gs 'pav_pharmacy', 'morning_after_stealth_open'
  863. end
  864. end
  865. end
  866. end
  867. if $ARGS[0] = 'morning_after_emergency_embarrassed':
  868. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  869. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  870. if pharmacy['morning_after'] > 1: pharmacy['morning_after'] -= 1
  871. if pharmacyfirstbirthcontrol = 0:
  872. '"Nothing happened!" you say, quickly rushing to reassure her. "I- I uhmm... I just want it for emergencies... Just in case, you know?"'
  873. 'Luda heaves a mighty sigh.'
  874. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  875. '"Sorry," you cringe as she rings up the pill, shaking her head.'
  876. '"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."'
  877. gs 'pav_pharmacy', 'birth_control_addon'
  878. else
  879. if birth_control['think_safe'] ! 1 and pillcon2 > 0:
  880. '"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?"'
  881. else
  882. '"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..."'
  883. end
  884. 'Luda heaves a mighty sigh.'
  885. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  886. '"Sorry," you cringe as she rings you up, shaking her head.'
  887. act 'Continue':gt 'pav_pharmacy', 'start'
  888. end
  889. end
  890. if $ARGS[0] = 'morning_after_emergency_open':
  891. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  892. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  893. if pharmacy['morning_after'] > 1: pharmacy['morning_after'] -= 1
  894. if pharmacyfirstbirthcontrol = 0:
  895. '"Nothing happened Aunt Luda," you say with a relaxed smile. "I just want one for emergencies. In case a condom breaks or something."'
  896. 'Luda heaves a mighty sigh.'
  897. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  898. '"Sorry," you say with an only slightly guilty grin.'
  899. '"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."'
  900. gs 'pav_pharmacy', 'birth_control_addon'
  901. else
  902. if birth_control['think_safe'] ! 1 and pillcon2 > 0:
  903. '"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."'
  904. else
  905. '"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."'
  906. end
  907. 'Luda heaves a mighty sigh.'
  908. '"My goodness! You need to lead with that next time, <<$pcs_firstname>>! I nearly had a heart attack!"'
  909. '"Sorry," you say with an only slightly guilty grin.'
  910. act 'Continue':gt 'pav_pharmacy', 'start'
  911. end
  912. end
  913. if $ARGS[0] = 'morning_after_mistake_embarrassed':
  914. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  915. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  916. if fame['pav_slut'] > 150:
  917. '"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..."'
  918. '"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."'
  919. 'She hands you the box and you gratefully tuck it into your purse.'
  920. else
  921. '"I know, Aunt," you blush in embarrassment. "I just... made a mistake..."'
  922. '"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."'
  923. 'She hands you the box and you gratefully tuck it into your purse.'
  924. end
  925. '"Thank you Aunt Luda," you mumble shamefully.'
  926. !! if pharmacy['morning_after'] = 1:
  927. '"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."'
  928. !! else
  929. !! end
  930. act'I prefer condoms':
  931. if preziktype = 0:
  932. prezik += 5
  933. elseif preziktype = 1 or preziktype = 2:
  934. prezikcount += 5
  935. end
  936. cla & *nl
  937. '"I actually prefer using condoms," you say, embarrassedly.'
  938. '"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."'
  939. gs 'pav_pharmacy', 'buy_morning_after_end'
  940. end
  941. if money < 1870:
  942. act'I don''t have the money':
  943. cla & *nl
  944. '"I would, Aunt Luda," you say. "I just don''t have the money right now..."'
  945. if pharmacy['bc_pills_free'] = 0:
  946. tabletki += 1
  947. 'Luda sighs deeply and pulls out a small box and slides it across the counter to you.'
  948. '"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."'
  949. else
  950. '"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."'
  951. end
  952. gs 'pav_pharmacy', 'buy_morning_after_end'
  953. end
  954. end
  955. gs 'pav_pharmacy', 'buy_morning_after_end'
  956. end
  957. if $ARGS[0] = 'morning_after_mistake_open':
  958. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  959. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  960. if fame['pav_slut'] > 150:
  961. '"I''m normally careful!" you protest, a little annoyed that she''s making assumptions about you. "I just made a mistake this time."'
  962. '"I guess we all make those," she sighs as you tuck the box into your purse.'
  963. else
  964. '"I just made a mistake," you shrug. "Surely a girl''s allowed one or two of those, isn''t she?"'
  965. '"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."'
  966. 'She hands you the box and you tuck it into your purse.'
  967. end
  968. '"Thanks Aunt Luda," you grin.'
  969. !! if pharmacy['morning_after'] = 1:
  970. '"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."'
  971. !! else
  972. !! end
  973. act'I prefer condoms':
  974. if preziktype = 0:
  975. prezik += 5
  976. elseif preziktype = 1 or preziktype = 2:
  977. prezikcount += 5
  978. end
  979. cla & *nl
  980. '"I actually prefer using condoms," you say.'
  981. '"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."'
  982. gs 'pav_pharmacy', 'buy_morning_after_end'
  983. end
  984. if money < 1870:
  985. act'I don''t have the money':
  986. cla & *nl
  987. '"I would, Aunt Luda," you say. "I''m just a little tight on funds right now. I can''t afford it."'
  988. if pharmacy['bc_pills_free'] = 0:
  989. tabletki += 1
  990. 'Luda sighs deeply and pulls out a small box and slides it across the counter to you.'
  991. '"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."'
  992. else
  993. '"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."'
  994. end
  995. gs 'pav_pharmacy', 'buy_morning_after_end'
  996. end
  997. end
  998. gs 'pav_pharmacy', 'buy_morning_after_end'
  999. end
  1000. if $ARGS[0] = 'morning_after_stealth_meek':
  1001. cla & *clr
  1002. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1003. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1004. '"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..."'
  1005. '"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."'
  1006. 'Luda hands you a bag with the pill in it.'
  1007. '"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."'
  1008. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1009. end
  1010. if $ARGS[0] = 'morning_after_stealth_open':
  1011. cla & *clr
  1012. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1013. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1014. '"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!"'
  1015. '"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."'
  1016. 'Luda hands you a bag with the pill in it.'
  1017. '"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."'
  1018. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1019. end
  1020. if $ARGS[0] = 'buy_morning_after_condom_broke_meek':
  1021. cla & *nl
  1022. if LudaQW['broken_condoms'] = 0:
  1023. '"The condom broke," you mumble embarrassedly.'
  1024. '"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."'
  1025. else
  1026. '"The condom broke again," you mumble embarrassedly.'
  1027. if LudaQW['broken_condoms'] <= 5:
  1028. '"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?"'
  1029. else
  1030. '"This is just getting ridiculous," Luda huffs in exhasperation as she hands over the bag. "Just start the bloody pill already <<$pcs_firstname>>!"'
  1031. end
  1032. end
  1033. LudaQW['broken_condoms'] += 1
  1034. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1035. end
  1036. if $ARGS[0] = 'buy_morning_after_condom_broke_open':
  1037. cla & *nl
  1038. if LudaQW['broken_condoms'] = 0:
  1039. '"It''s not my fault," you shrug. "Condom broke."'
  1040. '"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."'
  1041. else
  1042. '"The condom broke again," you shrug.'
  1043. if LudaQW['broken_condoms'] <= 5:
  1044. '"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?"'
  1045. else
  1046. '"This is just getting ridiculous," Luda huffs in exhasperation as she hands over the bag. "Just start the bloody pill already <<$pcs_firstname>>!"'
  1047. end
  1048. end
  1049. LudaQW['broken_condoms'] += 1
  1050. act 'Take the bag':gt 'pav_pharmacy', 'start'
  1051. end
  1052. if $ARGS[0] = 'buy_morning_after_raped':
  1053. cla & *clr
  1054. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1055. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1056. if fame['pav_slut'] > 150:
  1057. '"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.'
  1058. '"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.'
  1059. else
  1060. 'You blush in embarrassment. "I know, aunt... I just... made a mistake."'
  1061. '"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.'
  1062. '"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."'
  1063. 'You nod shamefully.'
  1064. end
  1065. '"Please don''t tell <<$npc_nickname[''A29'']>>. She wouldn''t understand."'
  1066. if momslut >= 1:
  1067. 'Your aunt gives you a odd look. "You might be surprised dear."'
  1068. '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."'
  1069. '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."'
  1070. else
  1071. '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."'
  1072. end
  1073. end
  1074. if $ARGS[0] = 'buy_morning_after_end':
  1075. act 'Continue':gt 'pav_pharmacy', 'start'
  1076. act'Don''t tell <<$npc_nickname[''A29'']>>':
  1077. cla & *clr
  1078. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1079. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1080. if LudaQW['momslut_know'] = 1:
  1081. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1082. '"It''ll be our secret," Luda winks.'
  1083. elseif momslut >= 1:
  1084. LudaQW['momslut_know'] = 1
  1085. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1086. '"You might be surprised dear," Luda says with a wry smile and you sigh tiredly.'
  1087. '"Yes Aunt, I know all about <<$npc_nickname[''A29'']>>''s... habits. I just don''t want to hear about it from her is all."'
  1088. '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."'
  1089. else
  1090. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say. "She wouldn''t understand."'
  1091. '"You might be surprised dear," Luda says with a wry smile and you cock your head in confusion.'
  1092. *nl
  1093. '<i>What''s that supposed to mean?</i>'
  1094. *nl
  1095. '"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."'
  1096. end
  1097. act 'Continue':gt 'pav_pharmacy', 'start'
  1098. end
  1099. end
  1100. if $ARGS[0] = 'morning_after_no_money':
  1101. if money < 740:
  1102. act'Ask Luda for a morning after pill (meekly)':
  1103. cla & *clr
  1104. gs 'stat'
  1105. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1106. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1107. if pharmacy['morning_after_free'] < 10:
  1108. pharmacy['morning_after_free'] += 1
  1109. else
  1110. end
  1111. end
  1112. act'Ask Luda for a morning after pill (openly)':
  1113. cla & *clr
  1114. gs 'stat'
  1115. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1116. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1117. if pharmacy['morning_after_free'] < 10:
  1118. pharmacy['morning_after_free'] += 1
  1119. else
  1120. end
  1121. end
  1122. !!{ else
  1123. !! lie that you don''t have enough money
  1124. act'Ask Luda for a morning after pill (meekly)':
  1125. cla & *clr
  1126. gs 'stat'
  1127. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1128. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1129. if pharmacy['morning_after_free'] < 10:
  1130. pharmacy['morning_after_free'] += 1
  1131. else
  1132. end
  1133. end
  1134. act'Ask Luda for a morning after pill (openly)':
  1135. cla & *clr
  1136. gs 'stat'
  1137. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1138. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1139. if pharmacy['morning_after_free'] < 10:
  1140. pharmacy['morning_after_free'] += 1
  1141. else
  1142. end
  1143. end}
  1144. end
  1145. end
  1146. if $ARGS[0] = 'ointment':
  1147. if mosol > 0:
  1148. cla
  1149. if pharmacy_timers['morning_after'] = daystart:
  1150. gt 'pav_pharmacy', 'start'
  1151. else
  1152. pharmacy_timers['morning_after'] = daystart
  1153. end
  1154. act'Meekly ask':
  1155. cla & *clr
  1156. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1157. '"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.'
  1158. '"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."'
  1159. if PCloskirt = 0:
  1160. '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.'
  1161. else
  1162. '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.'
  1163. end
  1164. '"Aunt Luda!" you hiss, causing her to laugh again.'
  1165. '"Have a nice day, darling," she says innocently.'
  1166. act 'Continue':gt 'pav_pharmacy', 'start'
  1167. end
  1168. act'Openly ask':
  1169. cla & *clr
  1170. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1171. '"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?"'
  1172. '"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."'
  1173. '"No panty lines at least," you shrug as she comes back to the counter.'
  1174. if PCloskirt = 0:
  1175. '"<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."'
  1176. else
  1177. '"<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."'
  1178. end
  1179. '"Thanks for the advice Aunt Luda."'
  1180. '"Any time darling."'
  1181. act 'Continue':gt 'pav_pharmacy', 'start'
  1182. end
  1183. else
  1184. gt 'pav_pharmacy', 'start'
  1185. end
  1186. end
  1187. if $ARGS[0] = 'dont_tell':
  1188. if LudaQW['dont_tell'] = 0:
  1189. act'Don''t tell <<$npc_nickname[''A29'']>>':
  1190. LudaQW['dont_tell'] = 1
  1191. cla & *clr
  1192. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1193. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1194. if LudaQW['momslut_know'] = 1:
  1195. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1196. '"It''ll be our secret," Luda winks.'
  1197. elseif momslut >= 1:
  1198. LudaQW['momslut_know'] = 1
  1199. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say.'
  1200. '"You might be surprised, darling," Luda says with a wry smile and you sigh tiredly.'
  1201. '"Yes Aunt, I know all about <<$npc_nickname[''A29'']>>''s... habits. I just don''t want to get an earful from her."'
  1202. '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."'
  1203. else
  1204. '"Please don''t tell <<$npc_nickname[''A29'']>>," you say. "She wouldn''t understand."'
  1205. '"You might be surprised, darling," Luda says with a wry smile and you cock your head in confusion.'
  1206. *nl
  1207. '<i>What''s that supposed to mean?</i>'
  1208. *nl
  1209. '"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."'
  1210. 'She gives you a wink and hands you the bag.'
  1211. '"Here you go darling. Don''t use them all at once!"'
  1212. end
  1213. act 'Continue':gt 'pav_pharmacy', 'start'
  1214. end
  1215. end
  1216. end
  1217. if $ARGS[0] = 'luda_free_condoms':
  1218. LudaQW['free_condoms'] = 1
  1219. gs 'pav_pharmacy', 'luda_free_condoms_give'
  1220. cla & *clr
  1221. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1222. 'As you enter the pharmacy, your Aunt Luda glances up from the register and smiles at you.'
  1223. '"<<$pcs_nickname>>! I''ve been wondering when I''d see you. I have a gift for you."'
  1224. '"A gift?" you ask as she comes out with a small paper bag.'
  1225. if fame['pav_slut'] > 150:
  1226. LudaQW['knows_sex'] = 1
  1227. '"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."'
  1228. act'Deny it':
  1229. cla & *nl
  1230. '"Uhh, I don''t know what you''ve been hearing but-"'
  1231. '"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."'
  1232. 'You open it and look inside, revealing a box containing 10 condoms and a morning after pill.'
  1233. '"Have fun," she says, giving you a meaningful look. "But be <i>safe</i> while you do it."'
  1234. act 'Continue':gt 'pav_pharmacy', 'start'
  1235. end
  1236. act'Is it that obvious?':
  1237. cla & *nl
  1238. '"Is it really that obvious?" you ask, blushing.'
  1239. '"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."'
  1240. 'You open it and look inside, revealing a box containing 10 condoms and a morning after pill.'
  1241. '"Have fun," she says, giving you a meaningful look. "But be <i>safe</i> while you do it."'
  1242. act 'Continue':gt 'pav_pharmacy', 'start'
  1243. end
  1244. act'Reassure her':
  1245. cla & *nl
  1246. '"Aunt," you say. "I promise you, I''m already being safe. You don''t have to worry about becoming a grandaunt yet."'
  1247. '"<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."'
  1248. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1249. '"Add it to your stash," she winks. "Plus a little something for emergencies."'
  1250. act 'Continue':gt 'pav_pharmacy', 'start'
  1251. end
  1252. else
  1253. '"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."'
  1254. act'Ew!':
  1255. cla & *nl
  1256. '"Ew!" you grimace. "Aunt Luda! Don''t talk like that! It''s gross!"'
  1257. '"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!"'
  1258. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1259. '"Just in case," she winks.'
  1260. act 'Continue':gt 'pav_pharmacy', 'start'
  1261. end
  1262. act'Blush':
  1263. cla & *nl
  1264. 'Your cheeks flush and her smile breaks into a full blown grin.'
  1265. '"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!"'
  1266. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1267. '"Just in case," she winks.'
  1268. !!{ act'Tell her you don''t need them':
  1269. cla & *nl
  1270. '"I appreciate the thought Aunt Luda, but I don''t need these," you say, pushing them back towards her.'
  1271. '"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-"'
  1272. act'Saving yourself for marriage':
  1273. cla & *clr
  1274. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1275. '"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."'
  1276. '"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."'
  1277. act'Insist you don''t need them':
  1278. LudaQW['free_condoms'] = 2
  1279. cla & *nl
  1280. '"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."'
  1281. 'She sighs, but gives you another small smile and takes the bag back from you.'
  1282. '"Well, if you insist. But if you ever change your mind, these will be right here waiting for you."'
  1283. end
  1284. act'Just in case...':
  1285. end
  1286. end
  1287. act'':
  1288. end
  1289. act 'Continue':gt 'pav_pharmacy', 'start'
  1290. end}
  1291. act 'Continue':gt 'pav_pharmacy', 'start'
  1292. end
  1293. if stat['think_virgin'] ! 1:
  1294. act'Admit you''ve been having sex':
  1295. LudaQW['knows_sex'] = 1
  1296. cla & *nl
  1297. '"Well, I can''t deny that," you say, giving her a rueful smile.'
  1298. '"<<$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!"'
  1299. 'She hands you the bag and you look inside, revealing a box containing 10 condoms and a morning after pill.'
  1300. '"Have fun," she winks before giving you a meaningful look.'
  1301. act 'Continue':gt 'pav_pharmacy', 'start'
  1302. end
  1303. end
  1304. end
  1305. end
  1306. if $ARGS[0] = 'luda_free_condoms_give':
  1307. LudaQW['condom_give_day'] = daystart
  1308. if preziktype = 0:
  1309. prezik += 10
  1310. elseif preziktype = 1 or preziktype = 2:
  1311. prezikcount += 10
  1312. end
  1313. morning_after_pill += 1
  1314. end
  1315. if $ARGS[0] = 'luda_change_mind':
  1316. if LudaQW['free_condoms'] = 2:
  1317. act'Ask your Aunt for her present':
  1318. cla & *clr
  1319. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1320. LudaQW['free_condoms'] = 1
  1321. '"Aunt Luda..." you say.'
  1322. '"Yes, darling?"'
  1323. act'Embarrassed':
  1324. cla
  1325. '"I... I need your present after all..." you stammer.'
  1326. '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.'
  1327. '"What made you change your mind?"'
  1328. act'There''s this boy...':
  1329. end
  1330. act'':
  1331. end
  1332. end
  1333. act'Open':
  1334. end
  1335. end
  1336. end
  1337. end
  1338. if $ARGS[0] = 'luda_birth_control_worry':
  1339. LudaQW['birth_control_timer'] = daystart
  1340. LudaQW['birth_control_worry'] = 1
  1341. cla & *clr
  1342. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1343. '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.'
  1344. '"<<$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?"'
  1345. act'Oh shit!':
  1346. cla & *clr
  1347. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1348. 'The color drains from your face as you gasp, covering your mouth with your hand in shock.'
  1349. '"Oh shit! I totally forgot!"'
  1350. '"<<$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!"'
  1351. act 'Just joking':
  1352. *clr & cla
  1353. 'You burst into a fit of giggles as you look at aunt Luda.'
  1354. '"What <<$pcs_nickname>>? This is no laughing matter!" She responds looking quite cross.'
  1355. '"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."'
  1356. '"<<$pcs_nickname>> don''t do that to me, you nearly gave me a heart attack"'
  1357. '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."'
  1358. act'Continue':gt'pav_pharmacy', 'start'
  1359. end
  1360. end
  1361. act'I have a stockpile':
  1362. cla & *nl
  1363. '"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."'
  1364. 'Relief floods through your aunt''s face and she presses her hand to her breast as she takes deep breaths.'
  1365. '"Oh! I nearly had a heart attack!" she says, grinning back at you.'
  1366. '"Sorry," you smile back apologetically.'
  1367. LudaQW['birth_control_worry'] = 1
  1368. act'Continue':gt'pav_pharmacy', 'start'
  1369. end
  1370. act'Buying elsewhere':
  1371. cla & *nl
  1372. '"Don''t worry Aunt Luda," you laugh. "I''m still on the pill, I''ve just been shopping elsewhere."'
  1373. 'Relief floods through your aunt''s face and she presses her hand to her breast as she takes deep breaths.'
  1374. '"Oh! I nearly had a heart attack!" she says, grinning back at you. "Where are you buying these days?"'
  1375. act'The city':
  1376. cla & *nl
  1377. '"I''ve been in the city a lot lately," you tell her. "I shop at the pharmacy there sometimes."'
  1378. '"Ahh," Luda nods. "That explains it."'
  1379. LudaQW['birth_control_worry'] = 1
  1380. act'Continue':gt'pav_pharmacy', 'start'
  1381. end
  1382. act'The market':
  1383. cla & *nl
  1384. '"I''ve been buying them from the market," you tell her. "It''s really easy to find a discount there!"'
  1385. '"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."'
  1386. LudaQW['birth_control_worry'] = 1
  1387. act'Continue':gt'pav_pharmacy', 'start'
  1388. end
  1389. act 'I get them here from your assistant':
  1390. cla & *nl
  1391. '"No need to worry Luda, I''ve been buying them here when your assistant was serving."'
  1392. '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."'
  1393. '"Thanks for your concern Luda but no need to worry." You say to her with a smile.'
  1394. LudaQW['birth_control_worry'] = 1
  1395. act'Continue':gt'pav_pharmacy', 'start'
  1396. end
  1397. act'Continue':gt'pav_pharmacy', 'start'
  1398. end
  1399. act'I stopped on purpose':
  1400. LudaQW['birth_control_worry'] = 1
  1401. cla & *clr
  1402. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1403. '"I didn''t forget Aunt," you say, shaking your head. "I stopped on purpose."'
  1404. '"Why would you do that?" Luda asks, looking worried.'
  1405. *nl
  1406. act'Messing with my hormones':
  1407. cla
  1408. '"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."'
  1409. '"I understand <<$pcs_firstname>>, but it''s better than being pregnant! Especially at your age."'
  1410. *nl
  1411. gs'pav_pharmacy', 'luda_birth_control_worry2'
  1412. end
  1413. act'Killing my sex drive':
  1414. cla
  1415. '"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!"'
  1416. '"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?"'
  1417. *nl
  1418. gs'pav_pharmacy', 'luda_birth_control_worry2'
  1419. end
  1420. if pcs_lovers - pcs_girlfriends > 0:
  1421. act'Trying for a baby with my boyfriend':
  1422. LudaQW['birth_control_worry'] = 3
  1423. cla
  1424. '"I''m trying for a baby with my boyfriend," you smile, unable to contain your overwhelming desire for motherhood. Luda goes pale instead.'
  1425. if age < 20:
  1426. '"<<$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!"'
  1427. else
  1428. '"<<$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!"'
  1429. end
  1430. '"He loves me!" you snap back at her. "He''s going to make a great father and I want to have his baby!"'
  1431. '"<<$pcs_firstname>>!"'
  1432. act'You can''t tell my mother':
  1433. cla & *nl
  1434. '"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!"'
  1435. '"<<$pcs_firstname>>..." Luda says again, looking pleadingly at you.'
  1436. '"I mean it!" you snarl.'
  1437. '"I... I won''t..." your aunt reluctantly agrees. "But please, I hope you''ll see reason soon... Before it''s too late..."'
  1438. act'Continue':gt'pav_pharmacy', 'start'
  1439. end
  1440. end
  1441. else
  1442. act'Trying for a baby':
  1443. LudaQW['birth_control_worry'] = 2
  1444. cla
  1445. '"I want to have a baby," you smile, unable to contain your overwhelming desire for motherhood. Luda goes pale instead.'
  1446. if age < 20:
  1447. '"<<$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?"'
  1448. else
  1449. '"<<$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?"'
  1450. end
  1451. '"No," you say stubbornly. "I don''t need someone else, I want to be a mother and I''m not going to wait!"'
  1452. '"<<$pcs_firstname>>!"'
  1453. act'You can''t tell my mother':
  1454. cla & *nl
  1455. '"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."'
  1456. '"<<$pcs_firstname>>..." Luda says again, looking pleadingly at you.'
  1457. '"I mean it!" you snarl.'
  1458. '"I... I won''t..." your aunt reluctantly agrees. "But please, I hope you''ll see reason soon... Before it''s too late..."'
  1459. act'Continue':gt'pav_pharmacy', 'start'
  1460. end
  1461. end
  1462. end
  1463. end
  1464. if tabletkishot > 0:
  1465. act'I switched to the shot':
  1466. cla & *nl
  1467. '"Don''t worry Aunt Luda," you laugh. "I just switched to the shot. It''s easier and more reliable than the pill."'
  1468. 'Relief floods through your aunt''s face and she presses her hand to her breast as she takes deep breaths.'
  1469. '"Oh! I nearly had a heart attack!" she says, grinning back at you.'
  1470. '"Sorry," you smile back apologetically.'
  1471. LudaQW['bc_shot_know'] = 1
  1472. act'Continue':gt'pav_pharmacy', 'start'
  1473. end
  1474. end
  1475. end
  1476. if $ARGS[0] = 'luda_birth_control_worry2':
  1477. act'Still using condoms':
  1478. cla
  1479. '"Don''t worry Aunt Luda," you smile. "I''m still using condoms."'
  1480. '"Well, as long as you''re doing that much..." she says with clear relief.'
  1481. act'Continue':gt'pav_pharmacy', 'start'
  1482. end
  1483. act'Switching to the calendar method':
  1484. cla
  1485. '"I''m switching to the calendar method," you smile. "I''ve already started keeping track of my cycle."'
  1486. '"Trying to track your cycle is very unreliable as birth control," Luda frets insistently. "Please, won''t you at least use condoms?"'
  1487. '"I''ll be careful Aunt Luda, I promise."'
  1488. '"But even the most careful of us still make mistakes," she says with obvious concern.'
  1489. act'Continue':gt'pav_pharmacy', 'start'
  1490. end
  1491. act'I''m being careful':
  1492. cla
  1493. '"Don''t worry Aunt Luda," you smile. "I''m being careful."'
  1494. '"Careful with a condom?" Luda asks insistently.'
  1495. '"Just careful. I''ll be fine, I promise."'
  1496. '"But even the most careful of us still make mistakes," she says with obvious concern.'
  1497. act'Continue':gt'pav_pharmacy', 'start'
  1498. end
  1499. end
  1500. if $ARGS[0] = 'luda_birth_control_start_again_meek':
  1501. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1502. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1503. 'You hesitantly approach the counter, feeling incredibly embarrassed by your past actions and what you have to do next.'
  1504. 'Luda can see it on your face and looks at you with concern.'
  1505. '"Yes, <<$pcs_firstname>>? Is everything all right?"'
  1506. 'You take a deep breath.'
  1507. *nl
  1508. '"Aunt Luda, I... need some birth control pills."'
  1509. '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.'
  1510. if LudaQW['birth_control_worry'] = 2:
  1511. '"What happened to your... plans...?" she asks hesitantly.'
  1512. '"I thought better of it," you mumble back, unable to look her in the eye after what you said before.'
  1513. *nl
  1514. 'When you finally turn your gaze back towards her, Luda is looking at you with love and compassion.'
  1515. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1516. 'You nod back gratefully, taking the box of pills from her."'
  1517. act'Continue':gt'pav_pharmacy', 'start'
  1518. elseif LudaQW['birth_control_worry'] = 3:
  1519. '"What happened to you and your... boyfriend...?" she asks hesitantly.'
  1520. act'Changed my mind':
  1521. '"I thought better of it," you mumble back, unable to look her in the eye after what you said before.'
  1522. *nl
  1523. 'When you finally turn your gaze back towards her, Luda is looking at you with love and compassion.'
  1524. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1525. 'You nod back gratefully, taking the box of pills from her."'
  1526. act'Continue':gt'pav_pharmacy', 'start'
  1527. end
  1528. act'We broke up':
  1529. '"We broke up," you mumble back, blinking back tears, unable to look her in the eye after what you said before.'
  1530. *nl
  1531. 'When you finally turn your gaze back towards her, Luda is looking at you with love and compassion.'
  1532. '"I really thought he loved me," you sniff. "I thought he was the one."'
  1533. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1534. 'You nod back gratefully, taking the box of pills from her."'
  1535. act'Continue':gt'pav_pharmacy', 'start'
  1536. end
  1537. end
  1538. LudaQW['birth_control_worry'] = 0
  1539. end
  1540. if $ARGS[0] = 'luda_birth_control_start_again_open':
  1541. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1542. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1543. '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.'
  1544. 'Luda can see it on your face and looks at you with concern.'
  1545. '"Yes, <<$pcs_firstname>>? Is everything all right?"'
  1546. *nl
  1547. '"Aunt Luda," you say firmly. "I would like some birth control pills."'
  1548. '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.'
  1549. if LudaQW['birth_control_worry'] = 2:
  1550. '"What happened to your... plans...?" she asks hesitantly.'
  1551. '"I realized I was being stupid," you reply, sighing. "You were right Aunt Luda. I wasn''t ready."'
  1552. *nl
  1553. 'Luda smiles back at you with compassion.'
  1554. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1555. 'You nod back gratefully, taking the box of pills from her."'
  1556. act'Continue':gt'pav_pharmacy', 'start'
  1557. elseif LudaQW['birth_control_worry'] = 3:
  1558. '"What happened to you and your... boyfriend...?" she asks hesitantly.'
  1559. act'I was being dumb':
  1560. '"I realized I was being stupid," you reply, sighing. "You were right Aunt Luda. I wasn''t ready."'
  1561. *nl
  1562. 'Luda smiles back at you with compassion.'
  1563. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1564. 'You nod back gratefully, taking the box of pills from her."'
  1565. end
  1566. act'We broke up':
  1567. '"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.'
  1568. *nl
  1569. act'He was an asshole':
  1570. cla & *clr
  1571. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1572. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1573. '"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."'
  1574. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1575. 'You nod back gratefully, taking the box of pills from her."'
  1576. act'Continue':gt'pav_pharmacy', 'start'
  1577. end
  1578. act'I thought he loved me':
  1579. cla & *clr
  1580. '<center><B><font color="maroon">Pharmacy</font></B></center>'
  1581. '<center><img <<$set_imgh>> src="images/locations/pavlovsk/pharmacy/apteka_aunt_1.jpg"></center>'
  1582. '"I really thought he loved me," you say, voice warbling as you struggle to hold back tears. "I thought he was the one."'
  1583. '"It''s okay, darling," she smiles. "We all make mistakes. As long as you''ve learned from this one."'
  1584. 'You nod back gratefully, taking the box of pills from her."'
  1585. act'Continue':gt'pav_pharmacy', 'start'
  1586. end
  1587. end
  1588. end
  1589. LudaQW['birth_control_worry'] = 0
  1590. end
  1591. --- pav_pharmacy ---------------------------------