# pav_pool !! 2023/09/13 !! Based on the Mod Swimlessons by Darcanlos !! Rewritten by Vengeance !! Code updated by Anjuna $loc = 'pav_pool' if $ARGS[0] = 'building' or $ARGS[0] = '': $loc_arg = 'building' $location_type = 'public_outdoors' minut += 4 if hour >= 8 and hour <= 20: gs 'stat' '
> src="images/locations/pavlovsk/community/swim/entrance.jpg">
' 'Pavlovsk''s public swimming pool is rather dated, but still serves it''s purpose quite well.' 'The entrance fee is 100 for the full day, but students get a discount and it only costs you 60 .' if SchoolAtestat = 0: pav_swimpool['entrancefee'] = 60 else pav_swimpool['entrancefee'] = 100 end if pav_swimpool['entrancepaid'] = daystart: 'You''ve already paid the fee, so you can enter.' act 'Enter': gt 'pav_pool', 'entrance' else if money < pav_swimpool['entrancefee']: act 'Pay and enter': '
You don''t have enough money to pay for entrance!' else act 'Pay and enter': money -= pav_swimpool['entrancefee'] pav_swimpool['entrancepaid'] = daystart gs 'stat' gt 'pav_pool', 'entrance' end end end act 'Leave': gt 'pav_residential' else gs 'stat' '
> src="images/locations/pavlovsk/community/swim/entrance.jpg">
' 'The swimming pool is currently closed. Opening hours are from 08:00 to 21:00.' act 'Leave': gt 'pav_residential' end end if $ARGS[0] = 'entrance': minut += 2 $loc_arg = 'entrance' $location_type = 'public_indoors' gs 'stat' '
> src="images/locations/pavlovsk/community/swim/entrance.jpg">
' 'You''re currently inside the entrance to the swimming pool.' 'From here you can access the girls locker room, visit the cafeteria or browse the pool''s store.' *nl 'There is a sign by the store''s entrance that reads: "If closed, I''m working in the pool. Be back soon." It seems like the store clerk is also the janitor.' act 'Leave': gt 'pav_pool', 'building' end if $ARGS[0] = 'store': !! Outside of the first visit. Clerk has an 80% chance of being away in the busy times and a 30% in the down times. minut += 1 $loc_arg = 'store' $location_type = 'public_indoors' if pav_swimpool['storeclerkvisit'] > 0 and (( (hour >= 8 and hour <= 10) or hour >= 17) and rand(1, 10) <= 8) or rand(1, 10) <= 3: gs 'stat' '
> src="images/locations/pavlovsk/community/swim/store.jpg">
' 'The store is closed right now. The clerk must be doing janitor work somewhere.' act 'Leave': gt 'pav_pool', 'entrance' else gs 'stat' '
' '
> src="images/locations/pavlovsk/community/swim/store.jpg">
' 'The store is small and barely has anything on display, but they might have some swimwear available. There is a divider if you wish to try anything on, but it doesn''t seem to offer much privacy.' !!Buy one specific swimsuit act 'Ask for swimwear': if scandalicious_bikinis[46] = 1: *clr & cla minut += 1 gs 'stat' '

Pool Store

' '
> src="images/locations/pavlovsk/community/swim/storeclerk.jpg">
' 'You already own a bikini which looks similar to the one they have on sale here.' act 'Continue': gt 'pav_pool', 'store' else gt 'pav_pool_events', 'store_simsuit_buy' end end act 'Leave': gt 'pav_pool', 'entrance' end end if $ARGS[0] = 'lockerfemale': !! Clothing change events !!-------------------------------------------------------------------!! $loc = 'pav_pool' $loc_arg = 'lockerfemale' $location_type = 'private' if $temp_curclothes = 'nude': killvar '$temp_curclothes' if PCloswimwear = 1: !! Locker events nude -> swimwear gt 'pav_pool_events', 'locker_nude_to_swim' elseif $clothingworntype ! 'nude' or $pantyworntype ! 'none': !! Locker events nude -> normal clothing gt 'pav_pool_events', 'locker_nude_to_clothed' end elseif $temp_curclothes = 'swimwear': killvar '$temp_curclothes' if $clothingworntype = 'nude' and $pantyworntype = 'none': !! Locker events swim -> nude gt 'pav_pool_events', 'locker_swim_to_nude' elseif PCloswimwear ! 1: !! Locker events swim -> clothing gt 'pav_pool_events', 'locker_swim_to_clothed' end elseif $temp_curclothes = 'norm': killvar '$temp_curclothes' if $clothingworntype = 'nude' and $pantyworntype = 'none': !! Locker events clothing -> nude gt 'pav_pool_events', 'locker_clothed_to_nude' elseif PCloswimwear = 1: !! Locker events clothing -> swim gt 'pav_pool_events', 'locker_clothed_to_swim' end end !!-------------------------------------------------------------------!! !!ARGS[1] = 1 prevents this event from triggering repeatedly if rand(1,10) = 1 and $clothingworntype = 'nude' and $pantyworntype = 'none' and ARGS[1] = 0: gt 'pav_pool_events', 'naked_locker' end minut += 1 gs 'stat' '
> src="images/locations/pavlovsk/community/swim/lockers.jpg">
' 'The changing rooms are old and murky. They are uncomfortable, cramped and you always feel compelled to leave as quickly as possible. The small windows on one side don''t make you feel any better.' 'From here you can access the showers or go to the mirrors area, highly contested in busy times. You can also access the pool, but only if you''re wearing swimwear.' if func('changingroom','count_swim_item') > 0 or $clothingworntype = 'nude': act 'Change your clothes': !!Remember current clothes for clothing change events if $clothingworntype = 'nude' and $pantyworntype = 'none': $temp_curclothes = 'nude' elseif PCloswimwear = 1: $temp_curclothes = 'swimwear' else $temp_curclothes = 'norm' end $loc = 'pav_pool' $loc_arg = 'lockerfemale' !!Ignore Inhibition through willpower gt 'changingroom', 'view_swim_list', 1 end else *nl 'You should buy some swimwear if you intend on spending time at the pool.' *nl end !! act 'Go to the mirrors': !! gt 'pav_pool', 'mirror' !! end if (pcs_makeup = 1 or cosmetic_tattoo > 0) and PCloswimwear = 1: act 'Enter the pool area': gs 'shoes', 'strip' & gt 'pav_pool', 'pool' else *nl if PCloswimwear = 0: 'You need to put some swimwear on first if you want to go in the pool.' if pcs_makeup <> 1 and cosmetic_tattoo = 0: 'You need to wash your make-up off first if you want to go in the pool.' *nl end if $clothingworntype <> 'nude': act 'Strip all clothing': gs 'clothing', 'strip_all' & gt 'pav_pool', 'lockerfemale' act 'Leave': if PCloswimwear = 1 or $clothingworntype = 'nude': cla 'You need to get dressed first!' act 'Return': gt 'pav_pool', 'lockerfemale' else minut += 3 gs 'stat' gt 'pav_pool', 'entrance' end end end if $ARGS[0] = 'showerfemale': $loc_arg = 'showerfemale' $location_type = 'private' menu_off = 1 minut += 1 gs 'stat' '
> src="images/locations/pavlovsk/community/swim/showergirl.jpg">
' 'The showers have seen better days. Thankfully, the water from the shower is very warm and feels great on your skin.' if $clothingworntype ! 'nude': 'You need to strip before you can shower.' else act 'Take a shower': *clr & cla minut += 15 dynamic $showerdin gs 'stat' '
> src="images/locations/pavlovsk/school/gym/shower/watch.jpg">
' if hour >= 8 and hour < 10: 'Almost nobody comes here this early in the morning, so you have the shower to yourself.' elseif hour >= 10 and hour < 12: 'The pool is rather busy at this time, mostly with families with children and a few older people. An older woman is showering right now, but it''s otherwise quiet.' elseif hour >= 12 and hour < 18: 'The pool and showers are crowded and you have to wait for someone else to finish first.' elseif hour >= 18 and hour < 20: 'Not many people visit the pool this late in the evening, with only a handful of adults coming for an after work swim. You have the shower to yourself.' elseif hour >= 20 and hour < 21: 'It''s rather late and the pool will be closing soon. You think you''re among the last people in the building, so you''re alone and can enjoy the shower all to yourself.' end if deodorant_on = 1: gs 'sweat', 'remove_deo' & '
Your deodorant gets washed away in the shower.' if rand(1,3) = 1 and hour >= 18 and hour < 21: act 'Finish': gt 'pav_pool_events', 'shower_late' else act 'Finish': gt 'pav_pool', 'showerfemale' end end end act 'Go back to the changing room': gt 'pav_pool', 'lockerfemale' end if $ARGS[0] = 'mirror': !! ARGS[1] = 1 prevents the same event from triggering repeatedly. $loc_arg = 'mirror' $location_type = 'private' if rand(1,10) = 1 and $clothingworntype = 'nude' and $pantyworntype = 'none' and ARGS[1] = 0: gt 'pav_pool_events', 'naked_mirror' end minut += 1 gs 'stat' $locM = 'pav_pool' $locM_arg = 'mirror' '
> src="images/locations/pavlovsk/community/swim/mirrorsink.jpg">
' 'The area where the mirrors are is just as murky as the rest of the changing room. It''s almost like the owners don''t care about the dilapidated appearance.' if $clothingworntype = 'nude': *nl 'You are completely naked.' end act 'Go back to the changing room': gt 'pav_pool', 'lockerfemale' if cumloc[11]+cumloc[12]+cumloc[16] > 0: act 'Clean the cum from your face': *clr & cla menu_off = 1 minut += 5 pcs_makeup = 1 cumspclnt = 9 gs 'cum_cleanup' cumspclnt = 13 gs 'cum_cleanup' if pcs_sweat > 19: pcs_sweat -= 5 gs 'stat' '
> src="images/locations/pavlovsk/community/swim/washface.jpg">
' 'You carefully wash the cum from your face at the sink.' act 'Finish': gt 'pav_pool', 'mirror' end end if pcs_makeup <> 1 and cosmetic_tattoo = 0: act 'Wash your make-up off': *clr & cla minut += 5 pcs_makeup = 1 if pcs_sweat > 19: pcs_sweat -= 5 gs 'stat' '
> src="images/locations/pavlovsk/community/swim/washface.jpg">
' 'You carefully wash away your make-up at the sink.' act 'Finish': gt 'pav_pool', 'mirror' end end end if $ARGS[0]= 'cafeteria': *clr & cla $loc_arg = 'cafetaria' $location_type = 'public_indoors' minut += 1 '
> src="images/locations/pavlovsk/community/swim/cafeteria<>.jpg">
' 'The cafeteria doesn''t have a lot on the menu and only offers some basic snacks.' 'Two girls are currently ordering from the cashier.' act 'Order': *clr & cla minut += 1 '
> src="images/locations/pavlovsk/community/swim/cafeteriaturn.jpg">
' 'It''s finally your turn and you sit on one of the stools while you order.' if money < 100: 'You don''t have enough money to buy a snack.' act 'Return': gt 'pav_pool', 'cafeteria' else act 'Buy a snack (100 ) (0:05)': *clr & cla gs 'stat' minut += 5 money -= 100 pcs_health += 10 pcs_mood += 20 fat += 6 pcs_energy += 20 if pcs_hydra >= 100: pcs_hydra += 10 else pcs_hydra += 20 end cumspclnt = 2 gs 'cum_cleanup' pcs_breath = 0 gs 'food', 'aftermeal' '
> src="images/shared/food/food.jpg">
' 'You enjoy a small tasty, but somewhat fattening, snack.' gs 'stat' act 'Return': gt 'pav_pool', 'cafeteria' end end act 'Drink some water (0:05)': *clr & cla frost = 1 if alko > 0: alko -= 1 minut += 5 pcs_health += 10 pcs_energy += 4 if pcs_hydra >= 100: pcs_hydra += 25 else pcs_hydra += 50 end cumspclnt = 2 gs 'cum_cleanup' pcs_breath = 0 gs 'beverage', 'afterdrink' gs 'stat' '
> src="images/locations/shared/brothel/barorderwater.jpg">
' 'You enjoy a glass of water.' act 'Return': gt 'pav_pool', 'cafeteria' end act 'Leave': gt 'pav_pool', 'entrance' end act 'Leave': gt 'pav_pool', 'entrance' end if $ARGS[0] = 'pool': *clr & cla $loc_arg = 'pool' $location_type = 'public_indoors' minut += 1 gs 'stat' if hour >= 8 and hour < 10: '
> src="images/locations/pavlovsk/community/swim/pool1.jpg">
' 'The pool is almost empty this early in the morning. You can enjoy it almost all to yourself.' elseif hour >= 10 and hour < 12: '
> src="images/locations/pavlovsk/community/swim/pool2.jpg">
' 'The pool is mostly used by families with children and older people at this time.' elseif hour >= 12 and hour < 18: '
> src="images/locations/pavlovsk/community/swim/pool3.jpg">
' 'The pool is crowded with all kinds of people. This won''t be a relaxing swim...' elseif hour >= 18 and hour < 20: '
> src="images/locations/pavlovsk/community/swim/pool4.jpg">
' 'Not many visit the pool this late in the evening, with only a few adults coming for an after work swim.' elseif hour >= 20 and hour < 21: '
> src="images/locations/pavlovsk/community/swim/pool5.jpg">
' 'It''s rather late and the pool will be closing soon, so you''re mostly alone and can enjoy the pool all to yourself.' end 'The pool is rather old, but still has a certain charm to it. The wall to wall windows allow for a nice atmosphere during the day and there is an upper balcony where people often watch from above.' 'From here you can access the female locker room.' if hour >= 8 and hour < 21: act 'Climb into the pool': *clr & cla minut += 1 gs 'stat' '
> src="images/locations/pavlovsk/community/swim/ladder<>.jpg">
' 'You slowly climb down the ladder into the pool, probing the temperature as you go down.' act 'Continue': gt 'pav_pool', 'poolwater' end act 'Dive into the water': *clr & cla minut += 1 gs 'stat' '
> src="images/locations/pavlovsk/community/swim/diving.jpg">
' if pcs_agil < 45: 'You climb up to the top of the diving board and try to jump elegantly into the water, but the landing is anything but that...' if PCloOnePiece = 0: temp_rand = rand(1,100) if temp_rand < 20: act 'Continue': *clr & cla '
> src="images/locations/pavlovsk/community/swim/bareass.jpg">
' 'As you enter the water, your bikini bottom slides down your legs and leaves your ass exposed. Thankfully, nobody seems to notice and you quickly pull it up before anyone sees you.' act 'Continue': gt 'pav_pool', 'poolwater' end elseif temp_rand => 20 and temp_rand < 40: act 'Continue': *clr & cla '
> src="images/locations/pavlovsk/community/swim/toploosen.jpg">
' 'As you enter the water, the knot of your bikini top loosens and your breasts pop out. Thankfully, nobody seems to notice and you quickly tie it back on before anyone sees you.' act 'Continue': gt 'pav_pool', 'poolwater' end elseif temp_rand => 40 and temp_rand < 50: act 'Continue': *clr & cla '
> src="images/locations/pavlovsk/community/swim/losttop.jpg">
' 'You dive into the pool and pop your head out of the water thinking that you still need to improve on your diving when you hear some boys giggling and looking at you. It''s then that you realize your bikini top is gone!' 'You cover your breasts and frantically look for your bikini top. Thankfully, you spot it floating nearby, grab it and quickly put it back on. The boys smile at you and leave.' pcs_mood -= 3 act 'Continue': gt 'pav_pool', 'poolwater' end elseif temp_rand => 50 and temp_rand < 60: act 'Continue': *clr & cla '
> src="images/locations/pavlovsk/community/swim/bottomlost2.jpg">
' 'You dive into the pool and pop your head out of the water thinking that you still need to improve your diving when you feel the water tickling your bare pussy and realize that your bikini bottom is gone!' 'You cover your groin and frantically look for your bikini bottom. Thankfully, you spot it floating nearby, grab it and quickly slide it back on before anyone notices.' pcs_mood -= 3 act 'Continue': gt 'pav_pool', 'poolwater' end end end elseif pcs_agil >= 45 and pcs_agil <= 70: 'You climb up to the top of the diving board and jump, but end up painfully bellyflopping into the water. You need to practice being more agile.' else 'You climb up to the top of the diving board and make a very elegant jump, sliding into the water without causing a single ripple.' end act 'Continue': gt 'pav_pool', 'poolwater' end act 'Sit with your feet in the water': gt 'pav_pool_events', 'feetwater' end end if $ARGS[0]= 'poolwater': minut += 1 $loc_arg = 'poolwater' $location_type = 'public_indoors' pcs_hairbsh = 0 cumspclnt = 10 gs 'cum_cleanup' gs 'stat' '
> src="images/locations/pavlovsk/community/swim/inwater.jpg">
' 'You are in the water. It feels very relaxing.' if hour >= 8 and hour < 10: 'The pool is almost empty this early in the morning, so you have it almost all to yourself.' elseif hour >= 10 and hour < 12: 'The pool mostly contains families with children and older people swimming.' elseif hour >= 12 and hour < 18: 'The pool is crowded with all kinds of people. It''s difficult to move around and exercising will be impossible.' elseif hour >= 18 and hour < 20: 'Not many visit the pool this late in the evening, with only a few adults in the water.' elseif hour >= 20 and hour < 21: 'It''s rather late and the pool will be closing soon. You are among the last people in the building, so you can enjoy the pool all to yourself.' end if hour >= 10 and hour < 18: 'It''s rather busy, but you can try to do a bit of swimming or dive for a bit of fun. You could also just try to relax at the edge of the pool or right here in the water.' else 'The pool is almost empty, so you''re free to do a bit of relaxed swimming, exercise with a more powerful swim or dive for a bit of fun. You could also just relax at the edge of the pool or right here in the water.' end if hour >= 8 and hour < 21: act 'Relaxed swim': gt 'pav_pool_events', 'relaxedswim' if hour < 12 or hour >= 18: act 'Exercise': gt 'pav_pool_events', 'exerciseswim' end act 'Dive': gt 'pav_pool_events', 'dive' act 'Relax at the edge of the pool': gt 'pav_pool_events', 'edgepool' act 'Relax in the water': gt 'pav_pool_events', 'relaxedwater' end act 'Exit pool': gt 'pav_pool', 'exitpool' end if $ARGS[0]= 'exitpool': minut += 1 $loc_arg = 'exitpool' gs 'stat' temp_rand = rand(1,15) if temp_rand <= 4 and PCloOnePiece = 0 and hour >= 10 and hour < 18: '
> src="images/locations/pavlovsk/community/swim/exitloosebra.jpg">
' 'As you exit the pool, you don''t notice that your top has loosened and your breasts are almost on full display for all to see.' act 'Continue': *clr & cla '
> src="images/locations/pavlovsk/community/swim/losttop.jpg">
' 'You finally notice when your top falls off and your breasts are fully exposed. You cover them as best as you can, but a group of boys have already seen you and seem to be enjoying the show.' '"Oh, come on! We already saw them, let us see some more!"' 'You pick up your bikini top, trying not to show anything else and run towards the locker rooms to put it back on.' pcs_mood -= 5 act 'Continue': gt 'pav_pool', 'lockerfemale' end elseif temp_rand = 5 and PCloOnePiece = 0 and hour >= 10 and hour < 18: '
> src="images/locations/pavlovsk/community/swim/exitloosebra.jpg">
' 'As you exit the pool, you don''t notice that your bikini top has loosened and your breasts are almost on full display for all to see.' act 'Continue': *clr & cla '
> src="images/locations/pavlovsk/community/swim/bratkid.jpg">
' 'You finally notice when your top falls off and your breasts are completely exposed. You cover them as best as you can and turn around to look for your top just in time to see a boy pick it up with a devious smile.' '"If you want it back, come and get it!" He then jumps in the water and swims off.' act 'Run to the locker room': cla 'Blushing in embarrassment, you run to the locker room. Once there you strip naked. You can get rid of this bottom since it''s useless now.' dynamic $clothingworntype + '[<>] = 0' gs 'clothing', 'strip' act 'Continue': gt 'pav_pool', 'lockerfemale' end act 'Jump into the water after him': pav_swimpool['boystole'] = 1 pav_swimpool['toplost'] = 1 *clr & cla '
> src="images/locations/pavlovsk/community/swim/losttop.jpg">
' 'You jump bravely into the water after him. He swims off towards the other side of the pool and you attempt to follow, but the pool is full and many notice your lewdness. You suddenly realize, stop and cover yourself as a number of people stare at you.' 'You could try to reach the edge of the pool, but you would have to get very close to other people. You could also wait and hope that the pool empties a little without calling attention to yourself.' act 'Wait': gt 'pav_pool_events', 'watertoplost' act 'Try to reach the edge': gt 'pav_pool_events', 'tryreachedgenotop' end end else '
> src="images/locations/pavlovsk/community/swim/ladder<>.jpg">
' 'You climb out of the pool.' act 'Continue': gt 'pav_pool', 'pool' end end --- pav_pool ---------------------------------