duplicate_media_files.txt

@@ -0,0 +1,2143 @@
+   2 equal files of size 3965879
+   /images/shared/prostitution/car/normal/sex/cum/abelly_10.mp4
+   /images/shared/prostitution/car/normal/sex/cum/pbelly_10.mp4
+
+   2 equal files of size 2199156
+   /images/shared/prostitution/car/normal/sex/anal/anal_17.mp4
+   /images/shared/prostitution/car/regular/sex/main_anal2.mp4
+
+   2 equal files of size 1920167
+   /images/locations/city/citycenter/photo/lingerie/2.mp4
+   /images/locations/city/citycenter/photo/lingerie2.mp4
+
+   2 equal files of size 1880659
+   /images/locations/city/citycenter/photo/bikini/4.mp4
+   /images/locations/city/citycenter/photo/bikini2.mp4
+
+   2 equal files of size 1762882
+   /images/locations/city/citycenter/photo/fame/fametopless1.mp4
+   /images/locations/city/citycenter/photo/fametopless1.mp4
+
+   2 equal files of size 1695915
+   /images/locations/city/citycenter/photo/special/basketball.mp4
+   /images/locations/city/citycenter/photo/basketball.mp4
+
+   2 equal files of size 1614645
+   /images/locations/city/citycenter/photo/bikini/1.mp4
+   /images/locations/city/citycenter/photo/bikini3.mp4
+
+   2 equal files of size 1412968
+   /images/locations/city/citycenter/photo/skill/skill_beach.mp4
+   /images/locations/city/citycenter/photo/skill_beach.mp4
+
+   2 equal files of size 1304186
+   /images/shared/prostitution/car/normal/sex/anal/anal_19.mp4
+   /images/shared/prostitution/car/regular/sex/main_anal4.mp4
+
+   2 equal files of size 1260905
+   /images/characters/pavlovsk/school/boy/igor/sex/home/trahaet2.mp4
+   /images/characters/pavlovsk/school/boy/igor/sex/home/trahaet_2.mp4
+
+   2 equal files of size 1260370
+   /images/shared/sex/shower/doggy_enter1.mp4
+   /images/shared/sex/shower/enter.mp4
+
+   2 equal files of size 1237419
+   /images/locations/city/citycenter/photo/fame/fametopless3.mp4
+   /images/locations/city/citycenter/photo/fametopless3.mp4
+
+   2 equal files of size 1060169
+   /images/locations/city/citycenter/photo/fashion/2.mp4
+   /images/locations/city/citycenter/photo/fashion2.mp4
+
+   2 equal files of size 1039135
+   /images/locations/city/citycenter/photo/fame/tennis.mp4
+   /images/locations/city/citycenter/photo/fame_tennis.mp4
+
+   3 equal files of size 1002214
+   /images/locations/city/citycenter/photo/skill/runway/1.mp4
+   /images/locations/city/citycenter/photo/skill/skill_runway.mp4
+   /images/locations/city/citycenter/photo/skill_runway.mp4
+
+   2 equal files of size 998910
+   /images/locations/city/citycenter/photo/bikini/5.mp4
+   /images/locations/city/citycenter/photo/bikini.mp4
+
+   2 equal files of size 997280
+   /images/locations/city/citycenter/photo/fame/fametopless2.mp4
+   /images/locations/city/citycenter/photo/fametopless2.mp4
+
+   2 equal files of size 939811
+   /images/shared/sex/cum/mouth/spit3.mp4
+   /images/shared/sex/cum/spit3.mp4
+
+   2 equal files of size 829627
+   /images/locations/city/citycenter/photo/fame/pool.mp4
+   /images/locations/city/citycenter/photo/fame_pool.mp4
+
+   2 equal files of size 777447
+   /images/locations/city/citycenter/photo/fame/fametopless4.mp4
+   /images/locations/city/citycenter/photo/fametopless4.mp4
+
+   2 equal files of size 763982
+   /images/locations/shared/brothel/tiedonbackfuckvaginal.mp4
+   /images/locations/shared/brothel/tied_vaginal.mp4
+
+   2 equal files of size 711573
+   /images/shared/sex/misc/undress1.mp4
+   /images/shared/sex/undress/undress1.mp4
+
+   2 equal files of size 668416
+   /images/characters/pavlovsk/school/boy/igor/sex/home/trahaet3.mp4
+   /images/characters/pavlovsk/school/boy/igor/sex/home/trahaet_3.mp4
+
+   2 equal files of size 620688
+   /images/locations/city/citycenter/photo/fame/fametopless5.mp4
+   /images/locations/city/citycenter/photo/fametopless5.mp4
+
+   2 equal files of size 617129
+   /images/locations/city/citycenter/photo/skill/skill_pool.mp4
+   /images/locations/city/citycenter/photo/skill_pool.mp4
+
+   3 equal files of size 583286
+   /images/locations/city/citycenter/photo/special/wet/wet.mp4
+   /images/locations/city/citycenter/photo/special/wet.mp4
+   /images/locations/city/citycenter/photo/wet.mp4
+
+   2 equal files of size 550835
+   /images/locations/pavlovsk/school/grounds/track/MA-010.png
+   /images/pc/activities/track/MA-010.png
+
+   2 equal files of size 517123
+   /images/shared/romance/misc/wakeup_shock2.mp4
+   /images/shared/sex/after/wakeup_shock2.mp4
+
+   2 equal files of size 516927
+   /images/locations/city/citycenter/photo/fame/outdoors1.mp4
+   /images/locations/city/citycenter/photo/fame_outdoors.mp4
+
+   2 equal files of size 492786
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall3.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock3.mp4
+
+   2 equal files of size 485588
+   /images/locations/shared/brothel/tiedonbackfistanal.mp4
+   /images/locations/shared/brothel/tied_analfisting.mp4
+
+   2 equal files of size 467370
+   /images/locations/shared/brothel/tiedonbackfuckanal.mp4
+   /images/locations/shared/brothel/tied_anal.mp4
+
+   2 equal files of size 455129
+   /images/locations/city/citycenter/photo/skill/skill_topless.mp4
+   /images/locations/city/citycenter/photo/skill_topless.mp4
+
+   2 equal files of size 446317
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall2.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock2.mp4
+
+   2 equal files of size 442513
+   /images/shared/romance/misc/wakeup_shock1.mp4
+   /images/shared/sex/after/wakeup_shock1.mp4
+
+   2 equal files of size 430261
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall7.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock7.mp4
+
+   2 equal files of size 383652
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall4.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock1.mp4
+
+   2 equal files of size 345769
+   /images/shared/prostitution/car/normal/sex/anal/anal_16.mp4
+   /images/shared/prostitution/car/regular/sex/main_anal1.mp4
+
+   2 equal files of size 317583
+   /images/shared/romance/misc/wakeup_shock3.mp4
+   /images/shared/sex/after/wakeup_shock3.mp4
+
+   2 equal files of size 296109
+   /images/locations/city/citycenter/mall/salon/work/sex/creampie2.mp4
+   /images/shared/sex/cum/cum7.mp4
+
+   3 equal files of size 273081
+   /images/locations/shared/brothel/tiedonbackvibropussy.mp4
+   /images/locations/shared/brothel/tied_bibrate.mp4
+   /images/locations/shared/brothel/tied_vibrate.mp4
+
+   2 equal files of size 259833
+   /images/shared/prostitution/car/normal/sex/anal/anal_15.mp4
+   /images/shared/prostitution/car/regular/sex/main_anal0.mp4
+
+   2 equal files of size 240406
+   /images/shared/home/bathroom/shower_bath_dildo.mp4
+   /images/shared/home/bathroom/shower_bath_dildo2.mp4
+
+   2 equal files of size 230670
+   /images/shared/sex/cum/mouth/spit2.mp4
+   /images/shared/sex/cum/spit2.mp4
+
+   2 equal files of size 202334
+   /images/locations/pavlovsk/school/grounds/track/FE-016.jpg
+   /images/pc/activities/track/FE-016.jpg
+
+   2 equal files of size 201702
+   /images/shared/prostitution/car/normal/sex/anal/anal_18.mp4
+   /images/shared/prostitution/car/regular/sex/main_anal3.mp4
+
+   2 equal files of size 199851
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall5.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock5.mp4
+
+   2 equal files of size 197714
+   /images/locations/shared/brothel/tiedonbackwhippussy.mp4
+   /images/locations/shared/brothel/tied_whip.mp4
+
+   2 equal files of size 195289
+   /images/locations/shared/brothel/tiedonbackfuckmouth.mp4
+   /images/locations/shared/brothel/tied_mouth.mp4
+
+   2 equal files of size 188921
+   /images/locations/pavlovsk/resident/apartment/events/sex/evbgsex.jpg
+   /images/locations/pavlovsk/resident/apartment/events/evbgsex.jpg
+
+   2 equal files of size 182518
+   /images/pc/activities/photography/foto/locations/9.jpg
+   /images/pc/activities/photography/foto/pav_school.jpg
+
+   2 equal files of size 173232
+   /images/locations/shared/brothel/tiedonbacktease.mp4
+   /images/locations/shared/brothel/tied_tease.mp4
+
+   2 equal files of size 168857
+   /images/characters/pavlovsk/resident/mom/pavrun1.jpg
+   /images/characters/pavlovsk/resident/mom/pavyoga1.jpg
+
+   2 equal files of size 157938
+   /images/locations/shared/street/sharkdress.mp4
+   /images/locations/shared/street/sharkdress1.mp4
+
+   2 equal files of size 157765
+   /images/locations/pavlovsk/school/bathroom/sex/mastrubate.mp4
+   /images/locations/pavlovsk/school/bathroom/sex/masturbate1.mp4
+
+   2 equal files of size 150087
+   /images/locations/pavlovsk/school/grounds/track/AP-003.jpg
+   /images/pc/activities/track/AP-003.jpg
+
+   2 equal files of size 144239
+   /images/locations/pavlovsk/school/grounds/track/OC-001.jpg
+   /images/pc/activities/track/OC-001.jpg
+
+   2 equal files of size 132587
+   /images/pc/activities/photography/foto/locations/4.jpg
+   /images/pc/activities/photography/foto/gadukino.jpg
+
+   2 equal files of size 128067
+   /images/pc/activities/photography/foto/people/4.jpg
+   /images/pc/activities/photography/foto/sonia.jpg
+
+   2 equal files of size 123417
+   /images/locations/pavlovsk/school/grounds/track/MA-009.jpg
+   /images/pc/activities/track/MA-009.jpg
+
+   2 equal files of size 123165
+   /images/locations/pavlovsk/school/grounds/track/MA-012.jpg
+   /images/pc/activities/track/MA-012.jpg
+
+   2 equal files of size 120840
+   /images/pc/activities/photography/foto/locations/10.jpg
+   /images/pc/activities/photography/foto/pav_park.jpg
+
+   2 equal files of size 120611
+   /images/locations/pavlovsk/school/grounds/track/PR-005.jpg
+   /images/pc/activities/track/PR-005.jpg
+
+   2 equal files of size 120462
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-003.jpg
+   /images/pc/activities/track/SXFU-003.jpg
+
+   2 equal files of size 116571
+   /images/locations/pavlovsk/resident/apartment/shulginhome/smroom/event/miss2.mp4
+   /images/locations/pavlovsk/resident/apartment/shulginhome/smroom/event/miss3.mp4
+
+   2 equal files of size 116184
+   /images/locations/city/citycenter/photo/nude/2.jpg
+   /images/locations/city/citycenter/photo/nude29.jpg
+
+   2 equal files of size 115073
+   /images/pc/activities/photography/foto/locations/5.jpg
+   /images/pc/activities/photography/foto/dachi.jpg
+
+   2 equal files of size 113262
+   /images/locations/pavlovsk/school/grounds/track/MA-003.jpeg
+   /images/pc/activities/track/MA-003.jpeg
+
+   2 equal files of size 109359
+   /images/locations/city/citycenter/photo/topnude/14.jpg
+   /images/locations/city/citycenter/photo/nude21.jpg
+
+   2 equal files of size 108986
+   /images/locations/city/residential/apartment/home/sex/balcony_anal2.mp4
+   /images/locations/city/residential/apartment/sex/balcony_anal2.mp4
+
+   2 equal files of size 108402
+   /images/locations/pavlovsk/community/guitarlesson/glessonad.jpg
+   /images/locations/shared/noticeboards/pav/flyer_music_guitar.jpg
+
+   2 equal files of size 107890
+   /images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_18.jpg
+   /images/locations/pavlovsk/lake/secluded_beach/voyeurism/voyeurism_start_event_4.jpg
+
+   2 equal files of size 107465
+   /images/locations/city/citycenter/photo/adverts/advert2.jpg
+   /images/locations/city/citycenter/photo/advert2.jpg
+
+   2 equal files of size 106529
+   /images/pc/activities/photography/foto/locations/7.jpg
+   /images/pc/activities/photography/foto/pav_complex.jpg
+
+   2 equal files of size 105474
+   /images/locations/gadukino/forest/gadforestlost_winter0.2.jpg
+   /images/locations/gadukino/forest/gadforest_winter3.jpg
+
+   2 equal files of size 105150
+   /images/locations/pavlovsk/school/grounds/track/MA-011.jpg
+   /images/pc/activities/track/MA-011.jpg
+
+   2 equal files of size 102213
+   /images/locations/pavlovsk/school/grounds/track/PR-003.jpg
+   /images/pc/activities/track/PR-003.jpg
+
+   2 equal files of size 100161
+   /images/locations/pavlovsk/school/grounds/track/AP-013.jpg
+   /images/pc/activities/track/AP-013.jpg
+
+   2 equal files of size 98624
+   /images/locations/gadukino/sex/mitka/mitkaforestsexccowkiss1_2.jpg
+   /images/locations/gadukino/sex/mitka/mitkaforestsex_owKiss1_2.jpg
+
+   2 equal files of size 98473
+   /images/locations/pavlovsk/school/grounds/track/DE-007.jpg
+   /images/pc/activities/track/DE-007.jpg
+
+   2 equal files of size 98224
+   /images/locations/gadukino/sex/mitka/mitkaforestsexccoworal1_1.jpg
+   /images/locations/gadukino/sex/mitka/mitkaforestsex_owOral1_1.jpg
+
+   2 equal files of size 97615
+   /images/characters/pavlovsk/school/girl/natasha/study.jpg
+   /images/locations/pavlovsk/resident/apartment/natbelapt/study.jpg
+
+   2 equal files of size 96749
+   /images/locations/city/citycenter/photo/special/runway_waiting.mp4
+   /images/locations/city/citycenter/photo/runway_waiting.mp4
+
+   2 equal files of size 93764
+   /images/characters/pavlovsk/school/girl/albina/sex/prostitute/d1.jpg
+   /images/characters/pavlovsk/school/girl/albina/sex/prostitute/threesome1.jpg
+
+   2 equal files of size 93249
+   /images/locations/city/residential/apartment/home/kuhr.jpg
+   /images/locations/city/residential/apartment/kuhr.jpg
+
+   2 equal files of size 93098
+   /images/pc/activities/photography/foto/locations/6.jpg
+   /images/pc/activities/photography/foto/gadforest.jpg
+
+   2 equal files of size 92794
+   /images/locations/city/citycenter/photo/portraits/katherine_a/7.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/7.jpg
+
+   2 equal files of size 92096
+   /images/locations/pavlovsk/school/grounds/track/PR-008.jpg
+   /images/pc/activities/track/PR-008.jpg
+
+   2 equal files of size 90908
+   /images/locations/gadukino/sex/mitka/mitkaforestsexccowkiss1_1.jpg
+   /images/locations/gadukino/sex/mitka/mitkaforestsex_owKiss1_1.jpg
+
+   2 equal files of size 90908
+   /images/locations/pavlovsk/school/gym/locker/palpeek.jpg
+   /images/locations/pavlovsk/school/gym/palpeek.jpg
+
+   2 equal files of size 90204
+   /images/pc/activities/photography/foto/locations/1.jpg
+   /images/pc/activities/photography/foto/city_library.jpg
+
+   2 equal files of size 89369
+   /images/locations/gadukino/sex/mitka/mitkaforestsexccow1_2.1.jpg
+   /images/locations/gadukino/sex/mitka/mitkaforestsex_ow1_2.1.jpg
+
+   2 equal files of size 89013
+   /images/locations/gadukino/sex/mitka/mitkaforestsexccoworalcuml1_1.jpg
+   /images/locations/gadukino/sex/mitka/mitkaforestsex_owOralCuml1_1.jpg
+
+   2 equal files of size 88182
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-005.jpg
+   /images/pc/activities/track/SXFU-005.jpg
+
+   2 equal files of size 88096
+   /images/pc/activities/photography/foto/locations/8.jpg
+   /images/pc/activities/photography/foto/pav_train.jpg
+
+   2 equal files of size 88048
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rape2.jpg
+   /images/shared/sex/rape/park_rape2.jpg
+
+   2 equal files of size 87418
+   /images/characters/pavlovsk/school/girl/natasha/bedtalk.jpg
+   /images/locations/pavlovsk/resident/apartment/natbelapt/bedtalk.jpg
+
+   2 equal files of size 86800
+   /images/locations/pavlovsk/school/grounds/track/FE-020.jpg
+   /images/pc/activities/track/FE-020.jpg
+
+   2 equal files of size 86714
+   /images/characters/city/anatoly/sex/bossbjcum3.jpg
+   /images/locations/city/anatoly/sex/bossbjcum3.jpg
+
+   2 equal files of size 86368
+   /images/locations/city/residential/apartment/home/kuhr2.jpg
+   /images/locations/city/residential/apartment/kuhr2.jpg
+
+   2 equal files of size 85071
+   /images/characters/city/anatoly/sex/bossbjcum6.jpg
+   /images/locations/city/anatoly/sex/bossbjcum6.jpg
+
+   2 equal files of size 84865
+   /images/pc/activities/photography/foto/locations/12.jpg
+   /images/pc/activities/photography/foto/pav_church.jpg
+
+   2 equal files of size 84836
+   /images/locations/pavlovsk/school/grounds/track/PR-007.jpg
+   /images/pc/activities/track/PR-007.jpg
+
+   2 equal files of size 84595
+   /images/shared/sex/vag/miss/blood1.jpg
+   /images/shared/sex/vag/miss/virgin1.jpg
+
+   2 equal files of size 83055
+   /images/locations/city/citycenter/nichApartment/messy-room.jpg
+   /images/locations/city/citycenter/nichApartment/tanyaDirty3.jpg
+
+   2 equal files of size 82884
+   /images/locations/city/citycenter/photo/topnude/4.jpg
+   /images/locations/city/citycenter/photo/nude9.jpg
+
+   2 equal files of size 80067
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rapecum2.jpg
+   /images/shared/sex/rape/park_rapecum2.jpg
+
+   2 equal files of size 79848
+   /images/locations/shared/train/electri.jpg
+   /images/locations/shared/train/electri_1.jpg
+
+   2 equal files of size 78969
+   /images/shared/sex/vag/cowgirl/blood1.jpg
+   /images/shared/sex/vag/cowgirl/virgin1.jpg
+
+   2 equal files of size 78740
+   /images/locations/pavlovsk/school/grounds/track/MA-006.jpg
+   /images/pc/activities/track/MA-006.jpg
+
+   2 equal files of size 78124
+   /images/locations/pavlovsk/school/grounds/track/MA-002.jpg
+   /images/pc/activities/track/MA-002.jpg
+
+   2 equal files of size 77958
+   /images/characters/city/anatoly/sex/bossbjcum5.jpg
+   /images/locations/city/anatoly/sex/bossbjcum5.jpg
+
+   2 equal files of size 76969
+   /images/locations/pavlovsk/resident/dimkahome/newyear/tusa3.jpg
+   /images/locations/pavlovsk/school/events/newyear/tusa3.jpg
+
+   2 equal files of size 76837
+   /images/locations/pavlovsk/school/grounds/track/FE-018.jpg
+   /images/pc/activities/track/FE-018.jpg
+
+   2 equal files of size 76422
+   /images/locations/city/residential/apartment/home/bedr2.jpg
+   /images/locations/city/residential/apartment/bedr2.jpg
+
+   2 equal files of size 76366
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rape4.jpg
+   /images/shared/sex/rape/park_rape4.jpg
+
+   3 equal files of size 76326
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-001.jpg
+   /images/locations/pavlovsk/school/grounds/track/OR-001.jpg
+   /images/pc/activities/track/OR-001.jpg
+
+   2 equal files of size 76198
+   /images/locations/pavlovsk/school/grounds/track/DE-006.jpg
+   /images/pc/activities/track/DE-006.jpg
+
+   3 equal files of size 76181
+   /images/locations/city/citycenter/photo/nude/1.jpg
+   /images/locations/city/citycenter/photo/nude.jpg
+   /images/locations/city/citycenter/photo/nude17.jpg
+
+   2 equal files of size 75721
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream3.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream3.jpg
+
+   2 equal files of size 75588
+   /images/locations/city/citycenter/mall/salon/work/sex/creampie1.mp4
+   /images/shared/sex/cum/cum8.mp4
+
+   2 equal files of size 74290
+   /images/locations/city/residential/apartment/stairs/event/sex/floor5_bj.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor5_bj.jpg
+
+   2 equal files of size 74231
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rape1.jpg
+   /images/shared/sex/rape/park_rape1.jpg
+
+   2 equal files of size 74115
+   /images/locations/city/industrial/red_light_district.jpg
+   /images/locations/city/redlight/redlight.jpg
+
+   2 equal files of size 73980
+   /images/locations/pavlovsk/school/grounds/track/KNO-01.jpg
+   /images/pc/activities/track/KNO-01.jpg
+
+   2 equal files of size 73240
+   /images/pc/activities/photography/foto/locations/11.jpg
+   /images/pc/activities/photography/foto/pav_lake.jpg
+
+   2 equal files of size 73237
+   /images/locations/city/residential/apartment/stairs/event/sex/floor2_bj.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor2_bj.jpg
+
+   2 equal files of size 73202
+   /images/locations/shared/sex/sexdvanadva/New folder/minet14.jpg
+   /images/locations/shared/sex/sexdvanadva/minet14.jpg
+
+   2 equal files of size 73118
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream4.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream4.jpg
+
+   2 equal files of size 72961
+   /images/pc/activities/phone/selfies/beach/nude/16.jpg
+   /images/pc/activities/phone/selfies/beach/nude/9.jpg
+
+   2 equal files of size 72798
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet18.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet18.jpg
+
+   2 equal files of size 72665
+   /images/locations/pavlovsk/school/grounds/track/AP-001.jpg
+   /images/pc/activities/track/AP-001.jpg
+
+   2 equal files of size 72202
+   /images/locations/pavlovsk/school/grounds/track/DE-005.jpg
+   /images/pc/activities/track/DE-005.jpg
+
+   2 equal files of size 71451
+   /images/locations/pavlovsk/school/grounds/track/OC-002.jpg
+   /images/pc/activities/track/OC-002.jpg
+
+   2 equal files of size 71168
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rape5.jpg
+   /images/shared/sex/rape/park_rape5.jpg
+
+   2 equal files of size 70892
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream2.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream2.jpg
+
+   2 equal files of size 70170
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-M01.mp4
+   /images/pc/activities/track/SXFU-M01.mp4
+
+   2 equal files of size 70111
+   /images/locations/pavlovsk/school/grounds/track/punishment/SP-003.jpg
+   /images/pc/activities/track/SP-003.jpg
+
+   2 equal files of size 69698
+   /images/locations/pavlovsk/school/grounds/track/FE-014.jpg
+   /images/pc/activities/track/FE-014.jpg
+
+   2 equal files of size 69508
+   /images/locations/pavlovsk/school/grounds/track/PR-009.jpg
+   /images/pc/activities/track/PR-009.jpg
+
+   2 equal files of size 69030
+   /images/locations/city/residential/lake/sex/anfisa/anuli4.jpg
+   /images/locations/city/residential/lake/sex/anfisa/kuni1.jpg
+
+   2 equal files of size 68953
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream1.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream1.jpg
+
+   2 equal files of size 68386
+   /images/locations/city/residential/apartment/home/sitr2.jpg
+   /images/locations/city/residential/apartment/sitr2.jpg
+
+   2 equal files of size 68357
+   /images/locations/pavlovsk/factory/gshveyfab.jpg
+   /images/locations/pavlovsk/factory/pav_factory.jpg
+
+   2 equal files of size 68125
+   /images/locations/pavlovsk/school/grounds/track/sex/FE-011.jpg
+   /images/pc/activities/track/FE-011.jpg
+
+   2 equal files of size 68073
+   /images/characters/pavlovsk/school/boy/niko/kikoev2/dinner/6/vag2.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikoev2/diner/5/Vag2.jpg
+
+   2 equal files of size 68067
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift4.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift4.jpg
+
+   2 equal files of size 68011
+   /images/pc/activities/photography/foto/locations/13.jpg
+   /images/pc/activities/photography/foto/graveyard.jpg
+
+   2 equal files of size 67939
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift3.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift3.jpg
+
+   2 equal files of size 67901
+   /images/locations/city/citycenter/photo/seethru/5.jpg
+   /images/locations/city/citycenter/photo/seethru5.jpg
+
+   2 equal files of size 67742
+   /images/locations/pavlovsk/school/gym/locker/change.jpg
+   /images/locations/pavlovsk/school/gym/change.jpg
+
+   2 equal files of size 67627
+   /images/locations/pavlovsk/school/grounds/track/PR-006.jpg
+   /images/pc/activities/track/PR-006.jpg
+
+   2 equal files of size 67571
+   /images/locations/pavlovsk/resident/apartment/events/sex/evbj1.jpg
+   /images/locations/pavlovsk/resident/apartment/events/evbj.jpg
+
+   2 equal files of size 67279
+   /images/locations/pavlovsk/school/grounds/track/DE-002.jpg
+   /images/pc/activities/track/DE-002.jpg
+
+   2 equal files of size 67143
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/cum4.jpg
+   /images/pc/body/cum/cumface/brown/8.jpg
+
+   2 equal files of size 67067
+   /images/locations/city/residential/apartment/home/balcony_naked3.jpg
+   /images/locations/city/residential/apartment/balcony_naked3.jpg
+
+   2 equal files of size 66945
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rapecum1.jpg
+   /images/shared/sex/rape/park_rapecum1.jpg
+
+   2 equal files of size 66932
+   /images/characters/city/anatoly/sex/bossbjcum4.jpg
+   /images/locations/city/anatoly/sex/bossbjcum4.jpg
+
+   2 equal files of size 66609
+   /images/locations/pavlovsk/resident/dimkahome/newyear/sex/pett2.jpg
+   /images/locations/pavlovsk/school/events/newyear/sex/pett2.jpg
+
+   2 equal files of size 66336
+   /images/locations/pavlovsk/school/grounds/track/PC-002.jpg
+   /images/pc/activities/track/PC-002.jpg
+
+   2 equal files of size 66108
+   /images/locations/pavlovsk/school/grounds/track/AP-005.jpg
+   /images/pc/activities/track/AP-005.jpg
+
+   2 equal files of size 65900
+   /images/locations/pavlovsk/park/hugging park 3.jpg
+   /images/locations/pavlovsk/park/hugging_park_3.jpg
+
+   2 equal files of size 65582
+   /images/locations/pavlovsk/school/gym/locker/peekdress2.jpg
+   /images/locations/pavlovsk/school/gym/peekdress2.jpg
+
+   2 equal files of size 65379
+   /images/locations/city/residential/apartment/home/bedr.jpg
+   /images/locations/city/residential/apartment/bedr.jpg
+
+   2 equal files of size 65138
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream5.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream5.jpg
+
+   2 equal files of size 64714
+   /images/locations/city/citycenter/photo/topnude/1.jpg
+   /images/locations/city/citycenter/photo/nude3.jpg
+
+   2 equal files of size 64647
+   /images/locations/gadukino/sex/mitka/mitkaforestsexccow1_2.2.jpg
+   /images/locations/gadukino/sex/mitka/mitkaforestsex_ow1_2.2.jpg
+
+   2 equal files of size 64458
+   /images/characters/pavlovsk/school/boy/artem/sex/park/rape3.jpg
+   /images/shared/sex/rape/park_rape3.jpg
+
+   2 equal files of size 64140
+   /images/locations/city/citycenter/photo/fashion/4.jpg
+   /images/locations/city/citycenter/photo/fashion4.jpg
+
+   2 equal files of size 64004
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/exhibition/denis.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/exhibition/Vasily.jpg
+
+   2 equal files of size 63675
+   /images/locations/pavlovsk/school/grounds/track/sex/FE-012.jpg
+   /images/pc/activities/track/FE-012.jpg
+
+   2 equal files of size 63497
+   /images/locations/city/citycenter/photo/nude/6.jpg
+   /images/locations/city/citycenter/photo/nude33.jpg
+
+   2 equal files of size 63027
+   /images/locations/city/residential/apartment/stairs/event/floor4_bottle.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor4_bottle.jpg
+
+   2 equal files of size 62846
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/hallway/soniaUpset.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikomisc/nikoev/school/hallway/soniaupset.jpg
+
+   2 equal files of size 62384
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift14.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift14.jpg
+
+   2 equal files of size 62282
+   /images/locations/pavlovsk/school/grounds/track/MA-005.jpg
+   /images/pc/activities/track/MA-005.jpg
+
+   2 equal files of size 62027
+   /images/locations/city/residential/apartment/home/balcony_naked1.jpg
+   /images/locations/city/residential/apartment/balcony_naked1.jpg
+
+   2 equal files of size 61917
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet15.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet15.jpg
+
+   2 equal files of size 61545
+   /images/locations/city/residential/apartment/home/kurit.jpg
+   /images/locations/city/residential/apartment/kurit.jpg
+
+   2 equal files of size 61304
+   /images/locations/pavlovsk/school/afterschool/sex/bscum2.jpg
+   /images/shared/sex/cum/mouth/cum50.jpg
+
+   2 equal files of size 61058
+   /images/locations/city/citycenter/photo/topless/2.jpg
+   /images/locations/city/citycenter/photo/topless2.jpg
+
+   2 equal files of size 60993
+   /images/locations/pavlovsk/school/grounds/track/CHR-02.jpg
+   /images/pc/activities/track/CHR-02.jpg
+
+   2 equal files of size 60672
+   /images/shared/home/bathroom/towel_wet.jpg
+   /images/shared/romance/lovers/misc/towel.jpg
+
+   2 equal files of size 60411
+   /images/locations/pavlovsk/resident/apartment/home/kuhrpar.jpg
+   /images/locations/pavlovsk/resident/apartment/ludahome/kitchen.jpg
+
+   2 equal files of size 60208
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream6.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream6.jpg
+
+   2 equal files of size 59544
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet11.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet11.jpg
+
+   2 equal files of size 59445
+   /images/locations/city/residential/apartment/stairs/event/sex/floor4_bj.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor4_bj.jpg
+
+   2 equal files of size 58801
+   /images/characters/pavlovsk/resident/reks/rex.jpg
+   /images/characters/shared/headshots_main/big57.jpg
+
+   2 equal files of size 58714
+   /images/locations/city/residential/apartment/stairs/event/sex/floor3_fuck.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor3_fuck.jpg
+
+   2 equal files of size 58625
+   /images/locations/gadukino/village/girl_cow_river.jpg
+   /images/locations/gadukino/village/graze_cow_river.jpg
+
+   3 equal files of size 58018
+   /images/pc/body/hairstyles/lng/curly-bangs-buns/hcol3.jpg
+   /images/pc/body/hairstyles/med/curly-bangs-buns/hcol3.jpg
+   /images/pc/body/hairstyles/medlo/curly-bangs-buns/hcol3.jpg
+
+   2 equal files of size 57523
+   /images/locations/pavlovsk/school/gym/locker/peekdress1.jpg
+   /images/locations/pavlovsk/school/gym/peekdress1.jpg
+
+   2 equal files of size 57179
+   /images/locations/city/citycenter/photo/adverts/advert4.jpg
+   /images/locations/city/citycenter/photo/advert4.jpg
+
+   2 equal files of size 57118
+   /images/locations/pavlovsk/school/classroom/literature/classlit.jpg
+   /images/locations/pavlovsk/school/classroom/classlit.jpg
+
+   2 equal files of size 57008
+   /images/characters/pavlovsk/pavlin/pavlin-bj.jpg
+   /images/characters/pavlovsk/pavlin/pavlin_bj.jpg
+
+   2 equal files of size 56989
+   /images/locations/pavlovsk/school/grounds/track/FE-019.jpg
+   /images/pc/activities/track/FE-019.jpg
+
+   2 equal files of size 56872
+   /images/characters/shared/headshots_main/big32.jpg
+   /images/locations/gadukino/grandparents/babushka.jpg
+
+   2 equal files of size 56849
+   /images/locations/city/citycenter/photo/tastenude/3.jpg
+   /images/locations/city/citycenter/photo/nude6.jpg
+
+   2 equal files of size 56601
+   /images/shared/food/fast_food.jpg
+   /images/shared/food/food.jpg
+
+   2 equal files of size 56535
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift11.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift11.jpg
+
+   2 equal files of size 56425
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-004.jpg
+   /images/pc/activities/track/OR-004.jpg
+
+   2 equal files of size 56395
+   /images/locations/pavlovsk/resident/apartment/events/sex/evanal.jpg
+   /images/locations/pavlovsk/resident/apartment/events/evanal.jpg
+
+   2 equal files of size 56066
+   /images/locations/pavlovsk/school/grounds/track/AP-009.jpg
+   /images/pc/activities/track/AP-009.jpg
+
+   2 equal files of size 55871
+   /images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/tv/cum9.jpg
+   /images/pc/body/cum/cumface/black/8.jpg
+
+   2 equal files of size 55709
+   /images/locations/city/citycenter/photo/sexy/3.jpg
+   /images/locations/city/citycenter/photo/ero4.jpg
+
+   2 equal files of size 55527
+   /images/locations/shared/sex/sexdvanadva/New folder/minet15.jpg
+   /images/locations/shared/sex/sexdvanadva/minet15.jpg
+
+   2 equal files of size 55490
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-002.jpg
+   /images/pc/activities/track/OR-002.jpg
+
+   2 equal files of size 55484
+   /images/locations/city/residential/apartment/stairs/event/sex/floor3_bj.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor3_bj.jpg
+
+   2 equal files of size 55450
+   /images/locations/city/citycenter/photo/tastenude/4.jpg
+   /images/locations/city/citycenter/photo/nude4.jpg
+
+   2 equal files of size 55221
+   /images/locations/pavlovsk/school/grounds/track/sex/FE-009.jpg
+   /images/pc/activities/track/FE-009.jpg
+
+   2 equal files of size 55146
+   /images/characters/pavlovsk/school/boy/niko/kikoev2/dinner/6/rear2.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikoev2/diner/6/anal2.jpg
+
+   2 equal files of size 54805
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift10.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift10.jpg
+
+   2 equal files of size 54660
+   /images/locations/pavlovsk/resident/dimkahome/newyear/alb.jpg
+   /images/locations/pavlovsk/school/events/newyear/alb.jpg
+
+   2 equal files of size 54459
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-002.jpg
+   /images/pc/activities/track/SXFU-002.jpg
+
+   2 equal files of size 54454
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift13.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift13.jpg
+
+   2 equal files of size 54359
+   /images/characters/pavlovsk/school/girl/albina/sex/prostitute/d.jpg
+   /images/characters/pavlovsk/school/girl/albina/sex/prostitute/threesome.jpg
+
+   2 equal files of size 54245
+   /images/locations/pavlovsk/school/grounds/track/FAM-003.jpg
+   /images/pc/activities/track/FAM-003.jpg
+
+   2 equal files of size 54186
+   /images/characters/pavlovsk/pavlin/pavlin-hj.jpg
+   /images/characters/pavlovsk/pavlin/pavlin_hj.jpg
+
+   2 equal files of size 54085
+   /images/pc/activities/photography/foto/people/5.jpg
+   /images/pc/activities/photography/foto/nush.jpg
+
+   2 equal files of size 54035
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet14.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet14.jpg
+
+   2 equal files of size 53971
+   /images/pc/activities/photography/foto/people/1.jpg
+   /images/pc/activities/photography/foto/mother.jpg
+
+   2 equal files of size 53713
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet7.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet7.jpg
+
+   2 equal files of size 53578
+   /images/locations/pavlovsk/school/grounds/track/FE-003.jpg
+   /images/pc/activities/track/FE-003.jpg
+
+   2 equal files of size 53509
+   /images/locations/pavlovsk/school/grounds/track/MA-013.jpg
+   /images/pc/activities/track/MA-013.jpg
+
+   2 equal files of size 53282
+   /images/locations/pavlovsk/park/sex/gop/bjbeerbeaten.jpg
+   /images/locations/pavlovsk/park/sex/gop/bjbeerbeaten1.jpg
+
+   2 equal files of size 53137
+   /images/locations/pavlovsk/school/grounds/track/PC-001.jpg
+   /images/pc/activities/track/PC-001.jpg
+
+   2 equal files of size 53002
+   /images/locations/pavlovsk/resident/dimkahome/newyear/tusa9.jpg
+   /images/locations/pavlovsk/school/events/newyear/tusa9.jpg
+
+   2 equal files of size 52934
+   /images/characters/pavlovsk/school/girl/natasha/sex/seethrough01.jpg
+   /images/characters/pavlovsk/school/girl/natasha/seethrough01.jpg
+
+   2 equal files of size 52712
+   /images/locations/pavlovsk/school/grounds/track/DE-001.jpg
+   /images/pc/activities/track/DE-001.jpg
+
+   2 equal files of size 52684
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift9.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift9.jpg
+
+   2 equal files of size 52338
+   /images/locations/pavlovsk/school/grounds/track/DE-008.jpg
+   /images/pc/activities/track/DE-008.jpg
+
+   2 equal files of size 52332
+   /images/locations/pavlovsk/school/grounds/track/punishment/SP-004.jpg
+   /images/pc/activities/track/SP-004.jpg
+
+   2 equal files of size 52326
+   /images/characters/city/anatoly/sex/bossbj14.jpg
+   /images/locations/city/anatoly/sex/bossbj14.jpg
+
+   2 equal files of size 52302
+   /images/locations/city/residential/apartment/home/balcony_naked2.jpg
+   /images/locations/city/residential/apartment/balcony_naked2.jpg
+
+   2 equal files of size 51505
+   /images/locations/pavlovsk/school/grounds/track/DE-003.jpg
+   /images/pc/activities/track/DE-003.jpg
+
+   2 equal files of size 51424
+   /images/locations/pavlovsk/school/grounds/track/punishment/SP-002.jpg
+   /images/pc/activities/track/SP-002.jpg
+
+   2 equal files of size 51375
+   /images/locations/city/residential/apartment/stairs/event/floor5_couple.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor5_couple.jpg
+
+   2 equal files of size 51344
+   /images/characters/pavlovsk/school/boy/niko/kikoev2/dinner/6/vag1.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikoev2/diner/5/Vag1.jpg
+
+   2 equal files of size 50697
+   /images/pc/body/pussy/hair/green.jpg
+   /images/pc/body/pussy/hair/green_full.jpg
+
+   2 equal files of size 50594
+   /images/characters/pavlovsk/resident/arthur/sex/cocksuckercum.jpg
+   /images/locations/city/residential/office/sex/guard/bjcum4.jpg
+
+   2 equal files of size 50577
+   /images/locations/pavlovsk/school/grounds/track/MA-008.jpg
+   /images/pc/activities/track/MA-008.jpg
+
+   2 equal files of size 49459
+   /images/locations/city/citycenter/photo/topless/14.jpg
+   /images/locations/city/citycenter/photo/topless14.jpg
+
+   2 equal files of size 49458
+   /images/locations/city/citycenter/photo/special/art1.jpg
+   /images/locations/city/citycenter/photo/art1.jpg
+
+   2 equal files of size 49378
+   /images/locations/pavlovsk/school/grounds/track/DE-004.jpg
+   /images/pc/activities/track/DE-004.jpg
+
+   2 equal files of size 49344
+   /images/locations/city/residential/apartment/home/vanr.jpg
+   /images/locations/city/residential/apartment/vanr.jpg
+
+   2 equal files of size 49026
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-008.jpg
+   /images/pc/activities/track/OR-008.jpg
+
+   2 equal files of size 48958
+   /images/locations/pavlovsk/school/grounds/track/sex/FE-010.jpg
+   /images/pc/activities/track/FE-010.jpg
+
+   2 equal files of size 48939
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-016.jpg
+   /images/pc/activities/track/MA-016.jpg
+
+   2 equal files of size 48436
+   /images/characters/pavlovsk/school/boy/niko/nikomisc/meynold/vicky/vickySmile.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikomisc/meynold/vicky/vickysmile1.jpg
+
+   2 equal files of size 48227
+   /images/characters/shared/headshots_main/big31.jpg
+   /images/locations/gadukino/grandparents/grandpa1.jpg
+
+   2 equal files of size 47983
+   /images/locations/city/citycenter/photo/portraits/katherine_a/2.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/2.jpg
+
+   2 equal files of size 47977
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_8.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_13.jpg
+
+   2 equal files of size 47964
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-004.jpg
+   /images/pc/activities/track/SXFU-004.jpg
+
+   2 equal files of size 47785
+   /images/locations/city/citycenter/photo/bnude/4.jpg
+   /images/locations/city/citycenter/photo/nude38.jpg
+
+   2 equal files of size 47757
+   /images/locations/city/citycenter/photo/topless/12.jpg
+   /images/locations/city/citycenter/photo/topless12.jpg
+
+   2 equal files of size 47651
+   /images/pc/activities/photography/foto/people/3.jpg
+   /images/pc/activities/photography/foto/lazar.jpg
+
+   2 equal files of size 47601
+   /images/locations/pavlovsk/school/grounds/track/NI-003.jpg
+   /images/pc/activities/track/NI-003.jpg
+
+   2 equal files of size 47507
+   /images/locations/pavlovsk/school/grounds/track/FE-005.jpg
+   /images/pc/activities/track/FE-005.jpg
+
+   2 equal files of size 47427
+   /images/locations/pavlovsk/school/grounds/track/punishment/SP-001.jpg
+   /images/pc/activities/track/SP-001.jpg
+
+   2 equal files of size 47376
+   /images/locations/pavlovsk/school/grounds/track/FAM-002.jpg
+   /images/pc/activities/track/FAM-002.jpg
+
+   2 equal files of size 47318
+   /images/locations/pavlovsk/school/grounds/track/PR-004.jpg
+   /images/pc/activities/track/PR-004.jpg
+
+   2 equal files of size 46957
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream8.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream8.jpg
+
+   2 equal files of size 46890
+   /images/characters/pavlovsk/resident/serge/serge2.jpg
+   /images/characters/shared/headshots_main/big112.jpg
+
+   2 equal files of size 46809
+   /images/pc/body/cum/cumface/blonde/5.jpg
+   /images/shared/sex/cum/facial/facial0,6.jpg
+
+   2 equal files of size 46553
+   /images/locations/pavlovsk/school/lunch/peremena20.jpg
+   /images/locations/pavlovsk/school/lunch/peremena4.jpg
+
+   2 equal files of size 46396
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet20.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet20.jpg
+
+   2 equal files of size 46292
+   /images/locations/pavlovsk/school/lunch/peremena10.jpg
+   /images/locations/pavlovsk/school/lunch/peremena17.jpg
+
+   2 equal files of size 46141
+   /images/locations/pavlovsk/school/grounds/track/AP-012.jpg
+   /images/pc/activities/track/AP-012.jpg
+
+   2 equal files of size 46112
+   /images/locations/pavlovsk/resident/dimkahome/newyear/sex/cond.jpg
+   /images/locations/pavlovsk/school/events/newyear/sex/cond.jpg
+
+   2 equal files of size 46100
+   /images/locations/city/citycenter/photo/special/group.jpg
+   /images/locations/city/citycenter/photo/group.jpg
+
+   2 equal files of size 45918
+   /images/characters/shared/boyfriend/groped.jpg
+   /images/locations/shared/boyfriend/groped.jpg
+
+   2 equal files of size 45774
+   /images/locations/city/citycenter/photo/topnude/12.jpg
+   /images/locations/city/citycenter/photo/nude19.jpg
+
+   2 equal files of size 45708
+   /images/locations/city/citycenter/photo/topless/4.jpg
+   /images/locations/city/citycenter/photo/topless4.jpg
+
+   2 equal files of size 45312
+   /images/locations/pavlovsk/resident/apartment/events/sex/evbjn.jpg
+   /images/locations/pavlovsk/resident/apartment/events/evbjn.jpg
+
+   2 equal files of size 45289
+   /images/locations/city/citycenter/photo/topnude/10.jpg
+   /images/locations/city/citycenter/photo/nude15.jpg
+
+   2 equal files of size 45154
+   /images/locations/city/citycenter/photo/portraits/katherine_a/3.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/3.jpg
+
+   2 equal files of size 45074
+   /images/locations/city/residential/apartment/home/vanr2.jpg
+   /images/locations/shared/bathroom/vanr2.jpg
+
+   3 equal files of size 45020
+   /images/pc/body/hairstyles/lng/curly-bangs-buns/hcol2.jpg
+   /images/pc/body/hairstyles/med/curly-bangs-buns/hcol2.jpg
+   /images/pc/body/hairstyles/medlo/curly-bangs-buns/hcol2.jpg
+
+   2 equal files of size 44931
+   /images/locations/pavlovsk/resident/dimkahome/newyear/sex/pett.jpg
+   /images/locations/pavlovsk/school/events/newyear/sex/pett.jpg
+
+   2 equal files of size 44862
+   /images/characters/pavlovsk/school/girl/natasha/sex/seethrough03.jpg
+   /images/characters/pavlovsk/school/girl/natasha/seethrough03.jpg
+
+   2 equal files of size 44615
+   /images/locations/city/citycenter/photo/special/art3.jpg
+   /images/locations/city/citycenter/photo/art3.jpg
+
+   2 equal files of size 44611
+   /images/locations/pavlovsk/resident/dimkahome/newyear/tusa8.jpg
+   /images/locations/pavlovsk/school/events/newyear/tusa8.jpg
+
+   2 equal files of size 44490
+   /images/locations/city/citycenter/photo/adverts/advert3.jpg
+   /images/locations/city/citycenter/photo/advert3.jpg
+
+   2 equal files of size 44382
+   /images/locations/city/citycenter/photo/fashion/2.jpg
+   /images/locations/city/citycenter/photo/fashion2.jpg
+
+   2 equal files of size 44374
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-006.jpg
+   /images/pc/activities/track/SXFU-006.jpg
+
+   2 equal files of size 44369
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift5.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift5.jpg
+
+   2 equal files of size 44270
+   /images/locations/pavlovsk/school/grounds/track/sex/FE-008.jpg
+   /images/pc/activities/track/FE-008.jpg
+
+   2 equal files of size 44264
+   /images/locations/city/citycenter/photo/adverts/advert1.jpg
+   /images/locations/city/citycenter/photo/advert1.jpg
+
+   2 equal files of size 43839
+   /images/locations/pavlovsk/resident/dimkahome/newyear/tusa6.jpg
+   /images/locations/pavlovsk/school/events/newyear/tusa6.jpg
+
+   2 equal files of size 43625
+   /images/locations/city/citycenter/photo/tastenude/1.jpg
+   /images/locations/city/citycenter/photo/nude1.jpg
+
+   2 equal files of size 43520
+   /images/locations/pavlovsk/community/chess/kruchess.jpg
+   /images/locations/pavlovsk/community/kruchess.jpg
+
+   2 equal files of size 43516
+   /images/locations/pavlovsk/school/bathroom/caught.jpg
+   /images/locations/pavlovsk/school/bathroom/caught1.jpg
+
+   2 equal files of size 43465
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet2.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet2.jpg
+
+   2 equal files of size 43464
+   /images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/tv/cum10.jpg
+   /images/pc/body/cum/cumface/brown/10.jpg
+
+   2 equal files of size 43207
+   /images/locations/shared/sex/sexdvanadva/New folder/minet1.jpg
+   /images/locations/shared/sex/sexdvanadva/minet1.jpg
+
+   2 equal files of size 43134
+   /images/locations/pavlovsk/school/grounds/track/MA-014.jpg
+   /images/pc/activities/track/MA-014.jpg
+
+   2 equal files of size 43041
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet12.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet12.jpg
+
+   2 equal files of size 43021
+   /images/locations/pavlovsk/school/grounds/track/AP-010.jpg
+   /images/pc/activities/track/AP-010.jpg
+
+   2 equal files of size 42808
+   /images/locations/city/residential/apartment/home/balcony_dressed1.jpg
+   /images/locations/city/residential/apartment/balcony_dressed1.jpg
+
+   2 equal files of size 42770
+   /images/locations/city/citycenter/photo/topless/19.jpg
+   /images/locations/city/citycenter/photo/topless19.jpg
+
+   2 equal files of size 42722
+   /images/locations/pavlovsk/school/gym/locker/lenpeek.jpg
+   /images/locations/pavlovsk/school/gym/lenpeek.jpg
+
+   2 equal files of size 42668
+   /images/locations/shared/sex/sexdvanadva/New folder/minet0.jpg
+   /images/locations/shared/sex/sexdvanadva/minet0.jpg
+
+   2 equal files of size 42587
+   /images/locations/pavlovsk/school/grounds/track/FE-002.jpg
+   /images/pc/activities/track/FE-002.jpg
+
+   2 equal files of size 42569
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-001.jpg
+   /images/pc/activities/track/SXFU-001.jpg
+
+   2 equal files of size 42263
+   /images/locations/pavlovsk/school/lunch/peremena18.jpg
+   /images/locations/pavlovsk/school/lunch/peremena6.jpg
+
+   2 equal files of size 42253
+   /images/locations/city/citycenter/photo/seethru/2.jpg
+   /images/locations/city/citycenter/photo/seethru2.jpg
+
+   2 equal files of size 42137
+   /images/locations/pavlovsk/resident/dimkahome/newyear/tit.jpg
+   /images/locations/pavlovsk/school/events/newyear/tit.jpg
+
+   2 equal files of size 42135
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet9.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet9.jpg
+
+   2 equal files of size 42101
+   /images/locations/city/citycenter/photo/seethru/1.jpg
+   /images/locations/city/citycenter/photo/seethru1.jpg
+
+   2 equal files of size 41967
+   /images/locations/pavlovsk/resident/dimkahome/newyear/sex/kat.jpg
+   /images/locations/pavlovsk/school/events/newyear/sex/kat.jpg
+
+   2 equal files of size 41857
+   /images/locations/city/citycenter/photo/portraits/katherine_a/5.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/5.jpg
+
+   2 equal files of size 41753
+   /images/pc/activities/phone/selfies/beach/nude/20.jpg
+   /images/pc/activities/phone/selfies/beach/nude/7.jpg
+
+   2 equal files of size 41720
+   /images/locations/city/citycenter/photo/topless/5.jpg
+   /images/locations/city/citycenter/photo/topless5.jpg
+
+   2 equal files of size 41705
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet25.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet25.jpg
+
+   2 equal files of size 41515
+   /images/characters/pavlovsk/school/girl/natasha/sex/seethrough02.jpg
+   /images/characters/pavlovsk/school/girl/natasha/seethrough02.jpg
+
+   2 equal files of size 41513
+   /images/locations/pavlovsk/school/grounds/track/sex/SXFU-M02.mp4
+   /images/pc/activities/track/SXFU-M02.mp4
+
+   2 equal files of size 41032
+   /images/locations/city/citycenter/photo/seethru/3.jpg
+   /images/locations/city/citycenter/photo/seethru3.jpg
+
+   2 equal files of size 41030
+   /images/locations/pavlovsk/school/gym/shower/watchkaty.jpg
+   /images/locations/pavlovsk/school/gym/katypeek.jpg
+
+   2 equal files of size 40935
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sexrough/ass9.jpg
+   /images/pc/body/cum/cumanal/cumanal3.jpg
+
+   2 equal files of size 40905
+   /images/locations/pavlovsk/school/classroom/literature/work2.jpg
+   /images/locations/pavlovsk/school/classroom/work2.jpg
+
+   2 equal files of size 40897
+   /images/locations/pavlovsk/school/grounds/track/FE-017.jpg
+   /images/pc/activities/track/FE-017.jpg
+
+   2 equal files of size 40674
+   /images/locations/city/residential/apartment/stairs/event/floor4_bdsm.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor4_bdsm.jpg
+
+   2 equal files of size 40654
+   /images/locations/pavlovsk/school/grounds/track/MA-004.jpg
+   /images/pc/activities/track/MA-004.jpg
+
+   2 equal files of size 40514
+   /images/locations/shared/sex/sexdvanadva/uvag12.jpg
+   /images/locations/shared/sex/sexdvanadva/vag12.jpg
+
+   2 equal files of size 40297
+   /images/pc/activities/photography/foto/people/6.jpg
+   /images/pc/activities/photography/foto/eugene.jpg
+
+   2 equal files of size 40235
+   /images/locations/city/citycenter/photo/topnude/6.jpg
+   /images/locations/city/citycenter/photo/nude11.jpg
+
+   2 equal files of size 40169
+   /images/locations/city/residential/apartment/stairs/event/floor5_bdsm.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor5_bdsm.jpg
+
+   2 equal files of size 40129
+   /images/locations/pavlovsk/school/grounds/track/NI-002.jpg
+   /images/pc/activities/track/NI-002.jpg
+
+   2 equal files of size 39990
+   /images/locations/pavlovsk/school/gym/locker/iripeek.jpg
+   /images/locations/pavlovsk/school/gym/iripeek.jpg
+
+   2 equal files of size 39972
+   /images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/jara3.jpg
+   /images/locations/pavlovsk/resident/apartment/shulginhome/kuh/help/vert10.jpg
+
+   2 equal files of size 39920
+   /images/locations/pavlovsk/school/grounds/track/AP-004.jpg
+   /images/pc/activities/track/AP-004.jpg
+
+   2 equal files of size 39790
+   /images/locations/pavlovsk/school/grounds/track/AP-007.jpg
+   /images/pc/activities/track/AP-007.jpg
+
+   2 equal files of size 39788
+   /images/locations/pavlovsk/school/grounds/track/AP-008.jpg
+   /images/pc/activities/track/AP-008.jpg
+
+   2 equal files of size 39601
+   /images/characters/pavlovsk/school/girl/natasha/sex/seethroughkitchen01.jpg
+   /images/characters/pavlovsk/school/girl/natasha/seethroughkitchen01.jpg
+
+   2 equal files of size 39564
+   /images/locations/pavlovsk/school/gym/locker/nushpeek.jpg
+   /images/locations/pavlovsk/school/gym/nushpeek.jpg
+
+   2 equal files of size 39485
+   /images/locations/shared/sex/sexdvanadva/New folder/minet13.jpg
+   /images/locations/shared/sex/sexdvanadva/minet13.jpg
+
+   2 equal files of size 39430
+   /images/locations/city/citycenter/photo/topnude/17.jpg
+   /images/locations/city/citycenter/photo/nude23.jpg
+
+   2 equal files of size 39326
+   /images/locations/city/citycenter/photo/topless/11.jpg
+   /images/locations/city/citycenter/photo/topless11.jpg
+
+   2 equal files of size 39300
+   /images/locations/pavlovsk/hotel/hotel.room.best1.jpg
+   /images/locations/pavlovsk/resident/meynolds/bathroom.jpg
+
+   3 equal files of size 39073
+   /images/pc/body/hairstyles/lng/curly-bangs-buns/hcol1.jpg
+   /images/pc/body/hairstyles/med/curly-bangs-buns/hcol1.jpg
+   /images/pc/body/hairstyles/medlo/curly-bangs-buns/hcol1.jpg
+
+   2 equal files of size 39045
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/cum3.jpg
+   /images/pc/body/cum/cumtits/cumtits1.jpg
+
+   2 equal files of size 39019
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift2.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift2.jpg
+
+   2 equal files of size 38877
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift6.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift6.jpg
+
+   2 equal files of size 38822
+   /images/locations/pavlovsk/school/grounds/track/NI-001.jpg
+   /images/pc/activities/track/NI-001.jpg
+
+   2 equal files of size 38652
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet1.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet1.jpg
+
+   2 equal files of size 38552
+   /images/locations/city/residential/apartment/home/sex/balcony_anal1.mp4
+   /images/locations/city/residential/apartment/sex/balcony_anal1.mp4
+
+   2 equal files of size 38549
+   /images/characters/pavlovsk/resident/vladimir/father.jpg
+   /images/characters/shared/headshots_main/big28.jpg
+
+   2 equal files of size 38549
+   /images/locations/pavlovsk/school/grounds/track/CHR-01.jpg
+   /images/pc/activities/track/CHR-01.jpg
+
+   2 equal files of size 38502
+   /images/locations/pavlovsk/school/grounds/track/FAM-001.jpg
+   /images/pc/activities/track/FAM-001.jpg
+
+   2 equal files of size 38385
+   /images/locations/city/residential/apartment/home/balcony_underwear3.jpg
+   /images/locations/city/residential/apartment/balcony_underwear3.jpg
+
+   2 equal files of size 38354
+   /images/characters/city/jugo/jugopre.jpg
+   /images/system/1_openings/shared/npc_gustav.jpg
+
+   2 equal files of size 38227
+   /images/locations/pavlovsk/school/grounds/track/FE-015.jpg
+   /images/pc/activities/track/FE-015.jpg
+
+   2 equal files of size 38144
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet5.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet5.jpg
+
+   2 equal files of size 38115
+   /images/locations/pavlovsk/school/gym/locker/belpeek.jpg
+   /images/locations/pavlovsk/school/gym/belpeek.jpg
+
+   2 equal files of size 38111
+   /images/characters/pavlovsk/resident/misha/misha.jpg
+   /images/characters/shared/headshots_main/big54.jpg
+
+   2 equal files of size 38109
+   /images/locations/pavlovsk/school/grounds/track/AP-011.jpg
+   /images/pc/activities/track/AP-011.jpg
+
+   2 equal files of size 37864
+   /images/locations/city/citycenter/photo/topless/22.jpg
+   /images/locations/city/citycenter/photo/topless22.jpg
+
+   2 equal files of size 37762
+   /images/characters/shared/headshots_main/big63.jpg
+   /images/locations/gadukino/village/mitka.jpg
+
+   2 equal files of size 37712
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet21.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet21.jpg
+
+   3 equal files of size 37601
+   /images/locations/city/citycenter/photo/portraits/katherine_a/face.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/talking/face.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/face.jpg
+
+   2 equal files of size 37396
+   /images/locations/pavlovsk/school/gym/locker/albpeek.jpg
+   /images/locations/pavlovsk/school/gym/albpeek.jpg
+
+   2 equal files of size 37324
+   /images/locations/pavlovsk/school/gym/locker/katpeek.jpg
+   /images/locations/pavlovsk/school/gym/katpeek.jpg
+
+   2 equal files of size 37260
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-021.jpg
+   /images/pc/activities/track/MA-021.jpg
+
+   2 equal files of size 37180
+   /images/locations/pavlovsk/school/gym/locker/chrispeek.jpg
+   /images/locations/pavlovsk/school/gym/chrispeek.jpg
+
+   2 equal files of size 36827
+   /images/pc/activities/phone/selfies/beach/nude/21.jpg
+   /images/pc/activities/phone/selfies/beach/nude/6.jpg
+
+   2 equal files of size 36709
+   /images/locations/city/residential/apartment/stairs/event/floor3_ir.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor3_ir.jpg
+
+   2 equal files of size 36454
+   /images/locations/city/citycenter/photo/portraits/katherine_a/1.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/1.jpg
+
+   2 equal files of size 36441
+   /images/locations/pavlovsk/resident/dimkahome/newyear/vomit.jpg
+   /images/locations/pavlovsk/school/events/newyear/vomit.jpg
+
+   2 equal files of size 36333
+   /images/locations/pavlovsk/resident/dimkahome/newyear/idi.jpg
+   /images/locations/pavlovsk/school/events/newyear/idi.jpg
+
+   2 equal files of size 36311
+   /images/locations/pavlovsk/school/events/newyear/ggkiss.jpg
+   /images/locations/pavlovsk/school/events/girlskiss.jpg
+
+   2 equal files of size 36306
+   /images/locations/city/residential/apartment/home/balcony_dressed2.jpg
+   /images/locations/city/residential/apartment/balcony_dressed2.jpg
+
+   2 equal files of size 36199
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/cum1.jpg
+   /images/pc/body/cum/cumface/blonde/8.jpg
+
+   3 equal files of size 36056
+   /images/pc/body/hairstyles/lng/curly-bangs-buns/hcol0.jpg
+   /images/pc/body/hairstyles/med/curly-bangs-buns/hcol0.jpg
+   /images/pc/body/hairstyles/medlo/curly-bangs-buns/hcol0.jpg
+
+   2 equal files of size 35971
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-006.jpg
+   /images/pc/activities/track/OR-006.jpg
+
+   2 equal files of size 35933
+   /images/locations/city/citycenter/photo/special/art2.jpg
+   /images/locations/city/citycenter/photo/art2.jpg
+
+   2 equal files of size 35871
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet0.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet0.jpg
+
+   2 equal files of size 35655
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall10.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock8.mp4
+
+   2 equal files of size 35610
+   /images/locations/pavlovsk/altschool/ptu_ups.jpg
+   /images/locations/pavlovsk/school/afterschool/ptu_ups.jpg
+
+   2 equal files of size 35515
+   /images/locations/pavlovsk/school/grounds/track/AP-002.jpg
+   /images/pc/activities/track/AP-002.jpg
+
+   2 equal files of size 35419
+   /images/locations/shared/sex/sexdvanadva/anal12.jpg
+   /images/locations/shared/sex/sexdvanadva/uanal12.jpg
+
+   2 equal files of size 35387
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-007.jpg
+   /images/pc/activities/track/OR-007.jpg
+
+   2 equal files of size 35383
+   /images/locations/city/citycenter/photo/bnude/6.jpg
+   /images/locations/city/citycenter/photo/nude40.jpg
+
+   2 equal files of size 35328
+   /images/pc/body/cum/cumface/black/4.jpg
+   /images/shared/sex/cum/facial/facial0,7.jpg
+
+   2 equal files of size 35141
+   /images/locations/city/residential/apartment/stairs/event/sex/floor4_fuck.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor4_fuck.jpg
+
+   2 equal files of size 34875
+   /images/locations/pavlovsk/school/gym/locker/lizpeek.jpg
+   /images/locations/pavlovsk/school/gym/lizpeek.jpg
+
+   2 equal files of size 34847
+   /images/locations/pavlovsk/school/grounds/track/DE-009.jpg
+   /images/pc/activities/track/DE-009.jpg
+
+   2 equal files of size 34755
+   /images/locations/pavlovsk/school/gym/locker/linpeek.jpg
+   /images/locations/pavlovsk/school/gym/linpeek.jpg
+
+   2 equal files of size 34644
+   /images/locations/pavlovsk/school/grounds/track/punishment/PR-010.jpg
+   /images/pc/activities/track/PR-010.jpg
+
+   2 equal files of size 34640
+   /images/locations/pavlovsk/school/gym/locker/verpeek.jpg
+   /images/locations/pavlovsk/school/gym/verpeek.jpg
+
+   2 equal files of size 34516
+   /images/locations/pavlovsk/school/gym/locker/zinpeek.jpg
+   /images/locations/pavlovsk/school/gym/zinpeek.jpg
+
+   2 equal files of size 34448
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet4.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet4.jpg
+
+   2 equal files of size 34334
+   /images/characters/pavlovsk/school/boy/igor/crossdress/kd_2.jpg
+   /images/characters/pavlovsk/school/boy/igor/crossdress/kd_6.jpg
+
+   2 equal files of size 34199
+   /images/characters/city/models/mari/talking/face.jpg
+   /images/characters/city/models/mari/face.jpg
+
+   2 equal files of size 34163
+   /images/locations/city/citycenter/photo/topless/21.jpg
+   /images/locations/city/citycenter/photo/topless21.jpg
+
+   2 equal files of size 34105
+   /images/pc/body/piercings/cli1.jpg
+   /images/pc/body/piercings/g2.jpg
+
+   2 equal files of size 34093
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-005.jpg
+   /images/pc/activities/track/OR-005.jpg
+
+   2 equal files of size 34058
+   /images/locations/pavlovsk/school/grounds/track/MA-001.jpg
+   /images/pc/activities/track/MA-001.jpg
+
+   2 equal files of size 34045
+   /images/locations/pavlovsk/school/gym/locker/natpeek.jpg
+   /images/locations/pavlovsk/school/gym/natpeek.jpg
+
+   2 equal files of size 33996
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/cum6.jpg
+   /images/pc/body/cum/cumtits/cumtits2.jpg
+
+   2 equal files of size 33989
+   /images/locations/pavlovsk/resident/dimkahome/newyear/sex/fuck.jpg
+   /images/locations/pavlovsk/school/events/newyear/sex/fuck.jpg
+
+   2 equal files of size 33942
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_14_3.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_7_3.jpg
+
+   2 equal files of size 33884
+   /images/locations/pavlovsk/school/grounds/track/sex/FE-007.jpg
+   /images/pc/activities/track/FE-007.jpg
+
+   2 equal files of size 33873
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_14_2.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_7_2.jpg
+
+   2 equal files of size 33818
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sexrough/ass1.jpg
+   /images/pc/body/cum/cumanal/cumanal2.jpg
+
+   2 equal files of size 33720
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet10.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet10.jpg
+
+   2 equal files of size 33686
+   /images/locations/pavlovsk/school/grounds/track/FE-001.jpg
+   /images/pc/activities/track/FE-001.jpg
+
+   2 equal files of size 33626
+   /images/pc/body/cum/cumface/black/3.jpg
+   /images/shared/sex/cum/facial/facial0,1.jpg
+
+   2 equal files of size 33590
+   /images/locations/pavlovsk/school/gym/locker/julpeek.jpg
+   /images/locations/pavlovsk/school/gym/julpeek.jpg
+
+   2 equal files of size 33559
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift8.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift8.jpg
+
+   2 equal files of size 33436
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-023.jpg
+   /images/pc/activities/track/MA-023.jpg
+
+   2 equal files of size 33423
+   /images/locations/city/citycenter/photo/topless/13.jpg
+   /images/locations/city/citycenter/photo/topless13.jpg
+
+   2 equal files of size 33273
+   /images/characters/pavlovsk/school/girl/anushka/nush_model/nush_talk.jpg
+   /images/locations/pavlovsk/school/gym/nushwatch1.jpg
+
+   2 equal files of size 33214
+   /images/locations/pavlovsk/school/gym/locker/alypeek.jpg
+   /images/locations/pavlovsk/school/gym/alypeek.jpg
+
+   2 equal files of size 33181
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift7.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift7.jpg
+
+   2 equal files of size 33136
+   /images/locations/city/citycenter/photo/portraits/jeff_m/talking/19.jpg
+   /images/locations/city/citycenter/photo/portraits/jeff_m/talking/26.jpg
+
+   2 equal files of size 32992
+   /images/locations/pavlovsk/school/lunch/peremena19.jpg
+   /images/locations/pavlovsk/school/lunch/peremena5.jpg
+
+   2 equal files of size 32920
+   /images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/tv/cum6.jpg
+   /images/pc/body/cum/cumface/blonde/10.jpg
+
+   2 equal files of size 32908
+   /images/locations/city/residential/apartment/stairs/event/sex/floor5_fuck.jpg
+   /images/locations/city/residential/apartment/stairs/sex/floor5_fuck.jpg
+
+   2 equal files of size 32768
+   /images/locations/city/residential/apartment/home/balcony_underwear1.jpg
+   /images/locations/city/residential/apartment/balcony_underwear1.jpg
+
+   2 equal files of size 32688
+   /images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_1_2.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_4_2.jpg
+
+   2 equal files of size 32606
+   /images/characters/pavlovsk/school/girl/natasha/sex/seethrough00.jpg
+   /images/characters/pavlovsk/school/girl/natasha/seethrough00.jpg
+
+   2 equal files of size 32592
+   /images/characters/pavlovsk/school/boy/kolka/brother.jpg
+   /images/characters/shared/headshots_main/big34.jpg
+
+   2 equal files of size 32518
+   /images/locations/pavlovsk/school/grounds/track/FE-004.jpg
+   /images/pc/activities/track/FE-004.jpg
+
+   2 equal files of size 32473
+   /images/locations/pavlovsk/school/grounds/track/punishment/PR-011.jpg
+   /images/pc/activities/track/PR-011.jpg
+
+   2 equal files of size 32361
+   /images/pc/activities/reading/bed_book_nude.jpg
+   /images/shared/accessories/books/book_nude.jpg
+
+   2 equal files of size 32292
+   /images/characters/pavlovsk/school/boy/niko/kikoev2/dinner/6/ride1.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikoev2/diner/6/ride1.jpg
+
+   2 equal files of size 32258
+   /images/locations/pavlovsk/school/gym/locker/vicpeek.jpg
+   /images/locations/pavlovsk/school/gym/vicpeek.jpg
+
+   2 equal files of size 32235
+   /images/locations/city/citycenter/photo/nude/4.jpg
+   /images/locations/city/citycenter/photo/nude31.jpg
+
+   2 equal files of size 32231
+   /images/pc/body/cum/cumface/blonde/4.jpg
+   /images/shared/sex/cum/facial/facial0,0.jpg
+
+   2 equal files of size 32131
+   /images/locations/city/citycenter/photo/nude/5.jpg
+   /images/locations/city/citycenter/photo/nude32.jpg
+
+   2 equal files of size 32079
+   /images/locations/city/citycenter/photo/topnude/3.jpg
+   /images/locations/city/citycenter/photo/nude8.jpg
+
+   2 equal files of size 32012
+   /images/locations/city/residential/apartment/home/balcony_underwear2.jpg
+   /images/locations/city/residential/apartment/balcony_underwear2.jpg
+
+   2 equal files of size 31682
+   /images/characters/pavlovsk/school/girl/vicky/event/case_gift0.jpg
+   /images/characters/pavlovsk/school/girl/vicky/sex/case_gift0.jpg
+
+   2 equal files of size 31483
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/cum2.jpg
+   /images/pc/body/cum/creampie/cumpussy13.jpg
+
+   2 equal files of size 31326
+   /images/locations/pavlovsk/school/gym/locker/stapeek.jpg
+   /images/locations/pavlovsk/school/gym/stapeek.jpg
+
+   2 equal files of size 31287
+   /images/locations/pavlovsk/school/grounds/track/sex/OR-003.jpg
+   /images/pc/activities/track/OR-003.jpg
+
+   2 equal files of size 31254
+   /images/locations/city/citycenter/photo/lingerie/2.jpg
+   /images/locations/city/citycenter/photo/lingerie2.jpg
+
+   2 equal files of size 31239
+   /images/locations/pavlovsk/altschool/ptu_korr1.jpg
+   /images/locations/pavlovsk/school/afterschool/ptu_korr1.jpg
+
+   2 equal files of size 31226
+   /images/locations/pavlovsk/altschool/ptu_zanato.jpg
+   /images/locations/pavlovsk/school/afterschool/ptu_zanato.jpg
+
+   2 equal files of size 31212
+   /images/locations/city/citycenter/photo/portraits/katherine_a/4.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/4.jpg
+
+   2 equal files of size 31191
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_7.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_12.jpg
+
+   2 equal files of size 31121
+   /images/locations/city/citycenter/photo/topnude/16.jpg
+   /images/locations/city/citycenter/photo/nude28.jpg
+
+   2 equal files of size 31036
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-019.jpg
+   /images/pc/activities/track/MA-019.jpg
+
+   2 equal files of size 30890
+   /images/locations/city/citycenter/photo/topnude/11.jpg
+   /images/locations/city/citycenter/photo/nude16.jpg
+
+   2 equal files of size 30729
+   /images/locations/city/citycenter/photo/topless/16.jpg
+   /images/locations/city/citycenter/photo/topless16.jpg
+
+   2 equal files of size 30627
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet24.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet24.jpg
+
+   2 equal files of size 30232
+   /images/locations/pavlovsk/school/gym/locker/larpeek.jpg
+   /images/locations/pavlovsk/school/gym/larpeek.jpg
+
+   2 equal files of size 30041
+   /images/characters/pavlovsk/school/teacher/arina/dream/dream7.jpg
+   /images/characters/pavlovsk/school/teacher/arina/sex/dream/dream7.jpg
+
+   2 equal files of size 30004
+   /images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/sex/cum5.jpg
+   /images/pc/body/cum/cumface/brown/9.jpg
+
+   2 equal files of size 29940
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-017.jpg
+   /images/pc/activities/track/MA-017.jpg
+
+   2 equal files of size 29821
+   /images/characters/pavlovsk/school/boy/vasya/sex/shuglinhome/tv/cum4.jpg
+   /images/pc/body/cum/cumface/blonde/9.jpg
+
+   2 equal files of size 29762
+   /images/locations/city/citycenter/photo/topnude/8.jpg
+   /images/locations/city/citycenter/photo/nude13.jpg
+
+   2 equal files of size 29624
+   /images/locations/pavlovsk/altschool/ptu_urok1.jpg
+   /images/locations/pavlovsk/school/afterschool/ptu_urok1.jpg
+
+   2 equal files of size 29387
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/hall9.mp4
+   /images/characters/pavlovsk/school/boy/niko/nikoev/school/locker/lock6.mp4
+
+   2 equal files of size 29212
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_2_18.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_1.jpg
+
+   2 equal files of size 29080
+   /images/locations/pavlovsk/school/gym/locker/lerpeek.jpg
+   /images/locations/pavlovsk/school/gym/lerpeek.jpg
+
+   2 equal files of size 29050
+   /images/locations/city/citycenter/photo/special/special1.jpg
+   /images/locations/city/citycenter/photo/special1.jpg
+
+   2 equal files of size 28406
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet26.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet26.jpg
+
+   2 equal files of size 28236
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_14_5.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_7_5.jpg
+
+   2 equal files of size 28179
+   /images/characters/pavlovsk/resident/roma/roma.jpg
+   /images/characters/shared/headshots_main/big56.jpg
+
+   2 equal files of size 28123
+   /images/pc/items/fashionista/panties/58.jpg
+   /images/pc/items/lusso/panties/36.jpg
+
+   2 equal files of size 28090
+   /images/locations/city/citycenter/photo/topless/3.jpg
+   /images/locations/city/citycenter/photo/topless3.jpg
+
+   2 equal files of size 28060
+   /images/locations/city/citycenter/photo/topless/10.jpg
+   /images/locations/city/citycenter/photo/topless10.jpg
+
+   2 equal files of size 28027
+   /images/locations/pavlovsk/school/grounds/track/MA-007.jpg
+   /images/pc/activities/track/MA-007.jpg
+
+   2 equal files of size 28027
+   /images/locations/pavlovsk/school/gym/locker/sonpeek.jpg
+   /images/locations/pavlovsk/school/gym/sonpeek.jpg
+
+   2 equal files of size 27916
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet28.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet28.jpg
+
+   2 equal files of size 27701
+   /images/locations/city/citycenter/photo/bnude/5.jpg
+   /images/locations/city/citycenter/photo/nude39.jpg
+
+   2 equal files of size 27576
+   /images/locations/pavlovsk/resident/dimkahome/newyear/tusa5.jpg
+   /images/locations/pavlovsk/school/events/newyear/tusa5.jpg
+
+   2 equal files of size 27514
+   /images/locations/city/citycenter/photo/fashion/5.jpg
+   /images/locations/city/citycenter/photo/fashion5.jpg
+
+   2 equal files of size 27356
+   /images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_1_3.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_4_8.jpg
+
+   2 equal files of size 27295
+   /images/locations/city/citycenter/photo/topless/1.jpg
+   /images/locations/city/citycenter/photo/topless1.jpg
+
+   2 equal files of size 27229
+   /images/locations/pavlovsk/resident/apartment/garage/father/sex/father.misha1,0.jpg
+   /images/locations/pavlovsk/resident/apartment/garage/father/sex/fathermisha.jpg
+
+   2 equal files of size 27155
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-020.jpg
+   /images/pc/activities/track/MA-020.jpg
+
+   2 equal files of size 27122
+   /images/shared/sex/blowjob/fa6.jpg
+   /images/shared/sex/cum/mouth/cum40.jpg
+
+   2 equal files of size 27084
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet22.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet22.jpg
+
+   2 equal files of size 27055
+   /images/characters/pavlovsk/school/boy/niko/nikomisc/meynold/bathroom/door.jpg
+   /images/characters/pavlovsk/school/boy/niko/nikomisc/meynold/bathroom/locked.jpg
+
+   2 equal files of size 27031
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet23.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet23.jpg
+
+   2 equal files of size 27023
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-015.jpg
+   /images/pc/activities/track/MA-015.jpg
+
+   2 equal files of size 26929
+   /images/locations/city/citycenter/photo/topless/17.jpg
+   /images/locations/city/citycenter/photo/topless17.jpg
+
+   2 equal files of size 26796
+   /images/locations/city/residential/clinic/sex/exam13.jpg
+   /images/locations/city/residential/clinic/exam13.jpg
+
+   2 equal files of size 26662
+   /images/pc/activities/phone/selfies/bathroom/bath/27.jpg
+   /images/pc/activities/phone/selfies/bathroom/nude/1.jpg
+
+   2 equal files of size 26531
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-018.jpg
+   /images/pc/activities/track/MA-018.jpg
+
+   2 equal files of size 26324
+   /images/locations/city/residential/clinic/sex/exam14.jpg
+   /images/locations/city/residential/clinic/exam14.jpg
+
+   2 equal files of size 26278
+   /images/locations/city/citycenter/photo/sexy/1.jpg
+   /images/locations/city/citycenter/photo/ero2.jpg
+
+   2 equal files of size 25750
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_12.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_17.jpg
+
+   2 equal files of size 25451
+   /images/pc/activities/photography/foto/people/2.jpg
+   /images/pc/activities/photography/foto/sister.jpg
+
+   2 equal files of size 24933
+   /images/locations/shared/sex/sexdvanadva/New folder/minet11.jpg
+   /images/locations/shared/sex/sexdvanadva/minet11.jpg
+
+   2 equal files of size 24903
+   /images/locations/pavlovsk/school/grounds/track/FE-013.jpg
+   /images/pc/activities/track/FE-013.jpg
+
+   2 equal files of size 24842
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet6.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet6.jpg
+
+   2 equal files of size 24645
+   /images/locations/pavlovsk/school/grounds/track/sex/MA-022.jpg
+   /images/pc/activities/track/MA-022.jpg
+
+   2 equal files of size 24506
+   /images/locations/shared/sex/sexdvanadva/New folder/minet26.jpg
+   /images/locations/shared/sex/sexdvanadva/minet26.jpg
+
+   2 equal files of size 24496
+   /images/locations/city/citycenter/photo/portraits/katherine_a/6.jpg
+   /images/locations/city/citycenter/photo/portraits/krystal_b/6.jpg
+
+   2 equal files of size 24276
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet3.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet3.jpg
+
+   2 equal files of size 24205
+   /images/locations/pavlovsk/resident/rekshome/party/party_girls_party_gost_1_1.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_4_4.jpg
+
+   2 equal files of size 24144
+   /images/locations/pavlovsk/resident/dimkahome/newyear/drunk.jpg
+   /images/locations/pavlovsk/school/events/newyear/drunk.jpg
+
+   2 equal files of size 23905
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_9.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_14.jpg
+
+   2 equal files of size 23899
+   /images/locations/city/citycenter/photo/nude/3.jpg
+   /images/locations/city/citycenter/photo/nude30.jpg
+
+   2 equal files of size 23782
+   /images/locations/pavlovsk/resident/dimkahome/newyear/vom.jpg
+   /images/locations/pavlovsk/school/events/newyear/vom.jpg
+
+   2 equal files of size 23700
+   /images/locations/city/citycenter/photo/topnude/18.jpg
+   /images/locations/city/citycenter/photo/nude24.jpg
+
+   2 equal files of size 23557
+   /images/locations/city/citycenter/photo/topless/15.jpg
+   /images/locations/city/citycenter/photo/topless15.jpg
+
+   2 equal files of size 23268
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_6.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_18.jpg
+
+   2 equal files of size 22975
+   /images/locations/city/citycenter/photo/topnude/9.jpg
+   /images/locations/city/citycenter/photo/nude14.jpg
+
+   2 equal files of size 22666
+   /images/pc/activities/phone/selfies/beach/nude/19.jpg
+   /images/pc/activities/phone/selfies/beach/titflash/7.jpg
+
+   2 equal files of size 21741
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_11.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_16.jpg
+
+   2 equal files of size 21711
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet27.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet27.jpg
+
+   2 equal files of size 21588
+   /images/locations/city/citycenter/photo/topless/8.jpg
+   /images/locations/city/citycenter/photo/topless8.jpg
+
+   2 equal files of size 21379
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_14_1.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_7_1.jpg
+
+   2 equal files of size 21123
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_14_6.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_7_6.jpg
+
+   2 equal files of size 21077
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet16.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet16.jpg
+
+   2 equal files of size 20390
+   /images/locations/pavlovsk/school/grounds/track/FE-006.jpg
+   /images/pc/activities/track/FE-006.jpg
+
+   2 equal files of size 20101
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet13.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet13.jpg
+
+   2 equal files of size 19949
+   /images/locations/pavlovsk/resident/apartment/garage/father/sex/father.gar.1,0.jpg
+   /images/locations/pavlovsk/resident/apartment/garage/father/sex/fathergar.jpg
+
+   2 equal files of size 19653
+   /images/locations/pavlovsk/school/grounds/track/AP-006.jpg
+   /images/pc/activities/track/AP-006.jpg
+
+   2 equal files of size 19219
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet17.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet17.jpg
+
+   2 equal files of size 18921
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet8.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet8.jpg
+
+   2 equal files of size 18886
+   /images/characters/pavlovsk/school/teacher/rolan/school/rolanmeet19.jpg
+   /images/locations/pavlovsk/resident/apartment/aptrolan/rolanmeet/rolanmeet19.jpg
+
+   2 equal files of size 18296
+   /images/locations/city/citycenter/photo/topless/6.jpg
+   /images/locations/city/citycenter/photo/topless6.jpg
+
+   2 equal files of size 18273
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_home_fun_2_8_10.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/reksparty_party_toilet_5_15.jpg
+
+   2 equal files of size 18168
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_14_4.jpg
+   /images/locations/pavlovsk/resident/rekshome/party/party_rex_party_gost_7_4.jpg
+
+   2 equal files of size 18130
+   /images/locations/pavlovsk/police/pavrec.jpg
+   /images/locations/shared/police/pavrec.jpg
+
+   3 equal files of size 17989
+   /images/locations/city/citycenter/photo/fashion/1.jpg
+   /images/locations/city/citycenter/photo/fashion.jpg
+   /images/locations/city/citycenter/photo/fashion1.jpg
+
+   2 equal files of size 17864
+   /images/characters/city/jora/sex/klof10.jpg
+   /images/shared/sex/cum/vagcreampie/klof10.jpg
+
+   2 equal files of size 16723
+   /images/characters/city/jora/sex/bas13.jpg
+   /images/characters/city/jora/sex/vas13.jpg
+
+   2 equal files of size 15484
+   /images/locations/city/industrial/casino/stavkabd.jpg
+   /images/locations/city/industrial/casino/stavkacw.jpg
+
+   2 equal files of size 14140
+   /images/characters/city/jora/sex/bas 27.jpg
+   /images/characters/city/jora/sex/bas27.jpg
+
+   2 equal files of size 13771
+   /images/shared/drinks/tea.jpg
+   /images/shared/food/tea.jpg
+
+   2 equal files of size 12678
+   /images/characters/city/jora/sex/klof11.jpg
+   /images/characters/city/jora/sex/klof7.jpg
+
+   2 equal files of size 9170
+   /images/system/phone/theme/Custom_Voidwalker Red/icon_sms_new.gif
+   /images/system/phone/theme/Custom_Voidwalker Toxic/icon_sms_new.gif
+
+   2 equal files of size 6556
+   /images/locations/pavlovsk/school/grounds/track/sex/CHR-03.jpg
+   /images/pc/activities/track/CHR-03.jpg
+
+   2 equal files of size 6408
+   /images/locations/city/residential/lake/allure/shop_name.png
+   /images/locations/pavlovsk/commercial/allure/shop_name.png
+
+   2 equal files of size 4650
+   /images/system/icons/status/bimbo.png
+   /images/system/icons/bimbo.png
+
+   2 equal files of size 2348
+   /images/system/icons/status/boobs.png
+   /images/system/icons/status/boobs_black.png
+
+   2 equal files of size 1743
+   /images/system/icons/status/commando.png
+   /images/system/icons/status/commando_black.png
+ 

glife.qproj

@@ -69,6 +69,7 @@
 		<Location name="drugs"/>
 		<Location name="npc_relationship"/>
 		<Location name="npc_reactions"/>
+		<Location name="npc_finder"/>
 		<Location name="grades"/>
 		<Location name="internet_mobile"/>
 	</Folder>
@@ -204,6 +205,7 @@
 		<Location name="$attributes_lusso_bodysuit"/>
 		<Location name="$attributes_lusso_bra"/>
 		<Location name="$attributes_lusso_panties"/>
+		<Location name="$attributes_moncheri_bodysuit"/>
 		<Location name="$attributes_salacious_panties"/>
 		<Location name="$attributes_salacious_bra"/>
 		<Location name="$attributes_salacious_bodysuit"/>
@@ -686,6 +688,7 @@
 		<Location name="booty_call_talk"/>
 		<Location name="booty_call_reactions"/>
 		<Location name="booty_call_virgin"/>
+		<Location name="booty_call_leave"/>
 	</Folder>
 	<Folder name="Station Campus">
 		<Location name="pav_market"/>
@@ -1018,6 +1021,7 @@
 		<Location name="pav_clinic"/>
 		<Location name="therapist"/>
 		<Location name="therapist_reminder"/>
+		<Location name="therapist_hotel"/>
 		<Location name="gevent"/>
 		<Location name="pav_park"/>
 		<Location name="pav_park_sex"/>

locations/BDsex.qsrc

@@ -506,7 +506,7 @@ if $ARGS[0] = 'end':
 		InYouHome = 0
 		'<<$boydesc>> politely says goodbye and leaves.'
 
-		act 'Leave':gt $home['entrance'], 'start'
+		act 'Leave':gt $home['entrance'], $home['entrance_arg']
 
 		exit
 	elseif GoToGuy = 1:

locations/Cum_Manage.qsrc

@@ -234,6 +234,7 @@ if $ARGS[0] = '':
 						cumsumvag += sexvolume
 						condom_break = 1
 						stat['broken_condoms'] += 1
+						stat['last_broken_condom'] = daystart
 
 						sparridt[sparrtemp] = cumarrkno[cumarrtemp]
 						sparrslc[sparrtemp] = 0
@@ -329,6 +330,7 @@ if $ARGS[0] = '':
 
 	!! creampie vaginal statistics:
 			if spafinloc = 0:
+				stat['last_creampie'] = daystart
 				!!STD checks
 				if cumnostd = 0: gs 'dinSex', 'std_trigger'
 				!! safe creampie (if cycle > 3 or on pill or succubus):
@@ -832,7 +834,11 @@ if $ARGS[0] = 'cum_stat_display':
 					if cumcount['<<i>>:<<j>>'] = knownguy['<<i>>:<<j>>']:
 					!! everyone is known (one or more)
 						if knownguy['<<i>>:<<j>>'] = 1:
-							$txtperson = $npc_usedname[$cumowner['<<i>>:<<j>>:0']] + ' '
+							if $npc_usedname[$cumowner['<<i>>:<<j>>:0']] = 'stranger':
+								$txtperson = $npc_firstname[$cumowner['<<i>>:<<j>>:0']] + ' '
+							else
+								$txtperson = $npc_usedname[$cumowner['<<i>>:<<j>>:0']] + ' '
+							end
 						else
 							kmax = 0
 							:nullocator1
@@ -843,7 +849,11 @@ if $ARGS[0] = 'cum_stat_display':
 								$txtperson += $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']]
 							if k < kmax-1:$txtperson += ', ' & k += 1 & jump 'knownloop'
 							k += 1
-							$txtperson += ' and ' + $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] + ' '
+							if $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] = 'stranger':
+								$txtperson += ' and ' + $npc_firstname[$cumowner['<<i>>:<<j>>:<<k>>']] + ' '
+							else
+								$txtperson += ' and ' + $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] + ' '
+							end
 						end
 					elseif knownguy['<<i>>:<<j>>'] = 0:
 					!! no one is known (one or more)
@@ -855,7 +865,11 @@ if $ARGS[0] = 'cum_stat_display':
 					else
 					!! there are known and unknown guys in the mix
 						if knownguy['<<i>>:<<j>>'] = 1:
-							$txtperson = $npc_usedname[$cumowner['<<i>>:<<j>>:0']] + ' and some guy'
+							if $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] = 'stranger':
+								$txtperson = $npc_firstname[$cumowner['<<i>>:<<j>>:0']] + ' and some guy'
+							else
+								$txtperson = $npc_usedname[$cumowner['<<i>>:<<j>>:0']] + ' and some guy'
+							end
 						else
 							kmax = 0
 							:nullocator2
@@ -863,7 +877,11 @@ if $ARGS[0] = 'cum_stat_display':
 							kmax -= 1
 							k = 0
 							:mixloop
-								$txtperson += $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] + ', '
+								if $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] = 'stranger':
+									$txtperson += $npc_firstname[$cumowner['<<i>>:<<j>>:<<k>>']] + ', '
+								else
+									$txtperson += $npc_usedname[$cumowner['<<i>>:<<j>>:<<k>>']] + ', '
+								end
 							if k < kmax: k += 1 & jump 'mixloop'
 							$txtperson += 'and some guy'
 						end

locations/JuliaMilHome.qsrc

@@ -589,10 +589,10 @@ if $ARGS[0] = 'julia_chat':
 				act 'Stop talking': gt 'JuliaMilHome','julia_room'
 				act 'Keep talking': gt 'JuliaMilHome', 'julia_chat'
 			end
-			act 'Say nothing, just hug him back':
+			act 'Say nothing, just hug her back':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/characters/shared/headshots_main/big12.jpg"></center>'
-				'You kiss her and hug her back. You have never seen her look so happy, she looks at you like you are the most amazing thing in the world. She looks at you like you are the most amazing thing in the world. She kisses you for a moment before shyly breaking away and putting a little space between you, but she holds your hand as you both sit on the bed.'
+				'You kiss her and hug her back. You have never seen her look so happy, she looks at you like you are the most amazing thing in the world. She kisses you for a moment before shyly breaking away and putting a little space between you, but she holds your hand as you both sit on the bed.'
 
 				act 'Stop talking': gt 'JuliaMilHome','julia_room'
 				act 'Keep talking': gt 'JuliaMilHome', 'julia_chat'

locations/KatjaHomeTalk.qsrc

@@ -63,7 +63,7 @@ if $ARGS[0] = '':
 					gt 'KatjaHomeTalk', 'random_park_sex_talk'
 			
 				elseif katjaQW['QWstage'] = 5 and katjaQW['marcus_pussy'] > 0: 
-					!!If Katja have has had her first time wiht Marcus she will discuss this the next time the player talks to her at home
+					!!If Katja have has had her first time with Marcus she will discuss this the next time the player talks to her at home
 					gt 'KatjaHomeTalk', 'first_boy_sex_follow_up'
 			
 				elseif katjaQW['QWstage'] = 5 and katjaQW['marcus_asked'] = 1 and katjaQW['sex_clossedness'] = 0: 
@@ -561,7 +561,7 @@ if $ARGS[0] = 'katjaknows':
 	cla
 	npc_pregtalk['A14'] = 1
 	*nl
-	if katjaQW['slut'] < 60 and $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
+	if katjaQW['slut'] < 60 and $wombthfathID = 'A34' and npc_rel['A34'] > 50:
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
@@ -570,7 +570,7 @@ if $ARGS[0] = 'katjaknows':
 		'"I wouldn''t be pregnant if he wasn''t," you laugh. "I only let the best cock inside me."'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
-	elseif katjaQW['slut'] < 60 and $wombthfath = 'Stepfather' and npc_rel['A28'] > 50:
+	elseif katjaQW['slut'] < 60 and $wombthfathID = 'A28' and npc_rel['A28'] > 50:
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
@@ -578,7 +578,7 @@ if $ARGS[0] = 'katjaknows':
 		'"You were knocked up by your step-dad!? That''s so crazy!"'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
-	elseif katjaQW['slut'] < 60 and $wombthfath = 'Biological Father' and npc_rel['A29'] > 50:
+	elseif katjaQW['slut'] < 60 and $wombthfathID = 'A29' and npc_rel['A29'] > 50:
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
@@ -586,7 +586,7 @@ if $ARGS[0] = 'katjaknows':
 		'"You were knocked up by your own father!? That''s so crazy!"'
 		'Katja blushes and you give her a quick kiss before she can react.'
 
-	elseif katjaQW['slut'] < 60 and $wombthfath = '':
+	elseif katjaQW['slut'] < 60 and ($wombthfath = '' or $wombthfathID = 'unknown'):
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
@@ -596,7 +596,7 @@ if $ARGS[0] = 'katjaknows':
 		'Katja places a hand on your shoulder "<<$pcs_nickname>>, if I can do anything to make your life a little easier, please let me know."'
 		'You blush and thank her before planting a quick kiss on her cheek.'
 
-	elseif katjaQW['slut'] >= 60 and $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
+	elseif katjaQW['slut'] >= 60 and $wombthfathID = 'A34' and npc_rel['A34'] > 50:
 		minut += 10
 		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
@@ -606,7 +606,7 @@ if $ARGS[0] = 'katjaknows':
 		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions revolve around riding your brother''s dick."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
 
-	elseif katjaQW['slut'] >= 60 and $wombthfath = 'Stepfather' and npc_rel['A28'] > 50:
+	elseif katjaQW['slut'] >= 60 and $wombthfathID = 'A28' and npc_rel['A28'] > 50:
 		minut += 10
 		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
@@ -616,7 +616,7 @@ if $ARGS[0] = 'katjaknows':
 		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions are part of an Electra complex."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
 
-	elseif katjaQW['slut'] >= 60 and $wombthfath = 'Biological Father' and npc_rel['A29'] > 50:
+	elseif katjaQW['slut'] >= 60 and $wombthfathID = 'A29' and npc_rel['A29'] > 50:
 		minut += 10
 		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
@@ -626,7 +626,7 @@ if $ARGS[0] = 'katjaknows':
 		'Katja chuckles. "I appreciate honesty and I think everyone should be free to explore their passions. Even if those passions are part of an Electra complex."'
 		'You find yourself questioning what you did to deserve such a wonderful woman in your life.'
 
-	elseif katjaQW['slut'] >= 60 and $wombthfath = '':
+	elseif katjaQW['slut'] >= 60 and ($wombthfath = '' or $wombthfathID = 'unknown'):
 		minut += 10
 		'"Who''d you let dump their load into that wonderful body of yours?" Katja asks while biting her bottom lip.'
 		*nl
@@ -640,7 +640,7 @@ if $ARGS[0] = 'katjaknows':
 		minut += 10
 		'"So, who''s the baby-daddy?" Katja teases.'
 		*nl
-		iif( $wombthfath = '', '"I don''t know who the father is "', '"It looks like I got knocked up by <<$wombthfath>>"')
+		iif( ($wombthfath = '' or $wombthfathID = 'unknown'), '"I don''t know who the father is "', '"It looks like I got knocked up by <<$wombthfath>>"')
 		'"I hope they know how lucky they are," she says while clearly blushing.'
 	end
 	act 'Continue':
@@ -661,48 +661,56 @@ if $ARGS[0] = 'katjaknows1':
 		'"Fuck, I love seeing you pregnant. I hope you''re up for having lots of babies." She blushes intensely and kisses you. "So, who put this one into you?"'
 	end
 	*nl
-	if katjaQW['slut'] < 60 and arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
-		'You tell Katja that <<$wombthfath>> got you pregnant again.'
-		'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
-		'"I just hope he makes you happy. It''s sometimes hard to believe that you''re the woman I fell in love with." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-
-	elseif katjaQW['slut'] >= 60 and arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
-		'You tell Katja that <<$wombthfath>> got you pregnant again.'
-		'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
-		'"God, you''re the hottest bitch I know. I didn''t think I could be any more in love with you." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-		'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t let this distract from my wanting you to become his breeding bitch. I want him to keep you pregnant. I need something to masturbate about when you’re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
-
-	elseif katjaQW['slut'] < 60 and arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
-		'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
-		'Her eyes widen. "wow, your family must be really close," she giggles.'
-		'"To think I''d fall in love with a woman who lets multiple members of her own family knock her up." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-
-	elseif katjaQW['slut'] >= 60 and arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1 and (($wombthfath = 'Kolka' and npc_rel['A34'] > 50) or ($wombthfath = 'Stepfather' and npc_rel['A28'] > 50) or ($wombthfath = 'Biological Father' and npc_rel['A29'] > 50)):
-		'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
-		'Her eyes widen. "Wow, your family must be really close," she giggles.'
-		'"Shit, ''which of your family members did you like being knocked up by the most?'' might be the hottest question anyone has ever made me think of. Just when I started thinking I couldn''t love you any more." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-		'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t think I''ll forget the image of you being passed around your family like a good little slut. I need something to masturbate about when you''re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
-
-	elseif arrpos('$ChildThFath',$wombthfath) >= 0 and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1 and ($wombthfath ! 'Kolka' and $wombthfath ! 'Stepfather' and $wombthfath ! 'Biological Father'):
-		'You tell Katja that you don''t that the father is <<$wombthfath>> again.'
-		'"I hope he makes you happy. And that he doesn''t mind sharing you with me," she blushes. "I would hate to completely lose the woman I love." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-
-	elseif arrpos('$ChildThFath',$wombthfath) = arrsize('$ChildThFath')-1 and ($wombthfath ! 'Kolka' and $wombthfath ! 'Stepfather' and $wombthfath ! 'Biological Father'):
-		'You tell Katja that you don''t that the father is <<$wombthfath>>.'
-		'"I''m glad you realize you''re too special to limit yourself to one man. I love you too much to let you do anything less." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
-
-	elseif katjaQW['slut'] >= 60 and $wombthfath = '':
-		'You tell Katja that you don''t know you the father is.'
-		'"Seems like you had a little too much fun then," she chuckles.'
-		'"I hope you''ll include me next time."'
-
-	elseif katjaQW['slut'] < 60 and npc_rel['A14'] >= 40 and $wombthfath = '':
-		'You tell Katja that you don''t know you the father is.'
-		'"Seems like you had a little too much fun then," she chuckles.'
+!!The family reactions
+	if ($wombthfathID = 'A34' and npc_rel['A34'] > 50) or ($wombthfathID = 'A28' and npc_rel['A28'] > 50) or ($wombthfathID = 'A29' and npc_rel['A29'] > 50):
+		if $wombthfathID = $ChildThFath[kid-1]:
+			if katjaQW['slut'] >= 60:
+				'You tell Katja that <<$wombthfath>> got you pregnant again.'
+				'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
+				'"God, you''re the hottest bitch I know. I didn''t think I could be any more in love with you." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+				'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t let this distract from my wanting you to become his breeding bitch. I want him to keep you pregnant. I need something to masturbate about when you’re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
+			else
+				'You tell Katja that <<$wombthfath>> got you pregnant again.'
+				'"Damn, I never thought I''d meet someone who wanted to be an incest baby factory."'
+				'"I just hope he makes you happy. It''s sometimes hard to believe that you''re the woman I fell in love with." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+			end
+		else
+			if katjaQW['slut'] >= 60:
+				'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
+				'Her eyes widen. "Wow, your family must be really close," she giggles.'
+				'"Shit, ''which of your family members did you like being knocked up by the most?'' might be the hottest question anyone has ever made me think of. Just when I started thinking I couldn''t love you any more." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+				'After a few minutes, she breaks the kiss, but keeps her lips inches from yours. "Don''t think I''ll forget the image of you being passed around your family like a good little slut. I need something to masturbate about when you''re not around." As soon as she finishes speaking, her lips are magnetically pulled back to yours.'
+			else
+				'Blushing, you tell Katja that a member of your family impregnated you, but this time it was <<$wombthfath>>.'
+				'Her eyes widen. "wow, your family must be really close," she giggles.'
+				'"To think I''d fall in love with a woman who lets multiple members of her own family knock her up." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+			end
+		end
+!!The non-family reactions
 	else
-		'You tell Katja that you prefer not to say who the father is.'
-		'"Seems like you had a little too much fun then," she chuckles.'
+		if $wombthfathID = $ChildThFath[kid-1]:
+			'You tell Katja that <<$wombthfath>> is the father again.'
+			'"I hope he makes you happy. And that he doesn''t mind sharing you with me," she blushes. "I would hate to completely lose the woman I love." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+		elseif $wombthfath = '' or $wombthfathID = 'unknown':
+			if katjaQW['slut'] >= 60:
+				'You tell Katja that you don''t know you the father is.'
+				'"Seems like you had a little too much fun then," she chuckles.'
+				'"I hope you''ll include me next time."'
+			else
+				if npc_rel['A14'] >= 40:
+					'You tell Katja that you don''t know you the father is.'
+					'"Seems like you had a little too much fun then," she chuckles.'
+				else
+					'You tell Katja that you prefer not to say who the father is.'
+					'"Seems like you had a little too much fun then," she chuckles.'
+				end
+			end
+		else
+			'You tell Katja that the father is <<$wombthfath>>.'
+			'"I''m glad you realize you''re too special to limit yourself to one man. I love you too much to let you do anything less." Her eyes widen and her cheeks redden at the realization that she just admitted she loves you. Before you can respond, she cuts you off with a passionate kiss.'
+		end
 	end
+
 	act 'Continue':
 		minut += 10
 		if $loc = 'katja_dorm':

locations/NPCFinder.qsrc

@@ -1,65 +0,0 @@
-*clr
-'<a href="exec: gt ''NPCFinder'', ''finder''">Enter the ID of the character.</a>'
-if $ARGS[0] = 'finder':
-	$looking = input ('ID (like <i>A17</i>)')
-	gt 'NPCFinder'
-end
-
-if $looking ! '':
-	'<br><br>'
-	'Found character:'
-	'<br>'
-	'<<$npc_pic[''<<looking>>'']>>'
-	'DNA string: <<$npc_dna[''<<$looking>>'']>>'
-	'Name: <<$npc_firstname[''<<$looking>>'']>> "<<$npc_nickname[''<<$looking>>'']>>" <<$npc_lastname[''<<$looking>>'']>> (<<$npc_usedname[''<<$looking>>'']>>)'
-	if npc_dob['<<$looking>>'] ! '': 'Birthday (YYYY-MM-DD): <<mid(npc_dob[''<<$looking>>''],1,4)>>-<<mid(npc_dob[''<<$looking>>''],5,2)>>-<<mid(npc_dob[''<<$looking>>''],7,2)>>'
-	'Intelligence: <<npc_intel[''<<$looking>>'']>>'
-	if npc_grupTipe['<<$looking>>'] ! '': 'Social group: <<npc_grupTipe[''<<$looking>>'']>>'
-	if npc_sexskill['<<$looking>>'] ! '': 'Sex skill: <<npc_sexskill[''<<$looking>>'']>>'
-	if npc_rep['<<$looking>>'] ! '': ' Reputation in school: <<npc_rep[''<<$looking>>'']>>'
-	if npc_haircol['<<$looking>>'] = 0:
-		'Natural hair color: black (<<npc_haircol[''<<$looking>>'']>>)'
-	elseif npc_haircol['<<$looking>>'] = 1:
-		'Natural hair color: brown (<<npc_haircol[''<<$looking>>'']>>)'
-	elseif npc_haircol['<<$looking>>'] = 2:
-		'Natural hair color: read (<<npc_haircol[''<<$looking>>'']>>)'
-	else
-		'Natural hair color: blonde (<<npc_haircol[''<<$looking>>'']>>)'
-	end
-	if hotcat_rating['<<$looking>>'] ! '': 'Hotness rating: <<hotcat_rating[''<<$looking>>'']>>'
-	'Appearance value: <<npc_apprnc[''<<$looking>>'']>>'
-	'Height: <<npc_height[''<<$looking>>'']>>'
-	if npc_gender['<<$looking>>'] = 0:
-		'Gender: male'
-		'Dick thickness: <<$npc_thdick[''<<$looking>>'']>>'
-		'Dick length: <<npc_dick[''<<$looking>>'']>>'
-		'Potential: <<npc_spermpot[''<<$looking>>'']>> (default is 10000)'
-	else
-		'Gender: female'
-		'Breast size: <<npc_bust[''<<$looking>>'']>>'
-	end
-	if npc_herpes['<<$looking>>'] > 0: $npcvendisease += 'herpes; '
-	if npc_syth['<<$looking>>'] > 0: $npcvendisease += 'syphilis; '
-	if npc_gon['<<$looking>>'] > 0: $npcvendisease += 'gonorrhea; '
-	if npc_thrush['<<$looking>>'] > 0: $npcvendisease += 'yeast infection; '
-	if $npcvendisease = '': $npcvendisease = 'none'
-	'Veneral diseases: <<$npcvendisease>>'
-	'Sexual acts with PC: <<npc_sex[''$looking'']>>'
-	'Perversion: <<npc_perv[''$looking'']>>'
-	'Notes: <<$npc_notes[''<<$looking>>'']>>'
-	''
-	'Found relationships:'
-	npctemp = 0
-	:relationshipfinder
-		gs 'DNA','relate', $npc_dna['<<$looking>>'], $npc_dna['A<<npctemp>>']
-		if $gen_relationship ! '' and 'A<<npctemp>>' ! '<<$looking>>':
-			'<br>ID: A<<npctemp>>'
-			'DNA string: <<$npc_dna[''A<<npctemp>>'']>>'
-			'Name: <<$npc_firstname[''A<<npctemp>>'']>> "<<$npc_nickname[''A<<npctemp>>'']>>" <<$npc_lastname[''A<<npctemp>>'']>> (<<$npc_usedname[''A<<npctemp>>'']>>)'
-			'Relationship type: <<$gen_relationship>>'
-		end
-	if npctemp < aarraynumber: npctemp += 1 & jump 'relationshipfinder'
-	killvar 'npctemp'
-	killvar 'npcvendisease'
-	killvar 'looking'
-end

locations/NikoEv.qsrc

@@ -140,94 +140,96 @@ if $ARGS[0] = 'Lunch Chat':
 		end	
 	end	
 	
-	if NikoLuv > -4 and NikoVolkovQW = 0 and NikoPayback = 0:
-		act 'Insult':	
-			*clr & cla	
-			npc_rel['A189'] -= 5
-			NikoLuv -= 1
-			minut += 5
-			gs'stat'
-			'<center><img <<$set_imgh>> src="images/pc/reactions/fuckoff1.jpg"></center>'
-			'You extend your middle finger at Niko as you walk past him. "Get lost loser." Niko turns his head as he responds. "Am I not worthy?" You continue to walk past him until you reach the hallway.'
-			
-			act 'Go to class':gt 'gschool_lessons', 'short_break'
+	if NikoIntro > -1:
+		if NikoLuv > -4 and NikoVolkovQW = 0 and NikoPayback = 0:
+			act 'Insult':	
+				*clr & cla	
+				npc_rel['A189'] -= 5
+				NikoLuv -= 1
+				minut += 5
+				gs'stat'
+				'<center><img <<$set_imgh>> src="images/pc/reactions/fuckoff1.jpg"></center>'
+				'You extend your middle finger at Niko as you walk past him. "Get lost loser." Niko turns his head as he responds. "Am I not worthy?" You continue to walk past him until you reach the hallway.'
+				
+				act 'Go to class':gt 'gschool_lessons', 'short_break'
+			end	
 		end	
-	end	
-	
-	if NikoPayback = 2 and NikoPayed ! daystart:
-		act 'Money (200 <b>₽</b>)':	
-			*clr & cla
-			money -= 200
-			NikoPayed = daystart
-			minut += 5
-			gs'stat'
-			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
-			'"I have your money right here." You extend your hand, giving Niko (200 <b>₽</b>). Niko quickly counts it then gives you an approving nod, "it''s all here. Good, you''re all payed up for today, you can get going now."'	
-			
-			act 'Walk away':gt 'gschool_lunch', 'break'
-		end
 		
-		act 'Sex':	
-			*clr & cla
-			NikoPayed = daystart
-			minut += 5
-			gs'stat'
-			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
-			'You cast your eyes down as you reply, "You can use my body as payment." Niko''s eyes light up, "I was hoping you''d say that. Let''s not waste time." Niko grabs your ass firmly while leading you to the less used restroom.'	
+		if NikoPayback = 2 and NikoPayed ! daystart:
+			act 'Money (200 <b>₽</b>)':	
+				*clr & cla
+				money -= 200
+				NikoPayed = daystart
+				minut += 5
+				gs'stat'
+				'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
+				'"I have your money right here." You extend your hand, giving Niko (200 <b>₽</b>). Niko quickly counts it then gives you an approving nod, "it''s all here. Good, you''re all payed up for today, you can get going now."'	
+				
+				act 'Walk away':gt 'gschool_lunch', 'break'
+			end
+			
+			act 'Sex':	
+				*clr & cla
+				NikoPayed = daystart
+				minut += 5
+				gs'stat'
+				'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
+				'You cast your eyes down as you reply, "You can use my body as payment." Niko''s eyes light up, "I was hoping you''d say that. Let''s not waste time." Niko grabs your ass firmly while leading you to the less used restroom.'	
 
-			act 'Head to the restroom with Niko':gt 'NikoPayback', 'Payback 3'
+				act 'Head to the restroom with Niko':gt 'NikoPayback', 'Payback 3'
+			end	
+			
+		elseif NikoPayback = 2 and NikoPayed = daystart and NikoPayback_Sex ! daystart:	
+			act 'Offer Niko sex':	
+				*clr & cla
+				NikoPayback_Sex = daystart
+				minut += 5
+				gs'stat'
+				'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/smile'+rand(2,3)+'.jpg"></center>'
+				'You walk up to Niko and place your hand on his crotch, "I know that I already payed you in money, but I want to give you another special payment." Niko''s eyes light up, "Well, there''s no way, I''d say no to that. Let''s get going." Niko gives your ass a firm smack as you both head toward the less used restroom.'	
+
+				act 'Head to the restroom with Niko':gt 'NikoPayback', 'Payback 3'
+			end
 		end	
 		
-	elseif NikoPayback = 2 and NikoPayed = daystart and NikoPayback_Sex ! daystart:	
-		act 'Offer Niko sex':	
-			*clr & cla
-			NikoPayback_Sex = daystart
-			minut += 5
-			gs'stat'
-			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/smile'+rand(2,3)+'.jpg"></center>'
-			'You walk up to Niko and place your hand on his crotch, "I know that I already payed you in money, but I want to give you another special payment." Niko''s eyes light up, "Well, there''s no way, I''d say no to that. Let''s get going." Niko gives your ass a firm smack as you both head toward the less used restroom.'	
-
-			act 'Head to the restroom with Niko':gt 'NikoPayback', 'Payback 3'
-		end
-	end	
-	
-	if NikoPayback = 2 and NikoPayed = daystart:
-		act 'Chat':	
-			*clr & cla
-			minut += 10
-			gs'stat'
-			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
-			'You reply, "I just want to talk. Is that alright?" Niko shrugs as he replies, "Sounds fine with me, I have some spare time." You and Niko spend the next few minutes, chatting about various topics.'
+		if (NikoPayback = 2 or NikoIntro = -1) and NikoPayed = daystart:
+			act 'Chat':	
+				*clr & cla
+				minut += 10
+				gs'stat'
+				'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikomisc/avatars/<<week>>.jpg"></center>'
+				'You reply, "I just want to talk. Is that alright?" Niko shrugs as he replies, "Sounds fine with me, I have some spare time." You and Niko spend the next few minutes, chatting about various topics.'
 
-			act 'Go to class':gt 'gschool_lessons', 'short_break'
+				act 'Go to class':gt 'gschool_lessons', 'short_break'
+			end	
 		end	
-	end	
-	
-	if NikoVolkovQW = 5 and NikoEv = 9:
-		act '<font color=#FF00FF><b>Special Activity</b></font>':	
-			*clr & cla
-			gs'stat'
-			'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/avatars/<<week>>.jpg"></center>'
-			'You sit down next to Niko, "Hello Niko, I remember you telling me something about a special activity that you have planned." Niko grins as he replies, "I have something special for us today. Are you ready to find out what it is?" You suddenly feel a cold chill down your spine as he says that. '+$OpenInnerThought+'Why do I feel so nervous? I can''t shake the feeling that something bad is going to happen.</font>'
-			
-			act '<font color=#FF00FF>Go with Niko</font>':
-				if soniaPS = 0:
-					gt 'NikoDates', 'Sonia Block'
-				else
-					gt 'NikoWhore', 'Locker Room'
+		
+		if NikoVolkovQW = 5 and NikoEv = 9:
+			act '<font color=#FF00FF><b>Special Activity</b></font>':	
+				*clr & cla
+				gs'stat'
+				'<center><b><h4><font color=#E400FF><<"Nikolai [Niko] Volkov">></font></h4></b></center>'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/niko/nikoev/avatars/<<week>>.jpg"></center>'
+				'You sit down next to Niko, "Hello Niko, I remember you telling me something about a special activity that you have planned." Niko grins as he replies, "I have something special for us today. Are you ready to find out what it is?" You suddenly feel a cold chill down your spine as he says that. '+$OpenInnerThought+'Why do I feel so nervous? I can''t shake the feeling that something bad is going to happen.</font>'
+				
+				act '<font color=#FF00FF>Go with Niko</font>':
+					if soniaPS = 0:
+						gt 'NikoDates', 'Sonia Block'
+					else
+						gt 'NikoWhore', 'Locker Room'
+					end	
 				end	
-			end	
 
-			act 'Maybe later':gt 'NikoEv', 'Lunch Chat'
+				act 'Maybe later':gt 'NikoEv', 'Lunch Chat'
+			end
 		end
-	end	
+	end
 	
-	if NikoLuv <= -2 and NikoPayback = 0:
+	if NikoLuv <= -2 and NikoPayback = 0 and NikoIntro > -1:
 		act 'Walk away':	
 			*clr & cla
 			gs'stat'
@@ -246,7 +248,7 @@ if $ARGS[0] = 'Lunch Chat':
 		
 	elseif NikoPayback = 2 and NikoPayed = daystart:
 		act 'Walk away':gt 'gschool_lessons', 'short_break'
-	elseif NikoPayback = 0:
+	elseif NikoPayback = 0 and NikoIntro > -1:
 		act 'Leave':
 			*clr & cla
 			gs'stat'
@@ -256,7 +258,7 @@ if $ARGS[0] = 'Lunch Chat':
 					
 			act 'Go to class':gt 'gschool_lessons', 'short_break'
 		end
-	elseif NikoPayback = 3:
+	elseif NikoPayback = 3 or NikoIntro = -1:
 		act 'Walk away':gt 'gschool_lessons', 'short_break'	
 	end
 end

locations/_attributes_coco_outfits.qsrc

@@ -999,7 +999,7 @@ elseif ARGS[1] = 158:
 	CloQuality = 5
 	CloThinness = 4
 	CloTopCut = 4
-	CloPantsShortness = 5
+	CloSkirtShortness = 5
 	CloStyle = 4
 	
 elseif ARGS[1] = 159:

locations/_attributes_danilovich_coats.qsrc

@@ -45,7 +45,7 @@ elseif ARGS[1] = 8:
 elseif ARGS[1] = 9:
 	CoatQuality = 5
     CoatWarm = 3
-	$coat_description = 'Great: A very decent quality sports coat in the color bone.'
+	$coat_description = 'Great: A very decent quality, ivory coloured sports coat.'
 	
 elseif ARGS[1] = 10:
 	CoatQuality = 5

locations/_attributes_moncheri_bodysuit.qsrc

@@ -30,8 +30,8 @@ elseif ARGS[1] = 2:
 	BraThinness = 5
 	BraCover = 3
 	PanThinness = 5
-	PanCoverFront = 3
-	PanCoverBack = 3
+	PanCoverFront = 1
+	PanCoverBack = 2
 
 elseif ARGS[1] = 3:
 	BraType = 4
@@ -41,8 +41,8 @@ elseif ARGS[1] = 3:
 	BraThinness = 5
 	BraCover = 3
 	PanThinness = 5
-	PanCoverFront = 3
-	PanCoverBack = 3
+	PanCoverFront = 2
+	PanCoverBack = 2
 
 elseif ARGS[1] = 4:
 	BraType = 6
@@ -52,8 +52,8 @@ elseif ARGS[1] = 4:
 	BraThinness = 5
 	BraCover = 3
 	PanThinness = 5
-	PanCoverFront = 3
-	PanCoverBack = 3
+	PanCoverFront = 1
+	PanCoverBack = 1
 
 elseif ARGS[1] = 5:
 	BraType = 7
@@ -511,11 +511,11 @@ elseif ARGS[1] = 46:
 	BraMaterial = 6
 	BraFun = 1
 	BraQuality = 6
-	BraThinness = 6
+	BraThinness = 5
 	BraCover = 3
-	PanThinness = 6
-	PanCoverFront = 3
-	PanCoverBack = 3
+	PanThinness = 4
+	PanCoverFront = 1
+	PanCoverBack = 1
 
 elseif ARGS[1] = 47:
 	BraType = 7

locations/_attributes_salacious_outfits.qsrc

@@ -24,10 +24,12 @@ elseif ARGS[1] = 3:
 	CloQuality = 4
 	CloThinness = 6
 	CloTopCut = 1
-	CloPantsShortness = 1
+	CloSkirtShortness = 6
+	CloDress = 1
 	CloStyle = 4
 	CloCoverTop = 3
-	CloCoverfront = 2
+	CloCoverfront = 3
+	CloCoverBack = 3
 
 elseif ARGS[1] = 4:
 	CloQuality = 3

locations/_attributes_scandalicious_dress.qsrc

@@ -1128,7 +1128,7 @@ elseif ARGS[1] = 149:
 	CloSkirtShortness = 6
 	CloBimbo = 1
 	
-elseif ARGS[1] = 100:
+elseif ARGS[1] = 150:
 	CloQuality = 3
 	CloThinness = 4
 	CloBra = 1

locations/abduction.qsrc

@@ -66,7 +66,7 @@ if $ARGS[0] = 'abdRoomFirstChaining':
 	deodorant = 0
 
 	tabletkishot = rand(84,91)
-	shotdays = 84
+	shotdays = 93
 	tabletkicheck = 2
 	pillcon = 40000
 

locations/albina_chat.qsrc

@@ -661,7 +661,7 @@ if $ARGS[0] = 'bj_fav':
 		act 'I do it for my boyfriend':
 			cla & *nl
 			'"I like making my boyfriend feel good," you smile. "He likes it, so I like it."'
-			'"Oh puh-leez," Albina rolls her eyes. "If I knew you were going to talk about romantic bullshit like that, I woudln''t have asked. Romance is for old decrepit fucks."'
+			'"Oh puh-leez," Albina rolls her eyes. "If I knew you were going to talk about romantic bullshit like that, I wouldn''t have asked. Romance is for decrepit old fucks."'
 			'Her words come across sharp, but you can see the twinkle in her eye that lets you know she''s just kidding.'
 			'"But seriously. Don''t you ever get tired of swallowing?"'
 			gs 'albina_chat','spit_or_swallow'

locations/albina_election_events.qsrc

@@ -82,7 +82,7 @@ if $ARGS[0] = 'din_zajava_albfather':
 				*nl
 				'You look down at your phone and see that she hung up. Despite Chernov''s promise, it feels like you sold Albina out. Yet, just before she hung up, it sounded like she might have been... <i>happy?</i>'
 				'Did she <i>want</i> you to tell Chernov everything? The whole encounter has left you feeling bewildered and confused.'
-				act 'Leave':gt 'pav_commercial'
+				act 'Leave':gt 'pav_residential'
 			end
 		end
 	end
@@ -141,7 +141,7 @@ if $ARGS[0] = 'din_zajava_albfather_no2':
 			*nl
 			'You look down at your phone and see that she hung up. Despite Chernov''s promise, it feels like you were about to sell Albina out. Yet, just before she hung up, it sounded like she might have been... disappointed?'
 			'Did she <i>want</i> you to tell Chernov? The whole encounter has left you feeling bewildered and confused.'
-			act 'Leave':gt 'pav_commercial'
+			act 'Leave':gt 'pav_residential'
 		end
 	end
 end

locations/albina_house_events.qsrc

@@ -21,8 +21,8 @@ if $ARGS[0] = 'first_visit':
 	AlbinaQW['albride'] = 2
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/livingroom.jpg"></center>'
 	'Albina leads you to the rather well furnished and decorated sitting room. "You''ll have to excuse the mess. The maid was... loyal to my father, so she had to go." She then disappears into the kitchen. While she is gone, her phone vibrates on the table. You look and see that "Mama" is trying to call her.'
-	'<i>Strange. She''s never mentioned her mother. Hell, she barely talks about her father,</i> you think to yourself.'
-	'The phone rings out as Albina returns with a bottle of wine and two glasses. She places them on the table and notices her missed call. She quickly picks her phone up and types a message before stuffing it in her pocket.'
+	'<i>"Strange. She''s never mentioned her mother. Hell, she barely talks about her father,"</i> you think to yourself.'
+	'The phone rings out as Albina returns with a bottle of wine and two glasses and places them on the table. Noticing her missed call, she quickly picks her phone up and types a message before stuffing it in her pocket.'
 	act 'Continue':
 		*clr & cla
 		minut += 15
@@ -95,9 +95,9 @@ if $ARGS[0] = 'first_visit2':
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/comfort.jpg"></center>'
 	'Eventually Albina''s body stops shuddering and she pulls back. Her eyes are bloodshot and the fierce sobs that coursed through her have been reduced to small hiccuping gasps.'
-	'"My mama is coming home you know," she whispers with a small smile. She glances up at you with eyes that look like they could burst in to tears again at any moment, but this time with joy. "All these years after he chased her away... She''s going to come home. She''s going to come back to me! <i>For</i> me!" She is practically beaming.'
+	'"My mama is coming home you know," she whispers with a small smile. She glances up at you with eyes that look like they could burst into tears again at any moment, but this time with joy. "All these years after he chased her away... She''s going to come home. She''s going to come back to me! <i>For</i> me!" She is practically beaming.'
 	'"You really miss her, don''t you?"'
-	'Instead of answering you, she lunges forward and presses her lips against yours, forcing her tongue between them.'
+	'Instead of answering you, she leans forward and presses her lips against yours, forcing her tongue between them.'
 	gs 'willpower', 'kiss', 'resist', 'medium'
 	gs 'arousal', 'kiss', -5
 	if will_cost <= pcs_willpwr:
@@ -108,7 +108,7 @@ if $ARGS[0] = 'first_visit2':
 			gs 'willpower', 'pay', 'resist'
 			gs 'drugs', 'alcohol', 'wine'
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinahome1.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/livingroom.jpg"></center>'
 			'You jump back in fright, breaking the kiss and nearly falling off the sofa. In turn, Albina jumps back from you, looking distraught.'
 			'"I''m sorry <<$pcs_nickname>>! I-! I shouldn''t have... I don''t know what came over me! I... I''m sorry," she repeats. "You should go... I don''t want to..."'
 			act 'Do as she suggests':
@@ -123,21 +123,21 @@ if $ARGS[0] = 'first_visit2':
 				'"No, it''s okay," you shake your head. "I was just... surprised. I didn''t mean to react that way."'
 				'"You should go..." she says again, her voice flat.'
 				'"No, I''m not leaving you like this. If you want, I could just sit here and we could chat for a while?"'
-				'Raising her head, Albina looks at you with a sad smile. "I''d like that."'
+				'Raising her head, she looks at you with a sad smile. "I''d like that."'
 				*nl
 				act 'Continue':
 					cla & *clr
 					minut += 60
 					npc_rel['A23'] += 10
 					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinahome1.jpg"></center>'
+					'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/livingroom.jpg"></center>'
 					'You sit by her side as she begins to tell you everything about herself that was once hidden from you. How her father never wanted children. How he abused her mother because of her birth. The way he chased her mother away and then blamed Albina for it after. Many of her rapes, described in graphic, painful detail. How she seeks comfort from women because of the abuse she''s endured at the hands of men. And finally, how she gathered evidence for years before submitting it to the police and having him arrested. You do nothing but sit and nod along the entire time, listening intently.'
 					*nl
 					'At the end of an hour, it seems a weight has been lifted from her shoulders and she has <i>slightly</i> sobered up.'
 					'"I''ve never told anyone that before," she says. "You... you really don''t think worse of me?"'
 					act 'No I don''t':
 						cla & *clr
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinahome.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinahome.jpg"></center>'
 						'"No," you shake your head. "I don''t. I think you''re one of the bravest people I''ve ever met."'
 						'Your friend truly comforted, you finally collect your things and bid her farewell. She takes you to the door and as you walk down the driveway, both of you waving goodbye, you think you catch sight of the first genuine smile you''ve ever seen on Albina''s face.'
 						act 'Leave':gt 'pav_residential'
@@ -244,7 +244,7 @@ if $ARGS[0] = 'first_sex':
 					'"Thanks <<$pcs_nickname>>. It was nice to let it all out... and I''m not just talking about my feelings..." she says, expression turning mischevious again. "Thanks for being a good friend."' 
 					act 'Get dressed':
 						cla & *clr
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/albinahome.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/albinahome.jpg"></center>'
 						'Albina helps you clean up before you get dressed and you finally collect your things, preparing to bid her farewell. She forgos her clothes, choosing to walk you to the door instead. As you walk down the driveway, you turn and see her, standing naked in the doorway waving you goodbye and you think you catch sight of the first genuine smile you''ve ever seen on Albina''s face.'
 						act 'Leave':gt 'pav_residential'
 					end
@@ -950,7 +950,7 @@ if $ARGS[0] = 'night_stand':
 			*clr & cla
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/nushdrawer.jpg"></center>'
 			'You jump on the spot and slam the drawer closed before turning to face a rather annoyed looking Albina.'
-            '"Do you mind <i>not</i> going through my personal things when I''m not here? I wouldn''t do it to you, so I don''t appeciate you doing it to me."'
+            '"Do you mind <i>not</i> going through my personal things when I''m not here? I wouldn''t do it to you, so I don''t appreciate you doing it to me."'
             'You gingerly nod your head at her in reply.'
 			act 'Close the drawer':gt 'albinahome','bedroom'
 		end
@@ -960,7 +960,7 @@ if $ARGS[0] = 'night_stand':
 		minut += 2
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/anushroom/nushdrawer.jpg"></center>'
-		'Albina excuses herself and leaves the room. You grow bored waiting and decide to have a quick snoop around before she returns, opening the drawer of her nightstand to have a peek. You find a hairbrush, various skin care products, contraceptive pills, bottles of lube, a vibrator, dildos of various sizes and a large butt plug all tossed inside, seemingly without any care. A piece of folded paper hiding underneath the pile catches your eye.' 
+		'Albina excuses herself and leaves the room. You soon grow bored waiting and decide to have a quick snoop around before she returns, opening the drawer of her nightstand to have a peek. You find a hairbrush, various skin care products, contraceptive pills, bottles of lube, a vibrator, dildos of various sizes and a large butt plug all tossed inside, seemingly without any care. A piece of folded paper hiding underneath the pile catches your eye.' 
 		'You glance around, but it looks like Albina is still busy elsewhere, so you fish out the paper and unfold it to find that it''s actually a crumpled photo of a young Albina dancing as her mother proudly watches. You can see why it has sentimental value to Albina, but decide that you''ve invaded her privacy enough, so you carefully place the photo back inside and close the drawer just before Albina returns and smiles at you.'
 		act 'Close the drawer':gt 'albinahome','bedroom'
 	end
@@ -974,7 +974,7 @@ if $ARGS[0] = 'computer':
 		*clr & cla
 		'<center><img <<$set_imgh>>src="images/locations/pavlovsk/resident/albinahome/laptop.jpg"></center>'
 		'You point towards the laptop sitting at the foot of her bed. "I should''ve guessed that you would have something like that."'
-		'"Yeah, I honestly don''t know why I bought it. I sometimes look up workout techniques and sex tips, but I mostly just use it to watch porn when I feel like rubbing one out."'
+		'"Yeah, I honestly don''t know why I bought it. I sometimes look up workout techniques and look at clothes, but I mostly just use it to watch porn when I feel like rubbing one out."'
         'You''re a little surprised that she would admit such a thing to you given how private and guarded she is about herself.'
 	
 		act 'Do something else':gt 'albinahome','bedroom'

locations/albina_school_sex.qsrc

@@ -177,7 +177,7 @@ if $ARGS[0] = 'lunch_fun_1_2':
 							*clr & cla
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/school/classroom/threesome7.jpg"></center>'
 							'Albina pulls her into an embrace as you sit back on the desk alongside them. You sit quietly for a few minutes in post orgasm bliss before Julia suddenly scurries to her feet.'
-							'"Oh no no no! Lunch is almost over! I.. I need to go before Zinadia wonders where I am. I said I would discuss strategies for our game night with her after I finished studying."'
+							'"Oh no no no! Lunch is almost over! I.. I need to go before Zinaida wonders where I am. I said I would discuss strategies for our game night with her after I finished studying."'
 							'You and Albina sit and watch in amusement as Julia frantically picks up her clothes and stumbles around pulling them on as quickly as she can before she picks up her scattered belongings from the floor, stuffs them into her bag and runs out of the room.'
 							'Once she''s gone, the two of you share a laugh at what just happened before you both get dressed yourselves.'
 							'"Well that certainly was fun. I suspected Julia had a thing for me, but I wasn''t expecting her to be so... enthusiastic..." Albina says with a grin as she pulls her skirt back on. "The girl''s got some great tits and an amazing ass. Shame she hangs with those geeks." The bell rings as you finish dressing and you both head out to your next class.'

locations/albina_starlets.qsrc

@@ -335,7 +335,7 @@ if $ARGS[0] = 'starlets':
 							if AlbinaQW['StarletCustomer'] = 1:
 								AlbinaQW['StarletsCustomerCount'] = 1
 								AlbinaQW['StarletPay'] = rand(3,6)
-								'You see a flabby, balding Armenian man in his 50s wearing an expensive suit approach Albina and start talking to her. She avoids eye contact and looks rather uncomfortable talking to him.'
+								'You see a flabby and balding middle aged Armenian man wearing an expensive suit approach Albina and start talking to her. She avoids eye contact and looks rather uncomfortable talking to him.'
 							elseif AlbinaQW['StarletCustomer'] = 2:
 								AlbinaQW['StarletsCustomerCount'] = 2
 								AlbinaQW['StarletPay'] = rand(6,9)
@@ -1494,7 +1494,7 @@ if $ARGS[0] = 'StarletsPracticeMissed':
 		act 'Train with Starlets': gt 'albina_starlets', 'starlets'
 	else
 	  gs 'npc_relationship', 'set', 'A23', 10
-		'You are walk into the hall and freeze when you clock a furious Albina heading straight for you. You barely have time to react before she grabs your shirt and pulls you up close, silencing the hall as everyone looks at you.'
+		'You walk into the hall and freeze when you clock a furious Albina heading straight for you. You barely have time to react before she grabs your shirt and pulls you up close, silencing the hall as everyone looks at you.'
 		'Albina glares directly into your eyes. "ARE YOU DOING THIS TO MOCK ME YOU FUCKING BITCH?! I GAVE YOU ONE. LAST. FUCKING. CHANCE AND YOU THROW IT BACK IN MY FUCKING FACE?!" She releases you, but still gets up in your face. "You''re done. Get the fuck out of here and don''t let me catch you here again, you hear me?!"'
 		'She then crosses her arms and glares at you until you leave. With the other girls staring at you, you shamefully walk out of the hall.'
 		act 'Leave':AlbinaQW['StarletsJoined'] = -1 & gt 'pav_commcenter'

locations/albinahome.qsrc

@@ -398,7 +398,7 @@ if $ARGS[0] = 'game':
 					gs 'willpower', 'pay', 'resist'
 					gs 'stat'
 					'You shake your head. "Not this time."'
-					'She is a little disappointed but turns her attention to the game. "You are so going to lose!" she laughs. You play games for a while, although things are a little awkward between you. Eventually, Albina stops. "Well, I had fun, but there is some stuff I need to take care of," she says as she turns the console off.'
+					'She''s clearly a little disappointed, but turns her attention back to the game. "You''re so going to lose!" she laughs. You play some games for a while, although things are a little awkward between you. Eventually, Albina stops. "Well, I had fun, but there''s some stuff I need to take care of," she says as she turns the console off.'
 					'Getting the hint, you get up as well. "Yeah, I should probably get going myself." You exchange a brief hug before you leave.'
 					act 'Say goodbye and go home':
 						AlbinaQW['visiting'] = 0
@@ -434,7 +434,6 @@ if $ARGS[0] = 'playgame':
 		'She laughs in response. "You''re that sure? So, how about we make it a bit more interesting then?"'
 		'You arch your brow curiously. "What do you have in mind?"'
 		'She grins at you, gets up and walks over to her dresser. She rummages around in it before pulling out a strapon harness with a large black dildo attached. "The winner gets to use this on the loser... However. They. Want," she says with a smirk.'
-
 		gs 'willpower', 'sex', 'resist', 'medium'
 		if will_cost <= pcs_willpwr:
 			act 'Refuse the bet (<<will_cost>> Willpower)':
@@ -479,7 +478,7 @@ if $ARGS[0] = 'game_bet':
 	npc_rel['A23'] += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/albinahome/game.jpg"></center>'
-	'You stare at the size of the attached dildo. It''s almost as long and thick as your forearm. "Where did you get that?!" you laugh. "Whatever, you''re on. You''re so going to get fucked!"'
+	'You smile. "You''re on. You''re so going to get fucked!"'
 	'Albina laughs as she brings the strapon over with a bottle of lube and tosses them on the bed before she lies back beside you and picks her controller up. "Please! You''re so going to lose."' 
 	'She starts the game, and you both fall silent, your focus only on winning.'
 	act 'Play until someone wins':
@@ -504,10 +503,10 @@ if $ARGS[0] = 'game_bet':
 			'It''s close, but in the end, you just manage to win the game. "Yes!" you exclaim triumphantly, and she laughs as she grabs the strapon harness and hands it to you. You both undress, and you grin as you slide the harness on.'
 			act 'Continue': gt 'albinahome', 'wear_strapon'
 		elseif albplay = 1:
-			'Although you try your best, Albina proves a worthy opponent and barely defeats you. Laughing in a mocking and villainous tone, she slaps you on the ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
+			'Although you try your best, Albina proves a worthy opponent and barely defeats you. Laughing in a mocking and villainous tone, she slaps you on the ass. "Show me your ass, <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
 			act 'Get fucked with the strapon': gt 'albinahome', 'receive_strapon'
 		elseif albplay = 0:
-			'Although you try your best, Albina simply outplays you at every turn. You stand no chance, and she easily beats you. Laughing in a mocking and villainous tone, she slaps you on the ass. "Show me your ass <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
+			'Although you try your best, Albina simply outplays you at every turn. You stand no chance, and she easily beats you. Laughing in a mocking and villainous tone, she slaps you on the ass. "Show me your ass, <<$pcs_nickname>>! You''re my bitch now!" You both undress, and Albina slides the harness on with a smirk on her face.'
 			act 'Get fucked with the strapon': gt 'albinahome', 'receive_strapon'
 		end
 		killvar 'gameresult'
@@ -585,7 +584,7 @@ if $ARGS[0] = 'fuck_albina_ass':
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/anal2.jpg"></center>'
 		'"Come on, <<$pcs_nickname>>. Put it back in and fuck me... hard," she says while wiggling her hips. You smile at her and slide the dildo back into her hole with ease, making her moan in pleasure. Next, you grab onto her hips and start fucking her balls deep, filling her ass with the dildo as she reaches back and starts rubbing her clit. After several minutes, you feel her ass tighten around your fake cock. Finally, she cries out as her body is rocked by an intense orgasm and juices squirt from her pussy, soaking the sheets beneath her. You keep fucking her throughout her orgasm, only pulling out once her shudders have passed.'
-		'After you''ve pulled out, she inserts a few fingers into her gaping hole as juices leak from her pussy. "Oh fuck yes, <<$pcs_nickname>>! That was fucking amazing!"'
+		'After you''ve pulled out, she thrusts her fingers into her gaping hole as juices leak from her pussy. "That was fucking amazing!" she says as she pulls her fingers out of her ass and sucks on them.'
 		'"Fucking such a nice-looking ass was amazing!" you reply, and you both laugh.'
 		gs 'arousal', 'anal_strap_give', 5, 'lesbian'
 		gs 'stat'
@@ -596,13 +595,40 @@ end
 if $ARGS[0] = 'receive_strapon':
 	*clr & cla
 	menu_off = 1
-	npc_sex['A23'] += 1
 	lesbian += 1
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/bj.jpg"></center>'
-	'You slide your panties off as she tightens the strapon firmly while standing next to the bed. You lie next to her, and she pulls your head down to the dildo. "Suck my dick, loser!" she says with a giggle.'
-	'You take the dildo into your mouth and start sucking on it while stroking the shaft with one hand. "Yeah, just like that, <<$pcs_nickname>>!" she moans as she reaches between the straps and gently rubs her pussy. You spend several minutes sucking on the dildo, getting it wet with your drool before she pulls it out of your mouth. "I''m so going to enjoy fucking you!"'
-	gs 'arousal', 'foreplay', 5, 'lesbian'
+	if stat['bj'] = 0:
+		stat['bj'] += 1
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/bj.jpg"></center>'
+		'Albina notices you staring at the dildo as she tightens the straps firmly around her hips. "You okay, <<$pcs_nickname>>?"'
+		'"Yeah, it''s just..." you start to answer.'
+		'"You''ve never sucked dick before, have you?" she interrupts with a smile. "It''s okay. I can show you what to do so you''re ready for the real thing." She sits back on the bed and spreads her legs, motioning for you to crawl between them.'
+		'"Okay, first thing''s first. You''ll want to start off with a handjob. It gets them in the mood and wanting more," she explains as she takes your hand and places it on the dildo. "Take a firm grip of the shaft, but not too tight, and start moving your hand up and down."'
+		*nl
+		'You follow her instructions and slowly run your hand up and down the dildo. "That''s it, <<$pcs_nickname>>. Just keep doing that. If you feel like it, you can also lick the shaft or suck on their balls while jerking them off. They like it when you tease them like that."'
+		'After a few minutes, Albina moves on with her lesson. "Okay <<$pcs_nickname>>, you ready?" she asks and you nod your head. "Okay. Start off with a little teasing. Run your tongue around the tip while jerking them off."'
+		'You do as she says and she makes you look up at her. "Eye contact, <<$pcs_nickname>>. They like that." You nod at her and look her in the eye as you continue jerking off her fake cock. "Good. Now some guys like taking control, but only let them do that if it''s what you want. That''s enough teasing anyway. Now I want you take as much of the shaft into your mouth as you can."' 
+		*nl
+		'You obdiently take as much of the dildo into your mouth as you can without choking. "Good," Albina says. "Now start bobbing your head up and down; imagine that you''re sucking on a popsicle while swirling your tongue around the head. And keep using your hand."'
+		'You spend the next few minutes practicing on the dildo until your arm and jaw start to ache and you stop. You pop the dildo out of your mouth and look up at Albina, who smiles. "You''re a natural, <<$pcs_nickname>>! If I had a dick, then my cum would be all over your face by now."'
+		'You smile at the compliment. "Time for me to fuck you now," Albina says with a grin.'
+		gs 'arousal', 'foreplay', 5, 'lesbian'
+		gs 'stat'
+		act 'Continue': gt 'albinahome', 'albina_fucks_you'
+	else
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/bj.jpg"></center>'
+		'You slide your panties off as she tightens the strapon firmly while standing next to the bed. You lie next to her, and she pulls your head down to the dildo. "Suck my dick, loser!" she says with a giggle.'
+		'You take the dildo into your mouth and start sucking on it while stroking the shaft with one hand. "Yeah, just like that, <<$pcs_nickname>>..." she moans as she reaches between the straps and gently rubs her pussy. You spend several minutes sucking on the dildo, getting it wet with your drool before she pulls it out of your mouth. "I''m so going to enjoy fucking you!"'
+		gs 'arousal', 'foreplay', 5, 'lesbian'
+		gs 'stat'
+		act 'Continue': gt 'albinahome', 'albina_fucks_you'
+	end
+end
+
+if $ARGS[0] = 'albina_fucks_you':
+	*clr & cla
+	menu_off = 1
 	gs 'stat'
 	if stat['think_virgin'] = 1:
 		act 'You''re a virgin':
@@ -615,6 +641,8 @@ if $ARGS[0] = 'receive_strapon':
 			act 'Just fuck my ass': gt 'albinahome', 'albina_ass_fucks_you'
 			act 'Get your cherry popped':
 				*clr & cla
+				npc_sex['A23'] += 1
+				lesbian += 1
 				gs 'boyStat', 'D3'
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag1.jpg"></center>'
@@ -638,6 +666,8 @@ if $ARGS[0] = 'receive_strapon':
 	else
 		act 'Get your pussy fucked':
 			*clr & cla
+			npc_sex['A23'] += 1
+			lesbian += 1
 			gs 'boyStat', 'D3'
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/albina/sex/game/getvag1.jpg"></center>'
@@ -686,7 +716,7 @@ if $ARGS[0] = 'albina_ass_fucks_you':
 				*nl
 				'Albina looks at you in what you can only describe as awe. "God damn, <<$pcs_nickname>>, even I''ve never taken a fist up my ass, and I''m the queen of butt stuff!"'
 				'"Is it weird to do that?" you ask with concern.'
-				'"No, not at all! I''ve always wanted to try it, but I''ve never found anyone interested in it. But, maybe that''s about to change..."'
+				'"No, not at all! I''ve always wanted to try it myself. Maybe I will now that I need to up my game."'
 				'She looks you over with lustful desire before continuing. "Practicing with a dildo makes your first butt fuck easier, but a whole fucking hand?! A cock or dildo would be a breeze for you!"'
 				'She then places a hand on your shoulder. "<<$pcs_nickname>>, be honest with me. Do you want me to fuck your ass? I''ll be as gentle as you want."'
 				act 'Yes': gt 'albinahome', 'first_anal1'
@@ -757,7 +787,7 @@ if $ARGS[0] = 'first_anal':
 		'You feel her start slowly pushing, and the pressure builds until the tip of the dildo suddenly pops into your ass, causing you to groan and grit your teeth while gripping the sheets even tighter. It''s a painful sensation, and you instinctively feel the urge to free yourself. "You okay, <<$pcs_nickname>>? I can take it out if you want?" Albina asks as you feel a stinging pain shooting through you.'
 		'Remembering what she said, you fight the urge to pull away and try to relax. "No, I just need a second," you reply as you look back at her, and she nods.'
 		*nl
-		'After a few seconds to adjust to the sensation, you nod at Albina. She squirts more lube onto the slick dildo before placing her hands on your hips. "Okay, just keep your ass relaxed and tell me if it gets too painful. I don''t want you hurting yourself trying to impress me. Got it?"'
+		'After taking a few seconds to adjust to the sensation, you nod at Albina. She squirts more lube onto the slick dildo before placing her hands on your hips. "Okay, just keep your ass relaxed and tell me if it gets too painful. I don''t want you hurting yourself trying to impress me. Got it?"'
 		'You nod and prepare yourself as you feel Albina slowly push the dildo deeper into your ass. You feel stretched out as she reaches a depth she feels you''ll be comfortable with and starts gently thrusting.'
 		'Despite the shallow depth and Albina being gentle, the pain becomes too much after a few minutes, and you ask her to pull out. You sit on your knees and clutch your ass cheeks in your hands as pain pulses through your stretched asshole.'
 		'"You lasted longer than I thought you would. Not bad for your first go, <<$pcs_nickname>>," Albina says as she hands you some wipes to clean yourself up. "Next time you lose, maybe we can go deeper and... harder," she adds with a teasing grin as she cleans the dildo and puts it away.'
@@ -814,7 +844,7 @@ if ARGS[0] = 'anal_refuse':
 	'You shake your head. "No, I don''t think I''m ready for that yet."'
 	'Albina smiles. "That''s okay, but if you want to do it with me or want some advice, then just ask. It''s best to get help from someone with... experience on the matter," she says with a grin.'
 	'You grin back. "I''ll be sure to ask the master buttslut for any of her wisdom."'
-	'She punches you in the arm. "Damn right, you will."'
+	'She punches you in the arm. "Damn right you will."'
 	act 'Do something else' :gt 'albinahome', 'bedroom'
 end
 

locations/anushapt.qsrc

@@ -13,26 +13,18 @@
 !---------------------------------------------
 
 if $ARGS[0] = 'home':
-	$menu_loc = 'anushapt'
-	$menu_arg = 'home'
 	menu_off = 0
 	$track_loop = ''
-	CLOSE ALL
 	if sound = 0:PLAY 'sound/korr.mp3',30
-	$locM_arg = $ARGS[0]
-	$locM = 'anushapt'
-	$loc_arg = $ARGS[0]
-	$loc = 'anushapt'
-	$location_type = 'private'
-	clr
 	popolaini = 0
 	saunaYouRoom = 0
 	boycherdaksex = 0
 	minut += 1
 	bonusZ = 0
-	gs 'stat'
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
+	$location_type = 'private'	
 	gs 'themes', 'indoors'
-
+	gs 'stat'
 	if anushkaQW['home_day'] ! daystart:
 		anushkaQW['home_day'] = daystart
 		AnushkaLoc = 0
@@ -292,14 +284,12 @@ if $ARGS[0] = 'home':
 end
 
 if $ARGS[0] = 'hallway':
-	$menu_loc = 'anushapt'
-	$menu_arg = 'hallway'
+	*clr & cla
 	menu_off = 0
 	killvar '$locclass'
-	CLOSE ALL
 	if sound = 0:PLAY 'sound/korr.mp3',30
-	$location_type = 'indoors'
-	*clr & cla
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
+	$location_type = 'indoors'	
 	minut += 1
 	gs 'stat'
 	'<center><h4><font color="maroon">Entrance hall</font></h4></center>'
@@ -332,18 +322,13 @@ if $ARGS[0] = 'hallway':
 end
 
 if $ARGS[0] = 'bathroom':
-	CLOSE ALL
-	$menu_loc = 'anushapt'
-	$menu_arg = 'bathroom'
-	$loc_arg = 'bathroom'
-	$loc = 'anushapt'
-	$locM_arg = 'bathroom'
-	$locM = 'anushapt'
 	menu_off = 0
 	*clr & cla
 	minut += 1
-	gs 'stat'
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
 	$location_type = 'bathroom'
+	gs 'stat'
+	
 	'<center><h4><font color="maroon">Bathroom</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/bathroom.jpg"></center>'
 	'The bathroom has seen better days. It looks like it hasn''t been cleaned for quite some time, with mold growing in the corners of the walls and floor.'
@@ -430,14 +415,11 @@ end
 
 if $ARGS[0] = 'nushshower':
 	menu_off = 1
-	CLOSE ALL
 	*clr & cla
-	$loc_arg = 'bathroom'
-	$loc = 'anushapt'
-	$locM_arg = 'bathroom'
-	$locM = 'anushapt'
-	gs 'stat'
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
 	$location_type = 'bathroom'
+	gs 'stat'
+	
 	AnushkaLoc = 7
 	'<center><h4><font color="maroon">Bathroom</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/bathroom/dry1.jpg"></center>'
@@ -733,16 +715,14 @@ if $ARGS[0] = 'snack':
 end
 
 if $ARGS[0] = 'livingroom':
-	$menu_loc = 'anushapt'
-	$menu_arg = 'livingroom'
 	menu_off = 0
-	CLOSE ALL
 	*clr & cla
 	if livingev_day ! daystart:
 		livingev = rand (1, 5)
 	else
 		livingev = 0
 	end
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
 	$locclass = 'livingr'
 	minut += 1
 	gs 'stat'
@@ -1056,12 +1036,7 @@ if $ARGS[0] = 'livingroom':
 end
 
 if $ARGS[0] = 'kitchen':
-	$loc = 'anushapt'
-	$loc_arg = 'kitchen'
-	$menu_loc = 'anushapt'
-	$menu_arg = 'kitchen'
 	menu_off = 0
-	CLOSE ALL
 	*clr & cla
 	if kitchenev_day ! daystart:
 		kitchenev = rand (1, 5)
@@ -1069,6 +1044,7 @@ if $ARGS[0] = 'kitchen':
 		kitchenev = 0
 	end
 	minut += 1
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
 	$locclass = 'kitr'
 	gs 'stat'
 	gs 'kit_din'
@@ -1210,11 +1186,10 @@ if $ARGS[0] = 'fridge':
 end
 
 if $ARGS[0] = 'anushparents':
-	$menu_loc = 'anushapt'
-	$menu_arg = 'anushparents'
 	menu_off = 0
-	CLOSE ALL
+
 	*clr & cla
+	gs 'shortgs', 'setloc', 'anushapt', $ARGS[0]
 	minut += 1
 	gs 'stat'
 	'<center><b><font color = maroon>Anushka''s parent''s room</font></b></center>'

locations/anushka.qsrc

@@ -331,7 +331,7 @@ if $ARGS[0] = 'wedgie fight':
 									gt 'anushapt', 'livingroom'
 								else
 									AnushkaLoc = 2
-									gt 'anushapt', 'anushroom'
+									gt 'anush_bedroom', 'anushroom'
 								end
 							end
 						end

locations/anushkachat.qsrc

@@ -520,14 +520,21 @@ if $ARGS[0] = 'chat':
 		end
 	end
 	if artemQW['nush3some_ask'] = 2:
-		act 'Talk about Artem 3some':
+		act 'Talk about Artem threesome':
 			*clr & cla
 			minut += 5
-			artemQW['nush3some'] += 1
 			'<center><h4><font color="maroon">Anushka''s Room</font></h4></center>'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/bedroom/bedroomtalk.jpg"></center>'
-			'You glance over to her. "Well, I talked to Artem about a threesome and... he''s up for it."'
-			'Anushka giggles. "Of course he is. Boys are so predictable." You briefly consider telling her how the conversation really went, but decide against it. She might tease Artem about it and you would like your boyfriend and friend get along. Instead you just agree and the two of you start talking about possible days and times you can do it.'
+			if artemQW['nush3some'] = 0:
+				artemQW['nush3some'] = 1
+				'You glance over at her. "I talked to Artem about a threesome and... he''s up for it."'
+				'Anushka giggles. "Of course he is. Boys are so predictable." You briefly consider telling her how the conversation really went, but decide against it. She might tease Artem about it and you would like your boyfriend and friend get along, so you just agree with her and the two of you start talking about possible days and times.'
+			else
+				'You glance over at her. "I''ve been thinking. Are you sure you''re up for a threesome with Artem?"'
+				'She give you a puzzled stare. "Are you changing your mind or something?"'
+				'You shake your head. "No, just making sure you haven''t is all."'
+				'She gives you a strange look and shakes her head slightly. "Whatever. Just call me when you guys want to do it and I''ll swing by if I''m not busy." You briefly consider telling her how the conversation really went, but decide against it. She might tease Artem about it and you would like your boyfriend and friend get along, so you just agree with her and the two of you start talking about possible days and times.'
+			end
 			act 'Stop talking': gt 'anush_bedroom','anushroom'
 			act 'Keep talking': gt 'anushkachat', 'chat'
 		end
@@ -542,15 +549,15 @@ if $ARGS[0] = 'photo_chat':
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/bedroom/bedroomtalk.jpg"></center>'
 	'You climb off the bed and grab your camera from your purse. "Hey, do you mind if I take your photo for my portfolio?" you ask.'
 	'She grins and lies back, stretching in a suggestive way. "You want me to model for you?"'
-	'You can''t help but grin at her antics. "Yes, will you model or me? I need the practice and I think you would make a great model."'
+	'You can''t help but grin at her antics. "Yes. I need the practice and I think you would make a great model."'
 	'She giggles. "Sure, but only if you send me copies for my modelling portfolio."'
 	if anushkaQW['model'] >= 1:
 		'You nod. "Deal."'
 	else
 		anushkaQW['model'] = 1
-		'You do a bit of a double take. "Wait what? Your modelling portfolio?"'
-		'She giggles at your reaction. "Yeah, I model at the Aphrodite Photography Agency, in the city."'
-		'You''re a little surprised, not that she models, but that you hadn''t heard about it yet. "Oh. Uh yeah, sure I can do that."'
+		'You do a bit of a double take. "Wait, what? Your modelling portfolio?"'
+		'She giggles at your reaction. "Yeah, I model at a place called Aphrodite in the city."'
+		'You''re a little surprised that you hadn''t heard about this until now. "Oh. Uh yeah, sure I can do that."'
 	end
 	act 'Take out your camera':
 		cla & *clr

locations/artem_date_events.qsrc

@@ -544,7 +544,7 @@ if $ARGS[0] = 'gang_rape':
 		gs 'stat'
 		act 'The nightmare begins':
 			*clr & cla
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rape1.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rape1.jpg"></center>'
 			'Two of them hold you down while one pulls his dick out, shoves it in your pussy and starts hammering away, not caring if you enjoy it or not. The more you struggle or cry out, the more they seem to enjoy it.'
 			gs 'pain', 2, 'wrists', 'bind'
 			gs 'boystat', $boy1
@@ -553,7 +553,7 @@ if $ARGS[0] = 'gang_rape':
 			gs 'stat'
 			act 'Continue':
 				*clr & cla
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rape2.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rape2.jpg"></center>'
 				'The one watching takes his turn and forces his dick inside you while the first one just watches as he jerks off.'
 				gs 'pain', 2, 'wrists', 'bind'
 				gs 'boystat', $boy2
@@ -562,7 +562,7 @@ if $ARGS[0] = 'gang_rape':
 				gs 'stat'
 				act 'Continue':
 					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rape3.jpg"></center>'
+					'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rape3.jpg"></center>'
 					'"Alright, my turn," the leader says. "Roll her over onto her hands and knees." You''re roughly forced into a kneeling position on the nasty old mattress, with your face forced against it. You feel someone spit on your asshole before a dick is shoved inside, causing you to cry out in pain as he starts pounding you balls deep. "Much tighter than that gaping pussy after you guys ripped it up!" He laughs and the others join in.'
 					gs 'pain', 2, 'wrists', 'bind'
 					gs 'boystat', $boy3
@@ -571,7 +571,7 @@ if $ARGS[0] = 'gang_rape':
 					gs 'stat'
 					act 'Two at a time':
 						*clr & cla
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rape4.jpg"></center>'
+						'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rape4.jpg"></center>'
 						'The leader pulls out of your ass and lies in front of you on his side as someone else starts roughly fucking your ass. Once he''s next to your head, the leader shoves his dick in your mouth and makes you suck his dick as the other three take turns fucking your ass. You soon feel one of them cumming in your ass as another speaks up. "Come on, she has other holes! I''m tired of waiting!"'
 						gs 'pain', 2, 'wrists', 'bind'
 						gs 'pain', 6, 'jaw', 'ache'
@@ -584,7 +584,7 @@ if $ARGS[0] = 'gang_rape':
 						gs 'stat'
 						act 'Continue':
 							*clr & cla
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rape5.jpg"></center>'
+							'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rape5.jpg"></center>'
 							'With that, one of them lies down on the mattress and they force you to straddle and mount him, his cock sliding into your battered pussy as another cock is shoved into your mouth and a third back in your ass. The ones who were on watch come over to take their turns as you feel one of them cumming in your pussy.'
 							gs 'pain', 2, 'wrists', 'bind'
 							gs 'pain', 6, 'jaw', 'ache'
@@ -599,7 +599,7 @@ if $ARGS[0] = 'gang_rape':
 							gs 'stat'
 							act 'Continue':
 								*clr & cla
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rapecum1.jpg"></center>'
+								'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rapecum1.jpg"></center>'
 								'The remaining ones take turns fucking all three of your holes so much that you lose count as two of them cum inside you. When they pull out, you feel the cum leaking out of both of your holes as one of the other guys cums in your mouth.'
 								gs 'pain', 2, 'wrists', 'bind'
 								gs 'pain', 6, 'jaw', 'ache'
@@ -616,7 +616,7 @@ if $ARGS[0] = 'gang_rape':
 								gs 'stat'
 								act 'Last one':
 									*clr & cla
-									'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/artem/sex/park/rapecum2.jpg"></center>'
+									'<center><img <<$set_imgh>> src="images/shared/sex/rape/park_rapecum2.jpg"></center>'
 									'The last one starts fucking your throat. Before too long, he starts cumming as well, holding your mouth open with one hand as he jerks off with the other, milking every last drop of cum into your mouth.'
 									gs 'pain', 2, 'wrists', 'bind'
 									gs 'pain', 6, 'jaw', 'ache'

locations/artemhome.qsrc

@@ -34,25 +34,21 @@
 !---------------------------------------------
 
 if $ARGS[0] = 'home':
-	$menu_loc = 'artemhome'
-	$menu_arg = 'home'
+	clr
 	menu_off = 0
 	$track_loop = ''
 	CLOSE ALL
 	if sound = 0:PLAY 'sound/korr.mp3',30
-	$locM_arg = 'home'
-	$locM = 'artemhome'
-	$loc_arg = 'home'
-	$loc = 'artemhome'
+	gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]
 	$location_type = 'private'
-	clr
+	gs 'themes', 'indoors'		
 	popolaini = 0
 	saunaYouRoom = 0
 	boycherdaksex = 0
 	minut += 1
 	bonusZ = 0
 	gs 'stat'
-	gs 'themes', 'indoors'
+	
 	
 !! Artem''s location, he is out on Wednesday from 15-22
 	if week = 3 and hour >= 15 and hour < 22:
@@ -173,19 +169,13 @@ if $ARGS[0] = 'home':
 end
 
 if $ARGS[0] = 'hallway':
-	$menu_loc = 'artemhome'
-	$menu_arg = 'hallway'
 	menu_off = 0
 	killvar '$locclass'
 	CLOSE ALL
 	if sound = 0:PLAY 'sound/korr.mp3',30
-	$location_type = 'indoors'
-	$locM_arg = 'hallway'
-	$locM = 'artemhome'
-	$loc_arg = 'hallway'
-	$loc = 'artemhome'
 	*clr & cla
 	minut += 1
+	gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]	
 	gs 'stat'
 	'<center><h4><font color="maroon">Entrance hall</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/artemhome/hall.jpg"></center>'
@@ -212,18 +202,14 @@ end
 
 if $ARGS[0] = 'bathroom':
 	CLOSE ALL
-	$menu_loc = 'artemhome'
-	$menu_arg = 'bathroom'
-	$loc_arg = 'bathroom'
-	$loc = 'artemhome'
-	$locM_arg = 'bathroom'
-	$locM = 'artemhome'
+	
 	if ArtemLoc ! 3:
 		menu_off = 0
 		*clr & cla
-		minut += 1
-		gs 'stat'
+		minut += 1		
+		gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]
 		$location_type = 'bathroom'
+		gs 'stat'
 		'<center><h4><font color="maroon">Bathroom</font></h4></center>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/artemhome/bathroom.jpg"></center>'
 		'The first thing you notice are the god awful green tiles with matching sink in the bathroom. You don''t know who picked it, but they obviously don''t have good taste. Other than that, it''s a fairly typical bathroom.'
@@ -270,19 +256,14 @@ if $ARGS[0] = 'bathroom':
 end
 
 if $ARGS[0] = 'artemroom':
-	$menu_loc = 'artemhome'
-	$menu_arg = 'artemroom'
-	$locM_arg = 'artemroom'
-	$locM = 'artemhome'
-	$loc_arg = 'artemroom'
-	$loc = 'artemhome'
-	menu_off = 0
-	$locclass = 'bedr'
+	menu_off = 0	
 	CLOSE ALL
 	$track_loop = ''
 	music_loop = 1
 	*clr & cla
 	minut += 1
+	gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]
+	$locclass = 'bedr'
 	gs 'stat'
 	'<center><h4><font color="maroon">Artem''s Room</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/artemhome/artemroom.jpg"></center>'
@@ -592,12 +573,6 @@ if $ARGS[0] = 'snack':
 end
 	
 if $ARGS[0] = 'livingroom':
-	$menu_loc = 'artemhome'
-	$menu_arg = 'livingroom'
-	$locM_arg = 'livingroom'
-	$locM = 'artemhome'
-	$loc_arg = 'livingroom'
-	$loc = 'artemhome'
 	menu_off = 0
 	CLOSE ALL
 	*clr & cla
@@ -606,6 +581,7 @@ if $ARGS[0] = 'livingroom':
 	else
 		livingev = 0
 	end
+	gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]
 	$locclass = 'livingr'
 	minut += 1
 	gs 'stat'
@@ -871,12 +847,6 @@ if $ARGS[0] = 'livingroom':
 end
 
 if $ARGS[0] = 'kitchen':
-	$locM_arg = 'kitchen'
-	$locM = 'artemhome'
-	$loc_arg = 'kitchen'
-	$loc = 'artemhome'
-	$menu_loc = 'artemhome'
-	$menu_arg = 'kitchen'
 	menu_off = 0
 	CLOSE ALL
 	*clr & cla
@@ -886,6 +856,7 @@ if $ARGS[0] = 'kitchen':
 		kitchenev = 0
 	end
 	minut += 1
+	gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]
 	$locclass = 'kitr'
 	gs 'stat'
 	gs 'kit_din'
@@ -1133,17 +1104,13 @@ if $ARGS[0] = 'fridge':
 end 
 	
 if $ARGS[0] = 'artemparents':
-	$menu_loc = 'artemhome'
-	$menu_arg = 'artemparents'
-	$locM_arg = 'artemparents'
-	$locM = 'artemhome'
-	$loc_arg = 'artemparents'
-	$loc = 'artemhome'
+	
 	menu_off = 0
 	CLOSE ALL
 	*clr & cla
 	minut += 1
 	temp = rand(0,1)
+	gs 'shortgs', 'setloc', 'artemhome', $ARGS[0]
 	gs 'stat'
 	'<center><b><font color = maroon>Artem''s parent''s room</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/artemhome/parroom.jpg"></center>'

locations/autosalonF.qsrc

@@ -107,7 +107,7 @@ if $ARGS[0] = 'manager1':
 		end
 
 		if karta + bankDebtLimit >= 1097000:
-			act 'Buy a Toyota Corolla (1,097,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1097000, 'Toyaboutta Corolla', 103, 3000
+			act 'Buy a Toyota Corolla (1,097,000 <b>₽</b>)':gt 'autosalonF', 'buy', 1097000, 'Toyota Corolla', 103, 3000
 		end
 
 		if karta + bankDebtLimit >= 1299700:
@@ -173,8 +173,8 @@ if $ARGS[0] = 'buy':
 	car = ARGS[3]
 	benz = 3
 	cardrive = 9
-	teh = ARGS[4]
-	tehcar = ARGS[4]
+	car['new_condition'] = ARGS[4]
+	car['current_condition'] = ARGS[4]
 	wrek = 0
 
 	'The manager draws up a purchasing contract, and you inform the bank of the impending transaction. Once the bank has confirmed the write-off, the manager hands you the key to your new car.' 

locations/autoservisF.qsrc

@@ -18,12 +18,12 @@ if $ARGS[0] = 'start':
 	if cardrive = 7:
 		menu_off = 1
 		if wrek = 0:
-			if teh >= tehcar * 75 / 100:
+			if car['current_condition'] >= car['new_condition'] * 75 / 100:
 				'The foreman inspects your car quickly but thoroughly.' 
 				'After only a few minutes, he returns to you and announces that your car doesn''t need any repairs or maintenance.'
 			end
 
-			if teh < tehcar * 75 / 100:
+			if car['current_condition'] < car['new_condition'] * 75 / 100:
 				'The foreman inspects your car quickly but thoroughly.' 
 				'Here and there, he seems to be murmuring to himself, maybe assessing a defect. After only a few minutes, he returns to you and points out what needs to be fixed.' 
 				'It would cost you <<normrem>> <b>₽</b>.'
@@ -34,7 +34,7 @@ if $ARGS[0] = 'start':
 						*clr
 						money -= normrem
 						minut += 60
-						teh = tehcar
+						car['current_condition'] = car['new_condition']
 						wrek = 0
 						'<center><img <<$set_imgh>> src="images/locations/city/industrial/CarServiceSta/autoservis2.jpg"></center>'
 						'Since he tells you that it''s not gonna take long, you go into a waiting room with couches and a TV. After about an hour of flipping through channels, the car is ready, and you pay <<normrem>> <b>₽</b>.'
@@ -53,8 +53,8 @@ if $ARGS[0] = 'start':
 					*clr
 					money -= normrem
 					minut += 60
-					tehcar = tehcar / 2
-					teh = tehcar
+					car['new_condition'] = car['new_condition'] / 2
+					car['current_condition'] = car['new_condition']
 					wrek = 0
 					'<center><img <<$set_imgh>> src="images/locations/city/industrial/CarServiceSta/autoservis2.jpg"></center>'
 					'Since he tells you that it''s not gonna take long - at first you think he is being sarcastic but then realize that his no-nonsense attitude doesn''t leave much room for humour - you go into a waiting room with couches and a TV. After about an hour of flipping through channels, you are called back to the garage and can hardly believe your eyes.'

locations/autotraidF.qsrc

@@ -121,8 +121,8 @@ if $ARGS[0] = 'car':
 					car = 1
 					benz = 3
 					cardrive = 9
-					tehcar = 200
-					teh = rand(10, tehcar)
+					car['new_condition'] = 200
+					car['current_condition'] = rand(10, car['new_condition'])
 					wrek = 1
 					'You agree and before you know it, the car salesman and you have signed all the necessary documents. You hand over the <<bupay>> <b>₽</b> in cash, and the car is yours.' 
 					'Since it''s crammed in between about a million other vehicles, the car salesman moves it outside near the yard''s entrance for you... and that''s it.' 
@@ -138,7 +138,7 @@ if $ARGS[0] = 'car':
 		act 'Inspect a VAZ 2114':gt 'autotraidF', 'inspect', 'VAZ 2114', 4, 300, 1, 3
 		act 'Inspect a VAZ 2110':gt 'autotraidF', 'inspect', 'VAZ 2110', 5, 350, 1, 3
 		act 'Inspect a GAZ 3102':gt 'autotraidF', 'inspect', '3102 GAS', 11, 1000, 2, 5
-		act 'Inspect a 3110':gt 'autotraidF', 'inspect', '3110', 12, 800, 2, 5
+		act 'Inspect a 3110':gt 'autotraidF', 'inspect', '3110', 13, 800, 2, 5
 	end
 end
 
@@ -148,20 +148,18 @@ if $ARGS[0] = 'inspect':
 	menu_off = 1
 	$autotraidF_carname = $ARGS[1]
 	autotraidF_carnum = ARGS[2]
-	tehNT = ARGS[3]
+	car['potential_new_condition'] = ARGS[3]
 	carT = ARGS[4]
 	autotraidF_benz = ARGS[5]
 
 	'<center><b><<$autotraidF_carname>></b></center>'
-	'<center><img <<$set_imgh>> src="images/pc/items/accessories/car/car<<iif(autotraidF_carnum = 1, '''', autotraidF_carnum)>>.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/pc/items/accessories/car/car<<autotraidF_carnum>>.jpg"></center>'
 
 	gs 'avt'
-	'<<$tehT>> The car salesman wants <<bupay>> <b>₽</b> for it.'
+	'<<$car[''potential_current_condition'']>> The car salesman wants <<bupay>> <b>₽</b> for it.'
 
 	act 'Look around some more':
 		killvar 'bupay'
-		killvar 'tehT'
-		killvar 'tehNT'
 		killvar '$autotraidF_carname'
 		killvar 'autotraidF_carnum'
 		killvar 'autotraidF_benz'
@@ -174,16 +172,15 @@ if $ARGS[0] = 'inspect':
 			money -= bupay
 			$car = $autotraidF_carname
 			car = autotraidF_carnum
+			!!benz = fuel
 			benz = autotraidF_benz
 			cardrive = 9
-			teh = tehT
-			tehcar = tehNT
+			car['current_condition'] = car['potential_current_condition']
+			car['new_condition'] = car['potential_new_condition']
 			wrek = 0
 			'You agree and before you know it, the car salesman and you have signed all the necessary documents. You hand over the <<bupay>> <b>₽</b> in cash, and the car is yours.' 
 			'Since it''s crammed in between about a million other vehicles, the car salesman moves it outside near the yard''s entrance for you and warns you that there is very little gas in the tank.'
 			killvar 'bupay'
-			killvar 'tehT'
-			killvar 'tehNT'
 			killvar '$autotraidF_carname'
 			killvar 'autotraidF_carnum'
 			killvar 'autotraidF_benz'

locations/avb.qsrc

@@ -1,189 +1,189 @@
 # avb
 if car = 1:
-	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(10000, 20000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(50000, 100000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(40000, 60000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(20000, 40000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(10000, 20000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(50000, 100000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(40000, 60000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(20000, 40000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(10000, 20000)
 	end
 elseif car > 1 and car < 6:
-	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(10000, 20000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(100000, 200000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(80000, 120000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(60000, 90000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 70000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(100000, 200000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(80000, 120000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(60000, 90000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 70000)
 	end
 elseif car >= 6 and car < 11:
-	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(10000, 20000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(150000, 220000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(100000, 160000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(80000, 120000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 90000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(150000, 220000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(100000, 160000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(80000, 120000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 90000)
 	end
 elseif car >= 11 and car <= 13:
-	if wrek = 1 or teh <= 0:bupay = rand(10000, 20000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(10000, 20000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75/100 and wrek = 0:bupay = rand(70000, 100000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(40000, 80000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(20000, 60000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(10000, 30000)
+		if car['current_condition'] >= car['new_condition'] * 75/100 and wrek = 0:bupay = rand(70000, 100000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(40000, 80000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(20000, 60000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(10000, 30000)
 	end
 elseif car = 95:
-	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(20000, 60000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(500000, 900000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(400000, 600000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(300000, 500000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 300000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(500000, 900000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(400000, 600000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(300000, 500000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 300000)
 	end
 elseif car = 96:
-	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(20000, 60000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(3000000, 4800000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(1150000, 2550000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 1160000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(3000000, 4800000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(1150000, 2550000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 1160000)
 	end
 elseif car = 97:
-	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(20000, 60000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(1000000, 1800000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(540000, 1200000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(150000, 550000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 160000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(1000000, 1800000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(540000, 1200000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(150000, 550000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 160000)
 	end
 elseif car = 98:
-	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(20000, 60000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(3000000, 4800000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(1150000, 2550000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 1160000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(3000000, 4800000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(1150000, 2550000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 1160000)
 	end
 elseif car = 99:
-	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(20000, 60000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(2000000, 3800000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(1540000, 2200000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(550000, 1550000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 560000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(2000000, 3800000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(1540000, 2200000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(550000, 1550000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 560000)
 	end
 elseif car = 100:
-	if wrek = 1 or teh <= 0:bupay = rand(20000, 60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = rand(20000, 60000)
 
 	if wrek = 0:
-		if teh >= tehcar * 75 / 100 and wrek = 0:bupay = rand(3000000, 5800000)
-		if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
-		if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:bupay = rand(1550000, 2550000)
-		if teh < tehcar * 25 / 100 and wrek = 0:bupay = rand(50000, 1560000)
+		if car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:bupay = rand(3000000, 5800000)
+		if car['current_condition'] < car['new_condition'] * 75 / 100 and car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:bupay = rand(2540000, 3200000)
+		if car['current_condition'] < car['new_condition'] * 50 / 100 and car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(1550000, 2550000)
+		if car['current_condition'] < car['new_condition'] * 25 / 100 and wrek = 0:bupay = rand(50000, 1560000)
 	end
 elseif car = 101:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(1500000,2700000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(810000,1800000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(225000,825000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,240000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(1500000,2700000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(810000,1800000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(225000,825000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,240000)
 	end
 elseif car = 102:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(350000,630000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(280000,420000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(210000,350000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,210000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(350000,630000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(280000,420000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(210000,350000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,210000)
 	end
 elseif car = 103:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(550000,990000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(440000,660000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(330000,550000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,330000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(550000,990000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(440000,660000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(330000,550000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,330000)
 	end
 elseif car = 104:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(500000,900000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(400000,600000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(300000,500000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,300000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(500000,900000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(400000,600000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(300000,500000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,300000)
 	end
 elseif car = 105:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(600000,1080000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(480000,720000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(360000,600000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,360000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(600000,1080000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(480000,720000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(360000,600000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,360000)
 	end
 elseif car = 106:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(900000,1600000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(700000,1100000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(550000,900000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,550000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(900000,1600000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(700000,1100000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(550000,900000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,550000)
 	end
 elseif car = 107:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(2000000,3800000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(1540000,2200000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(550000,1550000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,560000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(2000000,3800000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(1540000,2200000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(550000,1550000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,560000)
 	end
 elseif car = 108:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(3500000,6300000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(2800000,4200000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(2100000,3500000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,2100000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(3500000,6300000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(2800000,4200000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(2100000,3500000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,2100000)
 	end
 elseif car = 109:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(900000,1600000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(700000,1100000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(550000,900000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,550000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(900000,1600000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(700000,1100000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(550000,900000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,550000)
 	end
 elseif car = 110:
-	if wrek = 1 or teh <= 0:bupay = RAND(20000,60000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(20000,60000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(425000,765000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(340000,510000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(255000,425000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(50000,255000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(425000,765000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(340000,510000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(255000,425000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(50000,255000)
 	end
 elseif car = 111:
-	if wrek = 1 or teh <= 0:bupay = RAND(50000,200000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(50000,200000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(6000000,9600000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(5000000,6400000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(2300000,5500000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(150000,2300000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(6000000,9600000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(5000000,6400000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(2300000,5500000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(150000,2300000)
 	end
 elseif car = 112:
-	if wrek = 1 or teh <= 0:bupay = RAND(100000,400000)
+	if wrek = 1 or car['current_condition'] <= 0:bupay = RAND(100000,400000)
 	if wrek = 0:
-		if teh >= tehcar*75/100 and wrek = 0:bupay = RAND(12000000,19000000)
-		if teh < tehcar*75/100 and teh >= tehcar*50/100 and wrek = 0:bupay = RAND(10000000,12800000)
-		if teh < tehcar*50/100 and teh >= tehcar*25/100 and wrek = 0:bupay = RAND(4600000,11000000)
-		if teh < tehcar*25/100 and wrek = 0:bupay = RAND(300000,4600000)
+		if car['current_condition'] >= car['new_condition']*75/100 and wrek = 0:bupay = RAND(12000000,19000000)
+		if car['current_condition'] < car['new_condition']*75/100 and car['current_condition'] >= car['new_condition']*50/100 and wrek = 0:bupay = RAND(10000000,12800000)
+		if car['current_condition'] < car['new_condition']*50/100 and car['current_condition'] >= car['new_condition']*25/100 and wrek = 0:bupay = RAND(4600000,11000000)
+		if car['current_condition'] < car['new_condition']*25/100 and wrek = 0:bupay = RAND(300000,4600000)
 	end
 end
 

locations/avtonorm.qsrc

@@ -14,12 +14,11 @@ if car = 13:normhour = 15
 if car >= 95:normhour = 50
 
 if wrek = 0:
-	normneed = tehcar - teh
+	normneed = 0 - (car['current_condition'] - car['new_condition'])
 	normrem = normneed * normhour
 elseif wrek = 1:
-	normneed = tehcar - teh
-	normremK = (normneed * normhour) * 70
-	normrem = (normneed * normhour) + normremK
+	normneed = 0 - (car['current_condition'] - car['new_condition'])
+	normremK = (normneed * normhour) * 8
 end
 
 --- avtonorm ---------------------------------

locations/bass.qsrc

@@ -24,7 +24,7 @@ if $ARGS[0] = 'start':
 		gt 'bass', 'a'
 	end
 
-	act'Return to dressing room': gt 'fit', 'dressing room'
+	act'Return to dressing room': gt 'fit', 'dressing_room'
 end
 
 if $ARGS[0] = 'a':

locations/bedr.qsrc

@@ -1,21 +1,15 @@
 # bedr
-
-CLOSE ALL
 *clr & cla
-$loc = 'bedr'
-$loc_arg = ''
-$locM = 'bedr'
-$locM_arg = ''
-$menu_loc = 'bedr'
-$menu_arg = ''
 menu_off = 0
+minut += 1
+elektro += 1
+gs 'shortgs', 'setloc', 'bedr', $ARGS[0]
 $locclass = 'bedr'
 $location_type = 'private'
+gs 'themes', 'indoors'
 
-minut += 1
-elektro += 1
 gs 'stat'
-gs 'themes', 'indoors'
+
 
 if pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0:gt 'tobiQW', 'start'
 
@@ -226,7 +220,7 @@ end
 gs 'subkid'
 
 act 'Relax on your bed': gt 'bed', 'start'
-
+act 'Open wardrobe': gt 'wardrobe', 'start'
 gs 'prostitution_functions', 'prostitute_outfit_at_home'
 gs 'music_actions', 'music_icon'
 --- bedr ---------------------------------

locations/bedrPar.qsrc

@@ -1,27 +1,23 @@
 # bedrPar
 
-CLOSE ALL
 *clr & cla
 fromoutside = iif($loc = 'bedrPar',0,1)
-$loc = 'bedrPar'
-$loc_arg = ''
-$location_type = 'private'
-$locclass = 'bedr'
-$menu_loc = 'bedrPar'
-$menu_arg = ''
 menu_off = 0
 minut += 1
 !!day check so mom doesn''t think you have been out all night if you get up very early 
 motherworry[1] = daystart
-gs 'stat'
+gs 'shortgs', 'setloc', 'bedrPar', $ARGS[0]
+$location_type = 'private'
+$locclass = 'bedr'
 gs 'themes', 'indoors'
+gs 'stat'
 gs 'family_schedule'
 
 !! This is runs only once, just to make sure that Sveta can sing from the start, does not have to wait a whole day for `cikl` to run.
 if ml_performance['max_perform_minutes'] = 0: ml_performance['max_perform_minutes'] = pcs_instrmusic + pcs_vokal
 
 if $ARGS[0] = '' or $ARGS[0] = 'start':
-	if locat['Mother'] = 26 and fromoutside:
+	if locat['Mother'] = 26 and fromoutside and SchoolAtestat = 0:
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost1.jpg"></center>'
 		if prezik > 0 and rand(1,3) = 1:
 			gt 'mother', 'condom_find'
@@ -38,7 +34,7 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 			end
 			act 'Leave': gt 'korrPar'
 		end
-	elseif ParrotQW['Level'] = 2:
+	elseif ParrotQW['Level'] = 2 and SchoolAtestat = 0:
 		*clr & cla
 		menu_off = 1
 		'As soon as you enter the room you rush over to <<$ParrotQW[''Name'']>>''s cage and pour the contents of the vial into his water bowl.'
@@ -47,7 +43,7 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 		ParrotQW['Day'] = 3
 		
 		act 'Continue':gt $loc, $loc_arg
-	elseif ParrotQW['SisterReleaseParrotDay'] + 3 < daystart and ParrotQW['Level'] = 1:
+	elseif ParrotQW['SisterReleaseParrotDay'] + 3 < daystart and ParrotQW['Level'] = 1 and SchoolAtestat = 0:
 		*clr & cla
 		menu_off = 1
 		'When you enter the room, you notice <<$ParrotQW[''Name'']>>''s cage is open and he is gone.'
@@ -59,13 +55,13 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 		gs 'stat'
 		
 		act 'Continue':gt $loc, $loc_arg
-	elseif pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0 and locat['Anya_inroom'] = 0:
+	elseif pcs_magik >= 6 and spellbefshild = 1 and tobiQW = 0 and locat['Anya_inroom'] = 0 and SchoolAtestat = 0:
 		gt 'tobiQW', 'start'
 		
-	elseif locat['Anya'] = 11: 
+	elseif locat['Anya'] = 11 and SchoolAtestat = 0: 
 		gt 'sisterQW', 'sisboyQW_expel'
 		
-	elseif locat['Anya_inroom'] = 1 and ParrotQW['Owned2'] = 1 and ParrotQW['SisKeepParrot'] = 0:
+	elseif locat['Anya_inroom'] = 1 and ParrotQW['Owned2'] = 1 and ParrotQW['SisKeepParrot'] = 0 and SchoolAtestat = 0:
 		*clr & cla
 		menu_off = 1
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/anya/sister2.jpg"></center>'
@@ -85,17 +81,25 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 
 		act 'Leave': gt 'korrPar'
 	else
-		'<center><h1><font color="maroon">Your bedroom</font></h1></center>'
+		if SchoolAtestat = 0:
+			'<center><h1><font color="maroon">Your bedroom</font></h1></center>'
+		else
+			'<center><h1><font color="maroon">Your old bedroom</font></h1></center>'
+		end
 		! WD: Correct Image path ~ "images/qwest/alter/<<$loc>>.jpg"
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/home/bedrpar.jpg"></center>'
 		*nl
-		'This is the small bedroom you share with your sister, Anya. On one side of the room is a <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> where you can choose outfits and organise your clothing.'
-		*nl
-		'Your <a href="exec:gt ''bed'', ''start''">bed</a> stands opposite the wardrobe, and your <a href="exec:gt ''stol'' ,''stolPar''">desk</a> is next to it'+iif(strapon = 1, '. You keep your strapon inside it.', '')+'. Your sister''s bed is in the other corner.'
+		if SchoolAtestat = 0:
+			'This is the small bedroom you share with your sister, Anya. On one side of the room is a <a href="exec:gt ''wardrobe'', ''start''">wardrobe</a> where you can choose outfits and organise your clothing.'
+			*nl
+			'Your <a href="exec:gt ''bed'', ''start''">bed</a> stands opposite the wardrobe, and your <a href="exec:gt ''stol'' ,''stolPar''">desk</a> is next to it'+iif(strapon = 1, '. You keep your strapon inside it.', '')+'. Your sister''s bed is in the other corner.'
+		else
+			'This small bedroom you used to share with your sister, Anya. The furniture is old and basic.'
+		end
 		*nl
 		if $ml_guitar['location'] = $loc: 'Your guitar rests on its stand next to your bed.'
 
-		if ParrotQW['Owned2'] = 1:
+		if ParrotQW['Owned2'] = 1 and SchoolAtestat = 0:
 			'<a href="exec:gt ''popu'',''start2''"><<$ParrotQW[''Name2'']>></a> is sitting in his cage'
 			if daystart - ParrotQW['BuyDate'] <= 10: 
 				'<<$ParrotQW[''Name2'']>> starts squawking at you when you enter the room.'
@@ -131,25 +135,27 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 			end
 			*nl
 		end
-		
-		'<table><tr><td valign="top">Your <a href="exec:gt ''budilnik'', ''start''">alarm clock</a> is set to <b>'+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+'</b> during the week and <b>'+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b> during the weekend. It is currently turned '+iif(budilnikOn = 0, '<a href="exec: budilnikOn = 1 & gt $loc">OFF</a>.', '<a href="exec: budilnikOn = 0 & gt $loc">ON</a>.')
 
-		if tabletki > 0 and prezik + prezikcount + preziksabo > 0:
-			'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers, as are your <a href="exec:gt ''stol'', ''bc''">condoms</a>.'
-		elseif tabletki > 0:
-			'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers.'
-		elseif prezik + prezikcount + preziksabo > 0:
-			'Your <a href="exec:gt ''stol'', ''bc''">condoms</a> are hidden in one of your desk drawers.'
-		end
-		
-		if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour > 4 and hour < 9 and detention_set = 1 and SchoolAtestat = 0 and detention_warning ! daystart:
-			detention_warning = daystart
-			msg 'You have detention this morning and must be at school before 09:00.'
-		end
+		if SchoolAtestat = 0:
+			'<table><tr><td valign="top">Your <a href="exec:gt ''budilnik'', ''start''">alarm clock</a> is set to <b>'+iif(timer < 10,'0<<timer>>','<<timer>>')+':'+iif(timerM < 10,'0<<timerM>>','<<timerM>>')+'</b> during the week and <b>'+iif(timerEnd < 10,'0<<timerEnd>>','<<timerEnd>>')+':'+iif(timerEndM < 10,'0<<timerEndM>>','<<timerEndM>>')+'</b> during the weekend. It is currently turned '+iif(budilnikOn = 0, '<a href="exec: budilnikOn = 1 & gt $loc">OFF</a>.', '<a href="exec: budilnikOn = 0 & gt $loc">ON</a>.')
 
-		if komp = 1: 'Your <a href="exec: gt ''Komp'',''start''">computer</a> is on your desk.'
+			if tabletki > 0 and prezik + prezikcount + preziksabo > 0:
+				'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers, as are your <a href="exec:gt ''stol'', ''bc''">condoms</a>.'
+			elseif tabletki > 0:
+				'Your <a href="exec:gt ''stol'', ''bc''">birth control</a> is hidden in one of your desk drawers.'
+			elseif prezik + prezikcount + preziksabo > 0:
+				'Your <a href="exec:gt ''stol'', ''bc''">condoms</a> are hidden in one of your desk drawers.'
+			end
+			
+			if mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and week = 6 and hour > 4 and hour < 9 and detention_set = 1 and SchoolAtestat = 0 and detention_warning ! daystart:
+				detention_warning = daystart
+				msg 'You have detention this morning and must be at school before 09:00.'
+			end
 
-		if npc_QW['A33'] > 10:npc_QW['A33'] = 10
+			if komp = 1: 'Your <a href="exec: gt ''Komp'',''start''">computer</a> is on your desk.'
+
+			if npc_QW['A33'] > 10:npc_QW['A33'] = 10
+		end
 
 		if locat['Anya_Gad'] = 0:
 			if sisboyparty_day + 1 = daystart and sisboyparty = -1 and hour = 22:
@@ -184,117 +190,119 @@ if $ARGS[0] = '' or $ARGS[0] = 'start':
 			if (locat['Anya'] = 4 or locat['Anya'] = 15) and daystart - ParrotQW['BuyDate'] > 55 and ParrotQW['Owned2'] = 1 and ParrotQW['SisterReleaseParrotDay'] = 0 : gt 'sister_chat', 'pargone'
 			gt 'korrPar'
 		end
-		
-		act 'Relax on your bed': gt 'bed', 'start'
 
-		act 'Open wardrobe': gt 'wardrobe', 'start'
-		
-		gs 'prostitution_functions', 'prostitute_outfit_at_home'
-		
-		if pornMagazine > 0:'You have hidden your porn magazines under the mattress of your bed.'
-		!!Masturbation, allowed after sister threesome (when sis_watch is used for a message) or sister not here.
-		sis_watch = 0
+		if SchoolAtestat = 0:
+			act 'Relax on your bed': gt 'bed', 'start'
 
-		if locat['Anya_inroom'] = 0 or sisboytrio > 0:
-			if pornMagazine > 0:gs 'events', 'read_porn'
-			if rexCarCount >= 9 and hour < 3 and rexSmsDay ! daystart and smsForRex < 13:
-				act 'Send Rex a text message': gt 'rex_events','sms'
-			end
-			if pcs_horny >= 50:
-				act 'Masturbate':gt 'selfplay', 'start'
-			end
+			act 'Open wardrobe': gt 'wardrobe', 'start'
+			
+			gs 'prostitution_functions', 'prostitute_outfit_at_home'
+			
+			if pornMagazine > 0:'You have hidden your porn magazines under the mattress of your bed.'
+			!!Masturbation, allowed after sister threesome (when sis_watch is used for a message) or sister not here.
+			sis_watch = 0
 
-			if vcard > 0: act 'View your vintage porn cards':card_deck = 0 & gt 'card'
-			if card > 0: act 'View your new porn cards':card_deck = 1 & gt 'card'
-		end
+			if locat['Anya_inroom'] = 0 or sisboytrio > 0:
+				if pornMagazine > 0:gs 'events', 'read_porn'
+				if rexCarCount >= 9 and hour < 3 and rexSmsDay ! daystart and smsForRex < 13:
+					act 'Send Rex a text message': gt 'rex_events','sms'
+				end
+				if pcs_horny >= 50:
+					act 'Masturbate':gt 'selfplay', 'start'
+				end
 
-		gs 'events', 'read'
+				if vcard > 0: act 'View your vintage porn cards':card_deck = 0 & gt 'card'
+				if card > 0: act 'View your new porn cards':card_deck = 1 & gt 'card'
+			end
 
-		if tovarL > 0:'You currently have <<tovarL>> trinkets to sell at the station. The maximum you can carry is 30.'
+			gs 'events', 'read'
 
-		if locat['Anya_inroom'] = 0: dynamic $palelady
+			if tovarL > 0:'You currently have <<tovarL>> trinkets to sell at the station. The maximum you can carry is 30.'
 
-		gs 'exercise', 'start'
+			if locat['Anya_inroom'] = 0: dynamic $palelady
 
-		if sewing_kit = 1:
-			'Your <a href="exec:gt ''sewing'',''start''">sewing kit</a> is stored neatly under your bed.'
-			*nl
-			if tkan <= 0:
-				'You do not have any fabric.'
-			else
-				if pcs_sewng < 40:
-					'You have <<tkan>> pieces of sewing fabric left.'
-				elseif pcs_sewng < 80:
-					'You have enough fabric for <<tkan>> lessons.'
+			gs 'exercise', 'start'
+
+			if sewing_kit = 1:
+				'Your <a href="exec:gt ''sewing'',''start''">sewing kit</a> is stored neatly under your bed.'
+				*nl
+				if tkan <= 0:
+					'You do not have any fabric.'
 				else
-					if newgobelen = 0:
-						act'Start a new tapestry':
-							*clr & cla
-							menu_off = 1
-							tkan -= 1
-							newgobelen = 1
-							minut += 15
-							gs'stat'
-							'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
+					if pcs_sewng < 40:
+						'You have <<tkan>> pieces of sewing fabric left.'
+					elseif pcs_sewng < 80:
+						'You have enough fabric for <<tkan>> lessons.'
+					else
+						if newgobelen = 0:
+							act'Start a new tapestry':
+								*clr & cla
+								menu_off = 1
+								tkan -= 1
+								newgobelen = 1
+								minut += 15
+								gs'stat'
+								'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
 
-							act'Set the tapestry aside':gt $curloc
+								act'Set the tapestry aside':gt 'bedrPar', 'start'
+							end
 						end
 					end
-				end
-			end	
-			if newgobelen>=1:
-				'Your tapestry is <<newgobelen/10>> percent finished.'
-				act'Work on the tapestry':
-					*clr & cla
-					menu_off = 1
-					minut+=60
-					gs 'exp_gain', 'sewng', rand(pcs_intel/10, pcs_intel/5)
-					gobramax = (pcs_sewng - 70) * 6
-					gobramin = (pcs_sewng - 70) * 2
-					newgobelen += rand(gobramin,gobramax)
-					gs'stat'
-					if newgobelen < 1000:'You spend an hour working on your tapestry, which is now <<newgobelen/10>> percent finished.'
-						if newgobelen >= 1000:
-						newgobelen = 0
-						gobelen += 1
-						'Your work on the tapestry is done.'
+				end	
+				if newgobelen>=1:
+					'Your tapestry is <<newgobelen/10>> percent finished.'
+					act'Work on the tapestry':
+						*clr & cla
+						menu_off = 1
+						minut+=60
+						gs 'exp_gain', 'sewng', rand(pcs_intel/10, pcs_intel/5)
+						gobramax = (pcs_sewng - 70) * 6
+						gobramin = (pcs_sewng - 70) * 2
+						newgobelen += rand(gobramin,gobramax)
+						gs'stat'
+						if newgobelen < 1000:'You spend an hour working on your tapestry, which is now <<newgobelen/10>> percent finished.'
+							if newgobelen >= 1000:
+							newgobelen = 0
+							gobelen += 1
+							'Your work on the tapestry is done.'
+						end
+						act'Set the tapestry aside':gt 'bedrPar', 'start'
 					end
-					act'Set the tapestry aside':gt $curloc
 				end
+				if gobelen > 0: 'You have <<gobelen>> completed tapestries.'
 			end
-			if gobelen > 0: 'You have <<gobelen>> completed tapestries.'
-		end
 
-		!! Computer, music and internet use.
-		gs 'internet_mobile', 'get_access'
-		if locat['Anya_inroom'] = 1:
-			gs 'music_actions', 'not_alone'
+			!! Computer, music and internet use.
+			gs 'internet_mobile', 'get_access'
+			if locat['Anya_inroom'] = 1:
+				gs 'music_actions', 'not_alone'
 
-			if sisboytrio = 0: access['noporn'] = 1
-			access['nocamshow'] = 1
-			$access['noporn'] = 'You shouldn''t watch porn with your sister in the room, she would notice for sure!'
-			$access['nocamshow'] ='You can''t do any webcam activities with your sister in the room!'
-		else
-			gs 'music_actions', 'clear_restrictions'
-		end
+				if sisboytrio = 0: access['noporn'] = 1
+				access['nocamshow'] = 1
+				$access['noporn'] = 'You shouldn''t watch porn with your sister in the room, she would notice for sure!'
+				$access['nocamshow'] ='You can''t do any webcam activities with your sister in the room!'
+			else
+				gs 'music_actions', 'clear_restrictions'
+			end
 
-		if locat['Anya_inroom'] = 0 and breastpump = 1 and bp_unbox <= 0:
-			'<a hlpf="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
-		elseif kid >= 1 and breastpump = 1 and bp_unbox <= 0:
-			'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
-		elseif locat['Anya_inroom'] = 0 and breastpump = 1 and bp_unbox = 1 and pcs_inhib > 40:
-			'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
-		elseif kid >= 1 and breastpump = 1 and bp_unbox = 1 and pcs_inhib > 30:
-			'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
+			if locat['Anya_inroom'] = 0 and breastpump = 1 and bp_unbox <= 0:
+				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
+			elseif kid >= 1 and breastpump = 1 and bp_unbox <= 0:
+				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
+			elseif locat['Anya_inroom'] = 0 and breastpump = 1 and bp_unbox = 1 and pcs_inhib > 40:
+				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
+			elseif kid >= 1 and breastpump = 1 and bp_unbox = 1 and pcs_inhib > 30:
+				'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
+			end
+			gs 'lact_bp', 'massage'
 		end
-		gs 'lact_bp', 'massage'
 
 		'</td><td width = "100" valign="top"></td><td>'
-		gs 'subkid'
+		if SchoolAtestat = 0: gs 'subkid'
 		'</td></tr></table>'
 
 		!! NOTE: This has to go here, otherwise gs 'subkid' removes the icon. 
-		gs 'music_actions', 'music_icon'
+		if SchoolAtestat = 0: gs 'music_actions', 'music_icon'
 	end
 end
 
@@ -348,6 +356,7 @@ if $ARGS[0] = 'intro':
 					'Your <<$npc_nickname[''A29'']>> shrugs. "You could, but then you might have to cut corners or even end up running late to school, and I won''t be having any of that. Your teachers won''t either." she warns you before making her way towards the kitchen.'
 					if stat['think_virgin'] = 1: '"Oh, don''t forget; you need to head down to the clinic and see the gynecologist for a check up. Not just once, but every month." she adds quickly.'
 					act 'But why do I--':
+						$loc_arg = 'start'
 						cla & *clr
 						minut += 2
 						gs 'stat'

locations/beg.qsrc

@@ -16,8 +16,8 @@ if $ARGS[0] = 'start':
 		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/exercise/fit5.jpg"></center>'
 		'You spend half an hour practising 100 meter dashes to improve your speed, as well as doing several rounds around the stadium to work on your stamina. You are sweaty all over by the end of it, obviously, but you also feel that you''re a little better than before.'
 
-		! WD: Argument is 'dressing room'
-		act 'Go to the dressing room':gt 'fit', 'dressing room'
+		! WD: Argument is 'dressing_room'
+		act 'Go to the dressing room':gt 'fit', 'dressing_room'
 	end
 end
 

locations/beg1.qsrc

@@ -36,7 +36,7 @@ if $ARGS[0] = 'start':
 		'You were unable to qualify for the St. Petersburg Championship.'
 
 		! WD: Argument is 'dressing room'
-		act 'Go back to the dressing room':gt 'fit', 'dressing room'
+		act 'Go back to the dressing room':gt 'fit', 'dressing_room'
 	elseif razradbeg = 14 and razradbegK >= 9:
 		cla
 		razradbegK = 0
@@ -104,7 +104,7 @@ if $ARGS[0] = 'br':
 		razradbeg = 1 & goldbeg += 1 & money += 600 & 'You fought hard and managed to take 1st place! You receive a gold badge, a prize of 600 <b>₽</b> and are now part of your club''s junior squad, performing at the semi-professional level.'
 	end
 
-	act 'Leave':gt 'fit', 'dressing room'
+	act 'Leave':gt 'fit', 'dressing_room'
 end
 
 if $ARGS[0] = 'kms':
@@ -166,7 +166,7 @@ if $ARGS[0] = 'kms':
 		gs 'fame', 'city', 'running', rand(14,17)
 		razradbeg = 3 & goldbeg += 1 & money += 1000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 1,000 <b>₽</b> and are now part of your club''s veteran squad, performing at the semi-professional level.'
 	end
-	act 'Leave':gt 'fit', 'dressing room'
+	act 'Leave':gt 'fit', 'dressing_room'
 end
 
 if $ARGS[0] = 'ross':
@@ -228,7 +228,7 @@ if $ARGS[0] = 'ross':
 		gs 'fame', 'city', 'running', rand(14,18)
 		razradbeg = 3 & goldbeg += 1 & money += 1500 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 1,500 <b>₽</b> and gain entry to the professional circuit.'
 	end
-	act 'Leave':gt 'fit', 'dressing room'
+	act 'Leave':gt 'fit', 'dressing_room'
 end
 
 if $ARGS[0] = 'kval':
@@ -295,7 +295,7 @@ if $ARGS[0] = 'kval':
 		gs 'fame', 'city', 'running', rand(14,19)
 		razradbegK += 1 & goldbeg += 1 & money += 2000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 2,000 <b>₽</b> and are one step closer to qualifying for the St. Petersburg Championship.'
 	end
-	act 'Leave':gt 'fit', 'dressing room'
+	act 'Leave':gt 'fit', 'dressing_room'
 end
 
 if $ARGS[0] = 'evro':
@@ -330,49 +330,49 @@ if $ARGS[0] = 'evro':
 		grupvalue[2] -= 1
 		razradbeg = 2 & razradbegK = 0 & 'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right? Your performance is so atrocious that the coach decide to return you to the semi-proffessional rank.'
 		gs 'fame', 'city', 'running', rand(14,19)
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 55:
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You didn''t manage to reach any classification.'
 		gs 'fame', 'city', 'running', rand(15,21)
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 60:
 		gs 'fame', 'city', 'running', rand(16,23)
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 65:
 		grupvalue[2] += 1
 		gs 'fame', 'city', 'running', rand(18,25)
 		'You fought hard, but managed to only take the penultimate place (7th place).'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 70:
 		grupvalue[2] += 2
 		gs 'fame', 'city', 'running', rand(20,25)
 		'You fought hard, but only managed to take 6th place.'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 75:
 		grupvalue[2] += 3
 		gs 'fame', 'city', 'running', rand(25,50)
 		'You fought hard, but only managed to take 5th place.'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 80:
 		grupvalue[2] += 4
 		gs 'fame', 'city', 'running', rand(50,100)
 		'You fought hard, but only managed to take 4th place.'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 85:
 		grupvalue[2] += 6
 		gs 'fame', 'city', 'running', 'BronzeMedal'
 		razradbegEB += 1
 		money += 10000
 		'You fought hard and managed to take 3rd place, earning a prize. You get a bronze medal and a prize of 10,000 <b>₽</b>'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	elseif begresult < 90:
 		grupvalue[2] += 8
 		gs 'fame', 'city', 'running', 'SilverMedal'
 		razradbegES += 1
 		money += 15000
 		'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 15,000 <b>₽</b>'
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	else
 		grupvalue[2] += 10
 		gs 'fame', 'city', 'running', 'GoldMedal'
@@ -535,7 +535,7 @@ if $ARGS[0] = 'Family extension':
 				end
 			end
 		else
-			gt 'fit', 'dressing room'
+			gt 'fit', 'dressing_room'
 		end
 	end
 end

locations/begin.qsrc

@@ -94,29 +94,21 @@ if $ARGS[0] = 'start':
 	'</table></center>'
 	
 	if $start_type = 'sg' or $start_type = 'sg_m':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_sg', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_sg', 'start'
 	elseif $start_type = 'sg_tg':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_sg_tg', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_sg_tg', 'start'
 	elseif $start_type = 'city':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_city', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_city', 'start'
 	elseif $start_type = 'city_m':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_city_m', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_city_m', 'start'
 	elseif $start_type = 'city_tg':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_city_tg', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_city_tg', 'start'
 	elseif $start_type = 'uni':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_uni', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_uni', 'start'
 	elseif $start_type = 'uni_m':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_uni_m', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_uni_m', 'start'
 	elseif $start_type = 'uni_tg':
-		act '<center><b>Start</b></center>': gs 'npc_relationship', 'defaultnotschool'
-& gt 'intro_uni_tg', 'start'
+		act '<center><b>Start</b></center>': gt 'intro_uni_tg', 'start'
 	end
 	
 	act '<center><b>Change game settings</b></center>': settingmode = 1 & gs '$menu_setting'

locations/beverage.qsrc

@@ -10,7 +10,6 @@ if $ARGS[0] = 'bev_kva':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 5
 	pcs_mood += 15
-	pcs_energy += 8
 	if pcs_hydra >= 100:
 		pcs_hydra += 30
 	else
@@ -41,7 +40,6 @@ if $ARGS[0] = 'bev_jui':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 8
 	pcs_mood += 10
-	pcs_energy += 10
 	if pcs_hydra >= 100:
 		pcs_hydra += 40
 	else
@@ -71,7 +69,7 @@ if $ARGS[0] = 'bev_mil':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 5
 	pcs_mood += 20
-	pcs_energy += 8
+	pcs_energy += 5
 	if pcs_hydra >= 100:
 		pcs_hydra += 50
 	else
@@ -128,7 +126,6 @@ if $ARGS[0] = 'bev_cof':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 5
 	pcs_mood += 20
-	pcs_energy += 15
 	if pcs_hydra >= 100:
 		pcs_hydra += 20
 	else
@@ -159,7 +156,6 @@ if $ARGS[0] = 'bev_tea':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 10
 	pcs_mood += 20
-	pcs_energy += 10
 	if pcs_hydra >= 100:
 		pcs_hydra += 25
 	else
@@ -190,7 +186,6 @@ if $ARGS[0] = 'bev_energy_drink':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 10
 	pcs_mood += 20
-	pcs_energy += 20
 	fat += 3
 	if pcs_hydra >= 100:
 		pcs_hydra += 25
@@ -419,7 +414,6 @@ if $ARGS[0] = 'coffee':
 	if pcs_sleep <= 20: pcs_sleep += 5
 	pcs_health += 5
 	pcs_mood += 20
-	pcs_energy += 15
 	if pcs_hydra >= 100:
 		pcs_hydra += 20
 	else
@@ -442,7 +436,6 @@ if $ARGS[0] = 'only_cost_bco':
 	if pcs_sleep <= 20: pcs_sleep += 5
 	pcs_health += 5
 	pcs_mood += 20
-	pcs_energy += 15
 	if pcs_hydra >= 100:
 		pcs_hydra += 20
 	else
@@ -468,7 +461,6 @@ if $ARGS[0] = 'only_cost_cof':
 	if pcs_sleep <= 20: pcs_sleep += 5
 	pcs_health += 5
 	pcs_mood += 20
-	pcs_energy += 15
 	if pcs_hydra >= 100:
 		pcs_hydra += 20
 	else
@@ -494,7 +486,6 @@ if $ARGS[0] = 'only_cost_tea':
 	money -= val($_drink['<<args[1]>>,price'])
 	pcs_health += 10
 	pcs_mood += 20
-	pcs_energy += 10
 	if pcs_hydra >= 100:
 		pcs_hydra += 25
 	else
@@ -520,7 +511,6 @@ if $ARGS[0] = 'only_cost_esp':
 	if pcs_sleep <= 20: pcs_sleep += 5
 	pcs_health += 5
 	pcs_mood += 20
-	pcs_energy += 15
 	cumspclnt = 2
 	gs 'cum_cleanup'
 	pcs_breath = 0

locations/body.qsrc

@@ -395,44 +395,6 @@ if $ARGS[0] = 'UpdateBodyMeasurement':
 	pcs_butt = (pcs_hips / 10) + silicone_butt + butt_cheat
 	pcs_cupsize = pcs_bust - pcs_band
 
-	! Update tits size
-	if pcs_cupsize <= 5:
-		tits = 0
-		$titsize = 'AA cup'
-	elseif pcs_cupsize <= 10:
-		tits = 1
-		$titsize = 'A cup'
-	elseif pcs_cupsize <= 15:
-		tits = 2
-		$titsize = 'B cup'
-	elseif pcs_cupsize <= 20:
-		tits = 3
-		$titsize = 'C cup'
-	elseif pcs_cupsize <= 25:
-		tits = 4
-		$titsize = 'D cup'
-	elseif pcs_cupsize <= 30:
-		tits = 5
-		$titsize = 'E cup'
-	elseif pcs_cupsize <= 35:
-		tits = 6
-		$titsize = 'F cup'
-	elseif pcs_cupsize <= 40:
-		tits = 7
-		$titsize = 'G cup'
-	elseif pcs_cupsize <= 45:
-		tits = 8
-		$titsize = 'H cup'
-	elseif pcs_cupsize <= 50:
-		tits = 9
-		$titsize = 'I cup'
-	elseif pcs_cupsize <= 55:
-		tits = 10
-		$titsize = 'J cup'
-	else
-		tits = 11
-		$titsize = 'K cup'
-	end
 end
 
 if $ARGS[0] = 'CalcWeight':

locations/booty_call.qsrc

@@ -3,18 +3,21 @@ if $ARGS[0] = 'scheduler':
 	!! clear SMS
 	!! clear schedule
 	killvar 'booty_call_time'
+	killvar 'npc_booty_call'
+	killvar 'npc_booty_call_time'
 	i = 0
 	gs 'booty_call', 'scheduler2'
 end
 
 if $ARGS[0] = 'scheduler2':
-	if i <= arrsize('$FuckBuddy'):
+	if i <= arrsize('$fuckbuddy'):
 		gs 'booty_call', 'npc_stat_update'
 !!		if (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_rel[$FuckBuddy[i]] > 0 and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_big_fight[$FuckBuddy[i]] < daystart - 7:
 
 !!		temporary removal of npc_rel requirement until boy initiated breakups can occur
 
-		if (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_big_fight[$FuckBuddy[i]] < daystart - 7:
+!!		if (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and (npc_big_fight[$FuckBuddy[i]] < daystart - 7 and daystart > 7):
+		if npc_booty_call_date[$boy] ! daystart and (rand(1,10) <= npc_sexdrive[$FuckBuddy[i]] or npc_booty_call[$FuckBuddy[i]] = daystart) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
 			gs 'booty_call', 'scheduler3'
 		else
 			npc_no_booty_call[$FuckBuddy[i]] = daystart
@@ -51,16 +54,18 @@ end
 
 if $ARGS[0] = 'set_booty_call_date':
 	if booty_call['invite_today'] = 1:
-		npc_booty_call[$boy] = daystart
+		npc_booty_call_date[$boy] = daystart
 	elseif booty_call['invite_tomorrow'] = 1:
-		npc_booty_call[$boy] = daystart + 1
+		npc_booty_call_date[$boy] = daystart + 1
+	end
+	if npc_booty_call_time[$boy] = 0:
+		npc_booty_call_time[$boy] = npc_start_free_time[$boy]
 	end
-	npc_booty_call_time[$boy] = npc_start_free_time[$boy]
 end
 
 if $ARGS[0] = 'block_booty_calls':
 	if booty_call['invite_today'] = 1:
-		npc_booty_call[$boy] = 0
+		npc_booty_call_date[$boy] = 0
 		npc_no_booty_call[$boy] = daystart
 		npc_booty_call_time[$boy] = 0
 	elseif booty_call['invite_tomorrow'] = 1:
@@ -72,7 +77,7 @@ if $ARGS[0] = 'SMS raiser':
 	i = 0
 	:booty_call_sms_raiser_loop
 	if i < arrsize('$FuckBuddy'):
-		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart:
+		if booty_call_time[$FuckBuddy[i]] < ((hour * 60) + minut) and npc_no_booty_call[$FuckBuddy[i]] ! daystart and npc_last_booty_call[$boy] ! daystart:
 			gs 'booty_call_sms', 'start', $FuckBuddy[i]
 			gs 'booty_call_sms', 'Add SMS', $FuckBuddy[i]
 			booty_call_time[$FuckBuddy[i]] = 2399

locations/booty_call_condoms.qsrc

@@ -6,7 +6,7 @@
 !! booty_call['out_of_condoms'] = 2 - npc has run out of condoms, will use players
 
 if $ARGS[0] = 'setup':
-	if npc_condom_conscious[$boy] = 1:
+	if npc_condom_conscious[$boy] > 0:
 		booty_call['condom_count'] = 100
 	elseif booty_call['condom_count'] = 0 and booty_call['fuck_count'] = 0 and npc_no_condoms[$boy] ! 1:
 		if rand(1,5) = 1:
@@ -40,6 +40,7 @@ if $ARGS[0] = 'condoms':
 			gs 'booty_call_condoms', 'pc_dangerous_day'
 			gs 'booty_call_condoms', 'reenable_condoms1'
 			gs 'booty_call_condoms', 'no_more_free_creampies1'
+			gs 'booty_call_condoms', 'already_creampie1'
 		elseif npc_bareback[$boy] = 2 and booty_call['no_condom'] ! 1 and booty_call['condom'] ! 1:
 			'"Is it safe?" <<$npc_firstname[$boy]>> asks. "Can we go bareback?"'
 			gs 'booty_call_condoms', 'bareback_check'
@@ -47,14 +48,17 @@ if $ARGS[0] = 'condoms':
 			if npc_condom_conscious[$boy] > 0:
 				gs 'booty_call_condoms', 'condom_conscious_npc'
 			elseif booty_call['condom_count'] > 0 and rand(0,1) = 1:
-				gs 'booty_call_condoms', 'npc_condom_use'
+				act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 			else
 				'<<$npc_firstname[$boy]>> makes no indication that he''s going to put on a condom.'
+				
 				gs 'booty_call_condoms', 'pc_condom_ask'
 				gs 'booty_call_condoms', 'pc_condoms'
 				gs 'booty_call_condoms', 'dont_cum_in_me'
 				gs 'booty_call_condoms', 'pc_safe_day'
 				gs 'booty_call_condoms', 'pc_dangerous_day'
+				gs 'booty_call_condoms', 'already_creampie1'
+				if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0: gs 'booty_call_condoms', 'virgin_condom_ask1'
 			end
 		elseif booty_call['using_pc_condoms'] = 1:
 			gs 'booty_call_condoms', 'pc_condoms'
@@ -62,7 +66,7 @@ if $ARGS[0] = 'condoms':
 			if booty_call['condoms_used'] >= booty_call['condom_count']:
 				gs 'booty_call_condoms', 'npc_out_of_condoms'
 			else
-				gs 'booty_call_condoms', 'npc_condom_use'
+				act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 			end
 		end
 	end
@@ -79,6 +83,7 @@ end
 if $ARGS[0] = 'pc_need_condoms':
 	if prezik > 0:
 		act'Use your condoms':
+			booty_call['pc_wants_condoms'] = 1
 			cla & *nl
 			'"Sorry," you say, pulling a condom from your bag. "But we need to be safe today."'
 			gs 'booty_call_condoms', 'pc_condoms'
@@ -120,7 +125,7 @@ if $ARGS[0] = 'pc_condoms':
 			act'Do you have any?':
 				cla & *clr
 				$npc_apt_bedroom
-				if booty_call['cock_remove'] = 0:
+				if booty_call['cock_inserted'] = 1:
 					'"But I''m not ready to stop," you grin, flexing your pussy around <<$npc_firstname[$boy]>>''s cock inside you. "Have you got any?"'
 				else
 					'"But I''m not ready to stop," you say. "Have you got any?"'
@@ -131,33 +136,33 @@ if $ARGS[0] = 'pc_condoms':
 					act'If you''re offering':
 						cla & *nl
 						'"Well, if you''re offering..." you smirk.'
-						gs'booty_call_condoms', 'npc_condom_use'
+						act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 					end
 					
 					act'I might take you up on that':
 						cla & *nl
 						'"I just might take you up on that," you smile.'
-						gs'booty_call_condoms', 'npc_condom_use'
+						act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 					end
 					
 					act'I want to do my part':
 						cla & *nl
 						'"I want to do my part," you smile. "I''m enjoying the sex with you. Only fair that I pay for it too."'
-						gs'booty_call_condoms', 'npc_condom_use'
+						act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 					end
 					
 					if karta + money < 2000:
 						act'Good, money''s tight':
 							cla & *nl
 							'"Then I''ll stop buying right away," you grin. "I don''t have a lot of spare cash on hand, so saving on condoms would be great.'
-							gs'booty_call_condoms', 'npc_condom_use'
+							act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 						end
 					end
 					
 				elseif booty_call['condom_count'] > 0 and booty_call['condoms_used'] < booty_call['condom_count']:
 					'"Yeah, I have some," <<$npc_firstname[$boy]>> says.'
 					gs'booty_call_sex', 'reset'
-					gs'booty_call_condoms', 'npc_condom_use'
+					act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 				else
 					if npc_no_condoms_know[$boy] = 1:
 						'"Come on," <<$npc_firstname[$boy]>> says, rolling his eyes. "You know I hate using condoms. Lucky you can even talk me into using yours."'
@@ -183,6 +188,7 @@ if $ARGS[0] = 'pc_condom_ask':
 	end
 	act'Ask him to put on a condom':
 		cla & *nl
+		booty_call['pc_wants_condoms'] = 1
 		if npc_bareback[$boy] = 2:
 			'"We need a condom today," you shake your head.'
 		else
@@ -245,21 +251,32 @@ if $ARGS[0] = 'npc_condom_use_stats':
 end
 
 if $ARGS[0] = 'npc_condom_use':
+	cla & *clr
+	'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
 	booty_call['must_fuck'] = 1
+	booty_call['cock_inserted'] = 0
 	if booty_call['fuck_count'] > 1 and $booty_call['last_cum'] = 'condom':
 		'<<$npc_firstname[$boy]>> swaps out his used condom for a new one.'
 	elseif booty_call['fuck_count'] > 1:
 		'<<$npc_firstname[$boy]>> reaches for a new condom.'
+	else
+		'<<$npc_firstname[$boy]>> reaches for a condom from his nightstand.'
 	end
 !!	gs 'booty_call_sex', 'position_choose'
 	
+	
 	gs 'booty_call_condoms', 'npc_condom_put_on'
 	
-	if booty_call['condom'] = 0:
-		gs 'booty_call_condoms', 'disable_condoms'
-		
-		gs 'booty_call_condoms', 'temp_disable_condoms'
+	if booty_call['virgin'] = 1 and booty_call['fuck_count'] = 0:
+		gs 'booty_call_condoms', 'virgin_no_condom'
+	else
+		if booty_call['condom'] = 0:
+			gs 'booty_call_condoms', 'disable_condoms'
+			
+			gs 'booty_call_condoms', 'temp_disable_condoms'
+		end
 	end
+	
 end
 
 if $ARGS[0] = 'npc_condom_put_on':
@@ -303,7 +320,10 @@ if $ARGS[0] = 'condom_conscious_npc':
 	elseif booty_call['fuck_count'] > 1:
 		'<<$npc_firstname[$boy]>> reaches for another condom.'
 	end
-	gs 'booty_call_condoms', 'npc_condom_use'
+	act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
+	if booty_call['virgin'] = 1 and booty_call['fuck_count'] = 0:
+		gs 'booty_call_condoms', 'virgin_no_condom'
+	end
 end
 
 if $ARGS[0] = 'npc_out_of_condoms':
@@ -406,7 +426,7 @@ if $ARGS[0] = 'condom_why2':
 		if npc_condom_conscious[$boy] = 2 or (npc_condom_conscious[$boy] = 1 and npc_childfree[$boy] = 1):
 			'"Don''t want to risk it," <<$npc_firstname[$boy]>> says, shaking his head and opens the condom anyways, rolling it onto his cock.'
 		else
-			if rand(npc_willpwr[$boy],100) < pcs_persuas:
+			if rand(npc_willpwr[$boy],100) < pcs_persuas + npc_rel[$boy]:
 				booty_call['no_condom'] = 1
 				booty_call['condom'] = 0
 				'<<$npc_firstname[$boy]>> stops, looking back at you for a moment before smiling.'
@@ -431,7 +451,7 @@ if $ARGS[0] = 'condom_why2':
 					'"I want to use one anyways," <<$npc_firstname[$boy]>> says, shaking his head and reaches back for the condom. "Better to be safe."'
 					'Your jaw drops.'
 					*nl
-					'<i>A free pass to skip a condom and he doesn''t take it? What''s with him??</i>'
+					'<i>A free pass to go bareback and he doesn''t take it? What''s with this guy?</i>'
 				else
 					booty_call['no_condom'] = 1
 					'<<$npc_firstname[$boy]>> stops reaching and turns to meet your gaze, eyes filled with desire, and your smile widens into a full blown grin.'
@@ -450,7 +470,7 @@ if $ARGS[0] = 'condom_why2':
 					'"I want to use one anyways," <<$npc_firstname[$boy]>> says, shaking his head and reaches back for the condom. "Better to be safe."'
 					'Your jaw drops.'
 					*nl
-					'<i>A free pass to skip a condom and he doesn''t take it? What''s with him??</i>'
+					'<i>A free pass to go bareback and he doesn''t take it? What''s with this guy?</i>'
 				else
 					booty_call['no_condom'] = 1
 					'<<$npc_firstname[$boy]>> stops reaching and turns to meet your gaze, eyes filled with desire, and your smile widens into a full blown grin.'
@@ -495,12 +515,12 @@ if $ARGS[0] = 'no_condom1':
 		if stat['dangerous_day'] = 1 and birth_control['think_safe'] ! 1 and npc_childfree[$boy] > 0:
 			booty_call['condom'] = 1
 			'"What the fuck! Why didn''t you say so!" he says, immediately reaching for a condom.'
-			gs 'booty_call_condoms', 'npc_condom_use'
+			act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 		elseif rand(1,10) < 8:
 			booty_call['condom'] = 1
 			'"Ugh, fine."'
 			'He reaches for a condom.'
-			gs 'booty_call_condoms', 'npc_condom_use'
+			act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 		else
 			booty_call['dont_need_condom'] = 1
 			'"Come on," he complains. "It''ll be fine. Let''s skip it. Just this once."'
@@ -518,7 +538,7 @@ if $ARGS[0] = 'no_condom1':
 				'<<$npc_firstname[$boy]>> continues to complain at you while you grab all of your belongings and rush your way out the door, slamming it behind you.'
 				*nl
 				'Just because he''s your fuckbuddy doesn''t mean he can take advantage of you!'
-				act'Leave':gt 'booty_call_after', 'exit'
+				act'Leave':gt 'booty_call_leave', 'exit'
 			end
 
 			gs'booty_call_condoms', 'pc_skip_the_condom'
@@ -528,7 +548,7 @@ if $ARGS[0] = 'no_condom1':
 				booty_call['promise_no_creampie'] = 1
 				booty_call['must_fuck'] = 1
 				cla & *nl
-				'"Well... Alright..." you say heistantly. "But don''t you dare come inside me, okay?"'
+				'"Well... Alright..." you say hesitantly. "But don''t you dare come inside me, okay?"'
 				gs 'booty_call_sex', 'position_choose'
 			end
 		end
@@ -569,7 +589,7 @@ if $ARGS[0] = 'no_condom2':
 				'<<$npc_firstname[$boy]>> continues to complain at you while you grab all of your belongings and rush your way out the door, slamming it behind you.'
 				*nl
 				'The nerve of some people.'
-				act'Leave':gt 'booty_call_after', 'exit'
+				act'Leave':gt 'booty_call_leave', 'exit'
 			end
 		end
 		
@@ -579,7 +599,7 @@ if $ARGS[0] = 'no_condom2':
 			booty_call['promise_no_creampie'] = 1
 			booty_call['must_fuck'] = 1
 			cla & *nl
-			'"Well... Alright..." you say heistantly. "But don''t you dare come inside me, okay?"'
+			'"Well... Alright..." you say hesitantly. "But don''t you dare come inside me, okay?"'
 			gs 'booty_call_sex', 'position_choose'
 		end
 	end
@@ -819,7 +839,7 @@ if $ARGS[0] = 'disable_condoms_options1':
 				'Your jaw drops.'
 				*nl
 				'<i>Son of a bitch! Why is this guy so fucking careful?!</i>'
-				gs 'booty_call_condoms', 'npc_condom_use'
+				act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 			else
 				booty_call['no_condom'] = 1
 				npc_bareback[$boy] = 1
@@ -1056,7 +1076,7 @@ if $ARGS[0] = 'reenable_condoms2':
 				'"Do you mind if we use yours today?"'
 				'"Not at all," he says, reaching for a condom from his nightstand and you feel happy that this didn''t turn into a big deal.'
 			end
-			gs'booty_call_condoms', 'npc_condom_use'
+			act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 		end
 		
 		if prezik > 0:
@@ -1088,7 +1108,7 @@ if $ARGS[0] = 'temp_disable_condoms':
 				'"Let''s skip the condom today," you smile. "It''ll feel better without it."'
 				gs 'booty_call_condoms', 'npc_temp_no_condom_react'
 			end
-			
+						
 			if mesec > 0:
 				act'I''m on my period':
 					booty_call['probably_safe_day'] = 1
@@ -1163,14 +1183,14 @@ if $ARGS[0] = 'npc_preg_react':
 end
 
 if $ARGS[0] = 'npc_no_condom_react':
-	if npc_condom_conscious[$boy] = 2 or (npc_condom_conscious[$boy] = 1 and (rand(npc_willpwr[$boy],100) - npc_rel[$boy]) < pcs_persuas):
+	if npc_condom_conscious[$boy] = 2 or (npc_condom_conscious[$boy] = 1 and (rand(npc_willpwr[$boy],100) - npc_rel[$boy]) > pcs_persuas):
 		booty_call['condom'] = 1
 		booty_call['npc_condom_insist'] = 1
 		'"I want to use one anyways," <<$npc_firstname[$boy]>> says, shaking his head and reaching back for the condom. "Better to be safe."'
 		'Your jaw drops.'
 		*nl
-		'<i>A free pass to go bareback forever and he doesn''t take it? What''s with him??</i>'
-		gs 'booty_call_sex', 'npc_condom_use'
+		'<i>A free pass to go bareback forever and he doesn''t take it? What''s with this guy?</i>'
+		act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 	else
 		booty_call['no_condom'] = 1
 		npc_bareback[$boy] = booty_call['temp_bareback']
@@ -1185,14 +1205,14 @@ if $ARGS[0] = 'npc_no_condom_react':
 end
 
 if $ARGS[0] = 'npc_temp_no_condom_react':
-	if npc_condom_conscious[$boy] = 2 or (npc_condom_conscious[$boy] = 1 and (rand(npc_willpwr[$boy],100) - npc_rel[$boy]) < pcs_persuas):
+	if npc_condom_conscious[$boy] = 2 or (npc_condom_conscious[$boy] = 1 and (rand(npc_willpwr[$boy],100) - npc_rel[$boy]) > pcs_persuas):
 		booty_call['condom'] = 1
 		booty_call['npc_condom_insist'] = 1
 		'"I want to use one anyways," <<$npc_firstname[$boy]>> says, shaking his head and reaching back for the condom. "Better to be safe."'
 		'Your jaw drops.'
 		*nl
-		'<i>A free pass to go bareback and he doesn''t take it? What''s with him??</i>'
-		gs 'booty_call_sex', 'npc_condom_use'
+		'<i>A free pass to go bareback and he doesn''t take it? What''s with this guy?</i>'
+		act'Continue':gs 'booty_call_condoms', 'npc_condom_use'
 	else
 		booty_call['no_condom'] = 1
 		'"This is going to feel so good," <<$npc_firstname[$boy]>> says and your smile widens into a full blown grin.'
@@ -1232,11 +1252,12 @@ if $ARGS[0] = 'bareback_check':
 		end
 	end
 	gs 'booty_call_condoms', 'need_condoms_today'
+	gs 'booty_call_condoms', 'already_creampie2'
 end
 
 if $ARGS[0] = 'need_condoms_today':
 	act'Need condoms today':
-		booty_call['danger_day'] = 1
+		if stat['dangerous_day'] = 1: booty_call['danger_day'] = 1
 		booty_call['no_creampies_today'] = 1
 		cla
 		act'Use his':
@@ -1312,6 +1333,7 @@ if $ARGS[0] = 'pc_dangerous_day':
 			
 			act'We need to use a condom':
 				cla & *clr
+				booty_call['pc_wants_condoms'] = 1
 				$npc_apt_bedroom[$boy]
 				if ovulate > 0:
 					'"I''m ovulating right now," you warn <<$npc_firstname[$boy]>>. "We need to use a condom."'
@@ -1508,6 +1530,80 @@ if $ARGS[0] = 'pc_safe_day':
 	end
 end
 
+if $ARGS[0] = 'already_creampie1':
+	!! someone already came inside you earlier today so you throw caution to the wind
+	if stat['last_creampie'] = daystart:
+		if npc_bareback[$boy] ! 1:
+			act'Already been creampied today (go bareback)':
+				booty_call['no_condom'] = 1
+				cla & *nl
+				'"Somebody came inside me earlier," you say. "So let''s skip the rubber. Seems a little too late for condoms."'
+				if $npc_cum_pref[$boy] = 'creampie':
+					'"Does that mean I can come inside you too?" <<$npc_firstname[$boy]>> asks eagerly.'
+					act'No':
+						cla & *nl
+						'"No it does not," you reply, twisting your mouth in a wry smirk. "I feel like we don''t need to be extra careful, I didn''t say I want to be extra risky."'
+						gs 'booty_call_sex', 'position_choose'
+					end
+					
+					act'Yes':
+						cla & *nl
+						booty_call['creampie_allowance'] = 1
+						'"Go for it," you smile back. "Pump me full of cum."'
+						gs 'booty_call_sex', 'position_choose'
+					end
+				else
+					'"You really get around don''t you?" <<$npc_firstname[$boy]>> says amusedly.'
+					act'Blush':
+						cla & *nl
+						'Your cheeks flush with heat as <<$npc_firstname[$boy]>> pulls you towards him.'
+						gs 'booty_call_sex', 'position_choose'
+					end
+					
+					act'Giggle':
+						cla & *nl
+						'"Shut up," you giggle back as <<$npc_firstname[$boy]>> pulls you towards him.'
+						gs 'booty_call_sex', 'position_choose'
+					end
+				end
+			end
+		end
+		if npc_creampie_okay[$boy] ! 2:
+			act'Already been creampied today (free creampies)':
+				booty_call['no_condom'] = 1
+				booty_call['creampie_allowance'] = 1
+				cla & *nl
+				'"Somebody already came inside me today," you say. "If I have to get a pill anyways, I might as well make the most of it."'
+				'You pull <<$npc_firstname[$boy]>> close to whisper in his ear.'
+				'<i>"Come inside me as much as you want."</i>'
+				gs 'booty_call_sex', 'position_choose'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'already_creampie2':
+	!! someone already came inside you earlier today so you throw caution to the wind
+	if stat['last_creampie'] = daystart:
+		act'Already been creampied today  (go bareback)':
+			cla & *nl
+			booty_call['no_condom'] = 1
+			'"Well," you say with a wry smirk. "Seeing as someone else already came inside me today, it feels a little silly to worry about condoms. So yeah, fuck me bareback."'
+			gs 'booty_call_sex', 'position_choose'
+		end
+		
+		act'Already been creampied today (free creampies)':
+			booty_call['no_condom'] = 1
+			booty_call['creampie_allowance'] = 1
+			cla & *nl
+			'"Well," you say with a wry smirk. "Seeing as someone else already came inside me today, it feels a little silly to worry about condoms. In fact..."'
+			'You pull <<$npc_firstname[$boy]>> close to whisper in his ear.'
+			'<i>"Come inside me as much as you want."</i>'
+			gs 'booty_call_sex', 'position_choose'
+		end
+	end
+end
+
 if $ARGS[0] = 'no_more_free_creampies1':
 	if npc_free_creampies[$boy] > 0:
 		act'About creampies':
@@ -1657,4 +1753,406 @@ if $ARGS[0] = 'no_more_free_creampies5':
 		gs 'booty_call_sex', 'position_choose'
 	end
 end
---- booty_call_condoms ---------------------------------
+
+if $ARGS[0] = 'virgin_condom1':
+	act'Wait for him':
+		booty_call['condom'] = 1
+		gs 'booty_call_condoms', 'npc_condom_use_stats'
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
+		'He tears open the packaging and begins rolling the rubber sleeve onto his cock. You watch him, anxious with anticipation, thinking about what''s about to happen next.'
+		*nl
+		'With the condom securely wrapped around his manhood, he lines his cock up with your pussy and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
+		if npc_sex_speed[$boy] = 3 and (npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1):
+			act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
+		else
+			act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
+		end
+	end
+	
+	gs 'booty_call_condoms', 'virgin_no_condom'
+end
+
+if $ARGS[0] = 'virgin_condom_ask1':
+	act'Ask him to use a condom':
+		if booty_call['condom_setup'] ! 1: gs 'booty_call_condoms', 'setup'
+		gs 'booty_call_condoms', 'check_count'
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"Can you use a condom?" you whisper. "Please?"'
+		if npc_condom_conscious[$boy] = 1:
+			'"Of course," <<$npc_firstname[$boy]>> says, already tearing open a package. "I''m not an idiot you know."'
+			gs 'booty_call_virgin', 'start_with_condom'
+		else
+			if npc_no_condoms[$boy] = 1:
+				'"Nah, fuck that rubber shit. I don''t use it."'
+				npc_no_condoms_know[$boy] = 1
+				gs'booty_call_condoms', 'virgin_condom_ask2'
+				gs'booty_call_condoms', 'virgin_no_condom_shock1'
+			elseif booty_call['condom_count'] <= 0:
+				'"Can''t. I''m all out."'
+				gs'booty_call_condoms', 'virgin_condom_ask2'
+			else
+				if rand(1,2) = 2:
+					'<<$npc_firstname[$boy]>> nods and gets one out, tearing open the package and pulling out the little rubber sleeve.'
+					gs 'booty_call_virgin', 'start_with_condom'
+				else
+					'"Come on," he says. "You really want to use a condom for your first time?"'
+					gs'booty_call_condoms', 'virgin_condom_ask3'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_condom_ask2':
+	act'Then we''re not fucking':
+		cla & *clr
+		if npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1:
+			$npc_apt_bedroom[$boy]
+			if npc_no_condoms[$boy] = 1:
+				'"Woah! What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "If you''re not gonna use a condom, there''s no way I''m letting you fuck me!"'
+			elseif booty_call['condom_count'] <= 0:
+				'"Woah!" you exclaim, snapping your legs closed and pulling back from him. "If you don''t have a condom, then we can''t do this."'
+			end
+			'"Don''t be such a bitch about it! Come on! Let''s just do this!"'
+			act'Let him pressure you':
+				cla & *nl
+				'Your conscience rails against you as he pushes you down onto the bed. You want to refuse him, you <i>want</i> to tell him no, but you don''t want to fight him either. You don''t want him to see you as a bitch, even if you know you''re right.'
+				*nl
+				'With an internal sigh of resignation and not a small amount of regret, you spread your legs, and moments later, he takes your virginity.'
+				*nl
+				'<i>Without</i> a condom.'
+				gs'booty_call_virgin', 'miss_virg_start'
+			end
+			gs 'willpower', 'sex', 'resist', 'medium'
+			if will_cost <= pcs_willpwr:
+				act'Stand firm (<<will_cost>> Willpower)':
+					cla & *nl
+					'"Nuh uh. If there''s no condom, there''s no sex." He pulls back with a sigh.'
+					gs'booty_call_virgin', 'change_mind'
+				end
+			else
+				act'Stand firm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+			end
+		else
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			if npc_no_condoms[$boy] = 1:
+				'"Woah! What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "If you''re not gonna use a condom, there''s no way I''m letting you fuck me!"'
+			elseif booty_call['condom_count'] <= 0:
+				'"Woah!" you exclaim, snapping your legs closed and pulling back from him. "If you don''t have a condom, then we can''t do this."'
+			end
+			'<<$npc_firstname[$boy]>> takes a deep breath and pulls back.'
+			'"Sorry," he smiles shyly at you. "I was thinking with my dick instead of my head. You''re right, we shouldn''t do this without protection. What should we do instead?"'
+			gs'booty_call_start', 'foreplay_choose'
+			
+			act'Change your mind':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				'You blink in surprise.'
+				'His reasonableness is somehow... unexpected? But that he was willing to accept what you wanted so easily makes you...'
+				*nl
+				'Arousal throbs in your pussy. You can feel juices practically dripping from its lips. You <i>ache</i> to feel him inside you.'
+				*nl
+				'"Okay," you whisper. "We can do it without a condom."'
+				'"But I thought-"'
+				'"You''re too reasonable. Makes me want you more," you smile. "Enough to risk doing it without a condom."'
+				'"I''m not sure I understand," he smiles back. You shrug.'
+				'"Me either."'
+				act'Let him get into position':
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+					gs 'booty_call_virgin', 'start_without_condom'
+				end
+				
+				gs 'booty_call_condoms', 'virgin_condom2'
+			end
+		end
+	end
+
+	act'Maybe it''s okay?':
+		cla & *nl
+		'<i>Well... Maybe it''s okay?</i> you rationalize. It''s your first time. If he doesn''t use condoms, maybe he knows better? You can always change your mind in the future. But it''s just once. What could go wrong?'
+		booty_call['no_condom'] = 1
+		gs'booty_call_condoms', 'virgin_condom2'
+	end	
+end
+
+if $ARGS[0] = 'virgin_condom_ask3':
+	act'Maybe he has a point':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'Once again, the heady feeling of arousal becomes irresistible. You <i>ache</i> to feel him inside you and the thought of even a thin sleeve of rubber separating your cock from your pussy suddenly feels distasteful to you. It''s your first time. You want to feel <i>everything.</i>'
+		*nl
+		'"Okay," you smile. "Just this once."'
+		booty_call['no_condom'] = 1
+		gs 'booty_call_condoms', 'virgin_condom2'
+	end
+
+	act'Hell yes I do (STD)':
+		cla & *nl
+		'"Uhh, <i>hell yes</i> I do," you say with a look of suspicion. "I''m not about to have sex for the first time and immediately get an STD."'
+		'"An STD? That''s what you''re afraid of? I''m clean! Obviously!"'
+		act'I don''t know that':
+			cla & *nl
+			if npc_no_condoms_know[$boy] = 1:
+				'"How the fuck am I supposed to know that''s true?" you exclaim. "You just told me you don''t use condoms! That means you''re a risk! Unless you have a negative test on you right now, which I''m guessing you don''t. I''m not about to risk it just because you tell me to ''trust you.''"'
+				'"Well if you want to use a condom, then you''re gonna have to provide one," he huffs. "Cause I just told you: I don''t use them."'
+				gs 'booty_call_condoms', 'virgin_npc_doesnt_condom'
+			else
+				'"I don''t know that!" you spit back. "Where''s the proof? You have a negative test on you? I''m not about to risk it just because you tell me to ''trust you.''"'
+				'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs.'
+				*nl
+				'A moment after that, <<$npc_firstname[$boy]>> takes your virginity.'
+				booty_call['condom'] = 1
+				gs'booty_call_virgin', 'miss_virg_start'
+			end
+		end
+
+		act'Trust him':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'"If you say so..." you say hesitantly. He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, <<$npc_firstname[$boy]>> takes your virginity.'
+			gs'booty_call_virgin', 'miss_virg_start'
+		end
+	end
+
+	if birth_control['think_safe'] = 0:
+		act'Hell yes I do (pregnancy)':
+			cla & *nl
+			'"Uhh, <i>hell yes</i> I do," you say with an obvious expression on your face. "I''m not risking getting pregnant. <i>Especially</i> on my first time!"'
+			'"That''s what you''re worried about? Come on, I''ll pull out. I promise."'
+			act'No way!':
+				cla & *nl
+				'"No fucking way!" you say. "I''m not just gonna trust you to pull out because you say you will! Even if you really mean it, anything could happen by accident. I''m not taking any chances!"'
+				if npc_no_condoms_know[$boy] = 1:
+					'"Well if you want to use a condom, then you''re gonna have to provide one," he huffs. "Cause I just told you: I don''t use them."'
+					gs 'booty_call_condoms', 'virgin_npc_doesnt_condom'
+				else
+					'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs. A moment after that, he takes your virginity.'
+					gs 'booty_call_condoms', 'npc_condom_use_stats'
+					gs'booty_call_virgin', 'miss_virg_start'
+				end
+			end
+
+			act'Trust him':
+				booty_call['promise_no_creampie'] = 1
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"If you say so," you sigh. "But you <i>absolutely cannot</i> cum inside me, alright?"'
+				'He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, he takes your virginity.'
+				booty_call['condom'] = 3
+				gs'booty_call_virgin', 'miss_virg_start'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_no_condom_shock1':
+	act'What the fuck?!':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "You don''t use condoms?"'
+		'"No! Of course I don''t!" he says. "Condoms fucking suck. Can''t feel anything with one of those on. You want to use something that gets in the way of pleasure?"'
+		gs 'booty_call_leave', 'no_condom_breakoff'
+	end
+	
+	gs 'booty_call_condoms', 'virgin_condom_ask3'
+end
+
+if $ARGS[0] = 'virgin_npc_doesnt_condom':
+	if prezik > 0:
+		act'Use one of your condoms':
+			'"Fine! Here!" You fish through your bag and pull one out handing it to him.'
+			'While he rolls it on, you make sounds of annoyance, glaring at him.'
+			'"Really making my first time special," you grumble to yourself.'
+			*nl
+			'With the condom securely in place, he gets back in position between your legs.'
+			*nl
+			'A moment after that, <<$npc_firstname[$boy]>> takes your virginity.'
+			booty_call['condom'] = 1
+			gs'booty_call_virgin', 'miss_virg_start'
+		end
+		
+		gs 'booty_call_leave', 'no_condom_breakoff'
+	else
+		'"Well I don''t have any either," you growl back.'
+		'"Look who wants to fuck with a condom but doesn''t have any now," <<$npc_firstname[$boy]>> rolls his eyes.'
+		act'Embarrassed':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'You blush fiercely, turning away.'
+			'<i>I''m a virgin!</i> you think to yourself. <i>Why would I have condoms?</i>'
+			'<i>You wanted to have sex,</i> another part of you thinks. <i>Why <b>don''t</b> you have any condoms?</i>'
+			gs'booty_call_virgin', 'change_mind'
+		end
+		
+		act'Angry':
+			cla & *clr
+			$npc_apt_bedroom[$boy]
+			'"I''m a fucking virgin!" you shout. "Why would I have condoms?!"'
+			gs'booty_call_after', 'quit2'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_no_condom':
+	act'Ask him not to use a condom':
+		cla
+		act'Not for your first time':
+			cla & *nl
+			'"Wait," you say. "I don''t want you to use a condom. Not for my first time."'
+			gs 'booty_call_condoms', 'virgin_condom2'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_condom2':
+	if morning_after_pill > 0:
+		act'Have a morning after pill':
+			booty_call['plan_b'] = 1
+			cla & *nl
+			'"Besides," you look pointedly at your bag. "I have a morning after pill."'
+			'<<$npc_firstname[$boy]>> raises an eyebrow back at you.'
+			if hour >= 18:
+				'"Were you expecting to lose your virginity tonight?"'
+			else
+				'"Were you expecting to lose your virginity today?"'
+			end
+			if LudaQW['free_condoms'] = 1 and stat['morning_after_pill'] = 0:
+				if LudaQW['condom_give_day'] = daystart:
+					'"My aunt gave it to me today," you mumble shyly. "I don''t think she was expecting me to use it this soon though..."'
+				elseif LudaQW['condom_give_day'] >= daystart - 7:
+					'"My aunt gave it to me earlier this week," you mumble shyly. "For emergencies..."'
+				elseif LudaQW['condom_give_day'] >= daystart - 30:
+					'"My aunt gave it to me a few weeks ago," you mumble shyly. "Just in case..."'
+				elseif LudaQW['condom_give_day'] >= daystart - 7:
+					'"My aunt gave it to me a long time ago," you mumble shyly. "Just in case..."'
+				end
+				gs 'booty_call_condoms', 'virgin_condom3'
+			else
+				act'No':
+					cla & *nl
+					'"No," you blush fiercely. You''re not sure if he believes you though...'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+				
+				act'Maybe':
+					cla & *nl
+					'"Maybe..." you smile nervously.'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+				
+				act'Yes':
+					cla & *nl
+					'"I was really hoping I would..." you smile nervously.'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+				
+				act'Rape emergency':
+					cla & *nl
+					'"A girl like me has to be careful," you mumble nervously. "There are rapists out there you know."'
+					gs 'booty_call_condoms', 'virgin_condom3'
+				end
+			end
+		end
+	else
+		act'Buy a morning after pill':
+			booty_call['pill_tomorrow'] = 1
+			cla & *nl
+			'"Besides, something bad happens I can get a morning after pill," you promise. "I might even get one regardless, just to be safe."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	end
+	
+	if stat['safe_day'] = 1:
+		act'It''s a safe day':
+			cla & *nl
+			booty_call['safe_day'] = 1
+			'"It''s a safe day," you add nervously. "I won''t get pregnant."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+		
+		act'It''s a safe day (come inside)':
+			cla & *nl
+			booty_call['virgin_creampie_request'] = 1
+			booty_call['safe_day'] = 1
+			'"And it''s a safe day," you add hesitantly. "I won''t get pregnant if you... if you want to come inside me..."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	elseif stat['probably_safe_day'] = 1:
+		act'It''s probably safe today':
+			booty_call['probably_safe_day'] = 1
+			cla & *nl
+			'"It''s a safe-ish day," you add nervously. "I probably won''t get pregnant."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+		
+		act'It''s probably safe today (come inside)':
+			cla & *nl
+			booty_call['virgin_creampie_request'] = 1
+			booty_call['probably_safe_day'] = 1
+			'"And it should be a safe-ish day," you add hesitantly. "I probably won''t get pregnant if you... if you want to come inside me..."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	elseif stat['dangerous_day'] = 1:
+		act'Don''t come inside me (danger day)':
+			cla & *nl
+			booty_call['danger_day'] = 1
+			'"Just... don''t come inside me," you add nervously. "It''s a danger day for me..."'
+			gs 'booty_call_condoms', 'virgin_condom3'
+		end
+	end
+end
+
+if $ARGS[0] = 'virgin_condom3':
+	if booty_call['safe_day'] = 1:
+		if npc_childfree[$boy] = 1 and booty_call['virgin_creampie_request'] = 1:
+			booty_call['condom_bonus'] -= 15
+		else
+			booty_call['condom_bonus'] -= 30
+		end
+	elseif booty_call['probably_safe_day'] = 1:
+		if npc_childfree[$boy] = 1 and booty_call['virgin_creampie_request'] = 1:
+			booty_call['condom_bonus'] -= 5
+		else
+			booty_call['condom_bonus'] -= 20
+		end
+	elseif booty_call['danger_day'] = 1:
+		if npc_childfree[$boy] = 1 and booty_call['virgin_creampie_request'] = 1:
+			booty_call['condom_bonus'] += 30
+		else
+			booty_call['condom_bonus'] -= 10
+		end
+	elseif npc_childfree[$boy] = 1 and npc_condom_conscious[$boy] > 0:
+		booty_call['condom_bonus'] += 30
+	end
+	if booty_call['condom_count'] = 0 or booty_call['no_condom'] = 1:
+		if $npc_cum_pref[$boy] = 'creampie' and booty_call['virgin_creampie_request'] = 1:
+			'<<$npc_firstname[$boy]>> gulps, apparently stunned with arousal at the thought of coming inside you. It takes several seconds before he nods slowly.'
+		else
+			'"Okay," <<$npc_firstname[$boy]>> nods.'
+		end
+		gs 'booty_call_virgin', 'start_without_condom'
+	elseif rand(npc_willpwr[$boy],100) + booty_call['condom_bonus'] < pcs_persuas + npc_rel[$boy] and npc_condom_conscious[$boy] ! 2:
+		booty_call['no_condom'] = 1
+		booty_call['condom'] = 0
+		if booty_call['virgin_creampie_request'] = 1: booty_call['creampie_allowance'] = 1
+		'<<$npc_firstname[$boy]>> stops, looking back at you for a moment before smiling.'
+		'"Okay," he says and puts the rubber back on the nightstand.'
+		*nl
+		gs 'booty_call_virgin', 'start_without_condom'
+	else
+		'"We shouldn''t risk it," <<$npc_firstname[$boy]>> says, shaking his head and opening the condom anyways. "Especially not for your first time."'
+		act'Wait for him':
+			booty_call['condom'] = 1
+			gs 'booty_call_condoms', 'npc_condom_use_stats'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
+			'He tears open the packaging and begins rolling the rubber sleeve onto his cock. You watch him, anxious with anticipation, thinking about what''s about to happen next.'
+			gs 'booty_call_virgin', 'start_with_condom'
+		end
+	end
+end
+
+--- booty_call_condoms ---------------------------------

locations/booty_call_cowgirl.qsrc

@@ -4,6 +4,7 @@ if $ARGS[0] = 'cowgirl_start':
 	if booty_call['change_pos'] = 1:
 		act'Switch to cowgirl':
 			cla & *clr
+			booty_call['cock_inserted'] = 1
 			booty_call['change_pos'] = 0
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/cowgirl1.jpg"></center>'
 			if $booty_call['position'] = 'miss':
@@ -18,27 +19,33 @@ if $ARGS[0] = 'cowgirl_start':
 
 			act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
 		end
-	elseif booty_call['force_initiative'] = 2:
-		gs'booty_call_sex', 'speed_select'
-		'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow1.mp4"></video></center>'
-		if $booty_call['position'] = 'miss':
-			!! IMAGE HERE
-			'You''ve barely finished your orgasm when he pulls you backwards on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
-		elseif $booty_call['position'] = 'doggy':
-			!! IMAGE HERE
-			'You''ve barely finished your orgasm when he turns you over and pulls you back on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
-		elseif $booty_call['position'] = 'cowgirl':
-			!! IMAGE HERE
-			'You''ve barely finished your orgasm when he begins moving his hips again underneath you. You mew in protest, hypersensitive to every movement of his cock inside your still-quivering pussy. At his insistence, you start moving your hips again.'
-		end
-		act'Ride him gently':gt 'booty_call_cowgirl', 'cowgirl1'
+	elseif booty_call['force_initiative'] = 2 and booty_call['cock_inserted'] = 1:
+		cla
+		act'Continue':
+			cla & *clr
+			booty_call['cock_inserted'] = 1
+			gs'booty_call_sex', 'speed_select'
+			'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/slow1.mp4"></video></center>'
+			if $booty_call['position'] = 'miss':
+				!! IMAGE HERE
+				'You''ve barely finished your orgasm when he pulls you backwards on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
+			elseif $booty_call['position'] = 'doggy':
+				!! IMAGE HERE
+				'You''ve barely finished your orgasm when he turns you over and pulls you back on top of him. You groan in protest, but he continues anyways, lowering you onto his cock and forcing an involunary mew from you. At his insistence, you start moving your hips.'
+			elseif $booty_call['position'] = 'cowgirl':
+				!! IMAGE HERE
+				'You''ve barely finished your orgasm when he begins moving his hips again underneath you. You mew in protest, hypersensitive to every movement of his cock inside your still-quivering pussy. At his insistence, you start moving your hips again.'
+			end
+			act'Ride him gently':gt 'booty_call_cowgirl', 'cowgirl1'
 
-		act'Ride him steadily':gt 'booty_call_cowgirl', 'cowgirl2'
+			act'Ride him steadily':gt 'booty_call_cowgirl', 'cowgirl2'
 
-		act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
-	elseif booty_call['initiative'] ! 1:
+			act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
+		end
+	elseif booty_call['initiative'] ! 1 or booty_call['force_initiative'] = 2:
 		act'Continue':
 			cla & *clr
+			booty_call['cock_inserted'] = 1
 			if booty_call['fuck_count'] = 0:
 				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/enter1.mp4"></video></center>'
 				'He lays back on the bed, pulling you on top of him as he does. You get the message and line yourself up with his cock.'
@@ -59,16 +66,18 @@ if $ARGS[0] = 'cowgirl_start':
 	else
 		act'Climb on top of him':
 			cla & *clr
+			booty_call['cock_inserted'] = 1
 			'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/enter1.mp4"></video></center>'
 			if booty_call['fuck_count'] = 0:
 				'You push him back onto the bed and throw your legs over his.'
 				'"I want to be on top."'
 			elseif $booty_call['position'] = 'cowgirl':
 				'You crawl forward back into position, throwing your legs over his.'
-				'"Time to go for another ride."'
+				'"I''m not done riding you."'
+			elseif $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl':
+				'"I want to be on top this time," you say, giving <<$npc_firstname[$boy]>> a smouldering look as you mount his cock.'
 			else
-				'You push him back onto the bed and throw your legs over his.'
-				'"I want to be on top this time."'
+				'"I''m not done with you yet," you say, giving <<$npc_firstname[$boy]>> a smouldering look as you mount his cock.'
 			end
 
 			act'Ride him gently':gt 'booty_call_cowgirl', 'cowgirl1'
@@ -81,18 +90,19 @@ if $ARGS[0] = 'cowgirl_start':
 end
 
 if $ARGS[0] = 'cowgirl_goto':
+	booty_call['cock_inserted'] = 1
 	if booty_call['speed'] = 0: booty_call['speed'] = rand(1,3)
 	gt 'booty_call_cowgirl', 'cowgirl<<booty_call[''speed'']>>'
 end
 
 if $ARGS[0] = 'cowgirl1':
+	booty_call['cowgirl_fuck'] = 1
 	!! slow pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['speed'] = 1
 	$booty_call['position'] = 'cowgirl'
 	$booty_call['pos_speed'] = 'cowgirl1'
 	!! booty_call['cowgirl_fuck'] tracks if you fuck in this position
-	booty_call['cowgirl_fuck'] = 1
 !!	if pcs_vag = 0:gt 'booty_call_virgin', 'cowgirl_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -155,6 +165,7 @@ if $ARGS[0] = 'cowgirl1':
 end
 
 if $ARGS[0] = 'cowgirl1.2':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -176,6 +187,7 @@ if $ARGS[0] = 'cowgirl1.2':
 end
 
 if $ARGS[0] = 'cowgirl1.bored':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -187,6 +199,7 @@ if $ARGS[0] = 'cowgirl1.bored':
 end
 
 if $ARGS[0] = 'cowgirl2':
+	booty_call['cowgirl_fuck'] = 1
 	!! medium pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['speed'] = 2
@@ -255,6 +268,7 @@ if $ARGS[0] = 'cowgirl2':
 end
 
 if $ARGS[0] = 'cowgirl2.2':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -276,6 +290,7 @@ if $ARGS[0] = 'cowgirl2.2':
 end
 
 if $ARGS[0] = 'cowgirl2.bored':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -287,13 +302,13 @@ if $ARGS[0] = 'cowgirl2.bored':
 end
 
 if $ARGS[0] = 'cowgirl3':
+	booty_call['cowgirl_fuck'] = 1
 	!! fast/rough pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['speed'] = 3
 	$booty_call['position'] = 'cowgirl'
 	$booty_call['pos_speed'] = 'cowgirl3'
 	!! booty_call['cowgirl_fuck'] tracks if you fuck in this position
-	booty_call['cowgirl_fuck'] = 1
 !!	if pcs_vag = 0:gt 'booty_call_virgin', 'cowgirl_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -355,6 +370,7 @@ if $ARGS[0] = 'cowgirl3':
 end
 
 if $ARGS[0] = 'cowgirl3.2':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -399,6 +415,7 @@ if $ARGS[0] = 'cowgirl3.2':
 end
 
 if $ARGS[0] = 'cowgirl3.bored':
+	booty_call['cowgirl_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'cowgirl3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -447,7 +464,7 @@ if $ARGS[0] = 'cowgirl1_start_period_desc':
 		if pcs_vag <= 10:
 			'You gently roll your hips over his, grinding his cock against the inside your pussy. You breathe slowly, thankful for the blood from your period providing some lubrication for his thick shaft stretching your tight snatch.'
 		else
-			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it streches you out. Looking down, you can see his cock is stained red from your period, blood mixing with your juices, both of them providing a lot of natural lubrication.'
+			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it stretches you out. Looking down, you can see his cock is stained red from your period, blood mixing with your juices, both of them providing a lot of natural lubrication.'
 		end
 	elseif $npc_dick_desc[$boy] = 'long':
 		'You gently roll your hips over his, hugging the full length of his <<npc_dick[$boy]>>cm cock with your pussy. Looking down, you can see his cock is stained red from your period, blood mixing with your juices, both of them providing a lot of natural lubrication.'
@@ -493,7 +510,7 @@ if $ARGS[0] = 'cowgirl1_start_desc':
 		if pcs_vag <= 10:
 			'You gently roll your hips over his, grinding his cock against the inside your pussy. You breathe slowly trying to adjust as his thick shaft stretches your tight snatch.'
 		else
-			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it streches you out.'
+			'You gently roll your hips over his, grinding his thick cock against the inside your pussy, breathing slowly as it stretches you out.'
 		end
 	elseif $npc_dick_desc[$boy] = 'long':
 		'You gently roll your hips over his, hugging the full length of his <<npc_dick[$boy]>>cm cock with your pussy.'

locations/booty_call_cum.qsrc

@@ -7,6 +7,7 @@ if $ARGS[0] = 'girl_cum':
 !!	if pcs_horny < 30:pcs_horny = 30
 	booty_call['orgasm'] = orgasm
 	booty_call['orgasm_count'] += 1
+		
 	if $booty_call['position'] = 'miss':
 		gt'booty_call_cum', 'miss_cum'
 	elseif $booty_call['position'] = 'doggy':
@@ -212,6 +213,7 @@ if $ARGS[0] = 'cowgirl_cum':
 end
 
 if $ARGS[0] = 'fuck_cum_random':
+	booty_call['his_choice'] = 0
 	booty_call['cum_choice'] = rand(1,10)
 	booty_call['fuck_count'] += 1
 	booty_call['cum_count'] += 1
@@ -225,12 +227,16 @@ if $ARGS[0] = 'fuck_cum_random':
 !!	if npc_generous[$boy] = 1 and booty_call['cum_choice'] <= 9:
 	if booty_call['cum_choice'] > 1 and booty_call['cum_choice'] < 10: booty_call['cum_warn'] = 1
 	
+!!	if booty_call['cum_choice'] = 10 and booty_call['fucking'] = 1:
 	if booty_call['cum_choice'] = 10:
 		if booty_call['extra_caution'] = 1 and booty_call['no_condom'] = 1 and booty_call['creampie_allowance'] ! 1:
 			$booty_call['cum_choice'] = 'pullout'
 		else
 			$booty_call['cum_choice'] = 'creampie_surprise'
 		end
+	elseif booty_call['virgin_creampie_request'] = 1 and booty_call['creampie_count'] = 0 and booty_call['no_condom'] = 1:
+		booty_call['cum_where'] = 1
+		!! add something later?
 	elseif booty_call['cum_choice'] > 7:
 		gs'booty_call_cum', 'random_cum_choice'
 	elseif booty_call['cum_choice'] > 5:
@@ -244,6 +250,7 @@ if $ARGS[0] = 'fuck_cum_random':
 			end
 		end
 	else
+		!! boy will cum where he wants without asking
 		booty_call['his_choice'] = 1
 		if rand(1,10) >= 9:
 			gs'booty_call_cum', 'cum_mouth'
@@ -279,9 +286,14 @@ if $ARGS[0] = 'random_cum_choice':
 end
 
 if $ARGS[0] = 'fuck_cum':
+	cla
 	!! flags to remember what kind of fucking happened during sex
 	if booty_call['morning_after'] = 1:booty_call['morning_fuck'] = 1
 	booty_call['fuck'] = 1
+	booty_call['cock_inserted'] = 1
+	booty_call['no_sex'] = 0
+	booty_call['fuck_again'] = 0
+	booty_call['must_fuck'] = 0
 	if booty_call['speed'] = 1: booty_call['gentle_fuck'] = 1
 	if booty_call['speed'] = 2: booty_call['steady_fuck'] = 1
 	if booty_call['speed'] = 3: booty_call['rough_fuck'] = 1
@@ -290,7 +302,7 @@ if $ARGS[0] = 'fuck_cum':
 	booty_call['cycle_limit'] += 1
 	if booty_call['cycle_limit'] >= 4:booty_call['boy_cum'] = 1
 	if booty_call['boy_cum'] < 1:booty_call['boy_cum'] = rand(-1,1)
-	if booty_call['boy_cum'] >= 1:
+	if booty_call['boy_cum'] >= 1 and booty_call['cycle_limit'] > 0:
 		cla
 		gs 'booty_call_cum', 'fuck_cum_random'
 	else
@@ -323,13 +335,13 @@ if $ARGS[0] = 'fuck_cum':
 	end
 	
 !!	if (rand(0,1) = 1 or npc_selfish[$boy] = 1) and ($npc_cum_pref[$boy] = 'creampie' and booty_call['condom'] ! 1) and $npc_cum_pref[$boy] ! 'pullout' and $npc_cum_pref[$boy] ! '':
-	if booty_call['cum_warn'] = 1:	
+	if booty_call['cum_warn'] = 1 and booty_call['his_choice'] = 0:	
 		if booty_call['cum_where'] = 1:
 			'"What should I do?" <<$npc_firstname[$boy]>> asks.'
 		elseif $booty_call['cum_choice'] = 'creampie':
 			booty_call['he_ask'] = 1
 			booty_call['he_ask_creampie'] = 1
-			if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1:
+			if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and booty_call['danger_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1:
 				'"Can I come inside you? Is it safe today?" <<$npc_firstname[$boy]>> whimpers almost pleadingly.'
 			elseif booty_call['orgasm'] < orgasm:
 				'"Let''s come together," <<$npc_firstname[$boy]>> says, smiling at you.'
@@ -353,7 +365,7 @@ if $ARGS[0] = 'fuck_cum':
 		act'Come wherever you want':
 			cla & *nl
 			booty_call['cum_wherever'] = 1
-			if booty_call['he_ask'] ! 1:
+			if booty_call['he_ask'] ! 1 or booty_call['cum_warn'] = 1:
 				if $booty_call['position'] = 'doggy':
 					if booty_call['speed'] = 1:
 						'You turn your head over your shoulder to smile at <<$npc_firstname[$boy]>>.'
@@ -364,7 +376,11 @@ if $ARGS[0] = 'fuck_cum':
 						'"Come-! Wherever-! You want-!" you barely manage to get out as <<$npc_firstname[$boy]>> keeps smashing into you from behind.'
 					end
 				else
-					if booty_call['speed'] = 1:
+					if booty_call['virgin'] = 1 and booty_call['virgin_enjoyment'] = -1:
+						'"Come~! Wherever~! You~! Want~!" you whimper pathetically, squeaking in pain with every thrust.'
+					elseif booty_call['virgin'] = 1 and booty_call['virgin_feel_good'] ! 1:
+						'"Come~! Wherever~! You~! Want~!" you grunt uncomfortably with every thrust.'
+					elseif booty_call['speed'] = 1:
 						'"Come wherever you want," you smile at <<$npc_firstname[$boy]>>.'
 					elseif booty_call['speed'] = 2:
 						'"Come wherever you want!" you moan loudly as <<$npc_firstname[$boy]>> keeps fucking you.'
@@ -383,7 +399,7 @@ if $ARGS[0] = 'fuck_cum':
 		act'Finish him with your hand':gt 'booty_call_cum', 'cum_jerkoff'
 		
 		if booty_call['he_ask_facial'] = 1:
-			act'You can cum on my face':gs 'booty_call_cum', 'cum_facial'
+			act'You can come on my face':gs 'booty_call_cum', 'cum_facial'
 		else
 			act'On my face!':
 				if booty_call['cum_where'] = 1:
@@ -414,7 +430,7 @@ if $ARGS[0] = 'fuck_cum':
 		else
 			!!if booty_call['orgasm'] < orgasm or pcs_horny >= 85:
 			if booty_call['he_ask_creampie'] = 1:
-				if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1 and npc_know_bc[$boy] < 1:
+				if npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and booty_call['condom'] ! 1 and (npc_know_not_bc[$boy] = 1 or npc_know_bc[$boy] = 0) and booty_call['creampie_allowance'] = 0:
 					if birth_control['think_safe'] = 1:
 						act'I''m on birth control':
 							cla & *nl
@@ -440,7 +456,7 @@ if $ARGS[0] = 'fuck_cum':
 							'"It should be," you smile at him. "Go ahead."'
 							act'Continue':gt 'booty_call_cum', 'cum_inside'
 						end
-					else
+					elseif booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and booty_call['danger_day'] = 0:
 						act'It''s a safe day (lie)':
 							cla & *nl
 							booty_call['safe_day'] = 1
@@ -448,6 +464,8 @@ if $ARGS[0] = 'fuck_cum':
 							act'Continue':gt 'booty_call_cum', 'cum_inside'
 						end
 					end
+				elseif booty_call['orgasm'] < orgasm:
+					act'Come together':booty_call['he_ask_creampie_yes'] = 1 & gs 'booty_call_cum', 'cum_together'
 				else
 					act'Let him come inside you':
 						cla & *nl
@@ -468,7 +486,11 @@ if $ARGS[0] = 'fuck_cum':
 				act'Come inside me!':
 					cla & *nl
 					booty_call['creampie_ask'] = 1
-					'"Come inside me!" you cry. "Fill me up!"'
+					if booty_call['speed'] ! 3:
+						'"Come inside me," you smile. "Fill me up."'
+					else
+						'"Come inside me!" you cry. "Fill me up!"'
+					end
 					act'Continue':gt 'booty_call_cum', 'cum_inside'
 				end
 				
@@ -646,7 +668,7 @@ if $ARGS[0] = 'cum_wherever':
 end
 
 if $ARGS[0] = 'cum_jerkoff':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	$booty_call['cum_describe1'] = 'Sorry,'
 	$booty_call['cum_describe2'] = 'looking down at the strands of cum coating your fingers'
 	$booty_call['last_cum'] = 'hand'
@@ -675,7 +697,7 @@ if $ARGS[0] = 'cum_jerkoff':
 end
 
 if $ARGS[0] = 'cum_facial':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	$booty_call['cum_choice'] = 'facial'
 	$booty_call['last_cum'] = 'facial'
 	booty_call['cum_face'] += 1
@@ -713,14 +735,12 @@ if $ARGS[0] = 'cum_facial':
 		gs'booty_call_cum', 'facial_brace'
 		act'Jerk him yourself':gt'booty_call_cum', 'facial_jerk_him'
 		
-		
-		
 !!		act'Let him jerk off on your face':gt'booty_call_cum', 'facial_he_jerks'
 !!	end
 end
 
 if $ARGS[0] = 'facial_jerk_him':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	booty_call['cum_face'] += 1
 	booty_call['facial'] += 1
 	booty_call['pc_facial_jerk'] += 1
@@ -756,7 +776,7 @@ if $ARGS[0] = 'facial_jerk_him':
 end
 
 if $ARGS[0] = 'facial_he_jerks':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 
 	gs'booty_call_cum', 'facial_close_eyes'
 	gs'booty_call_cum', 'facial_tongue_swallow'
@@ -781,6 +801,7 @@ end
 
 if $ARGS[0] = 'facial_close_eyes':
 	act'Close your eyes':
+		booty_call['cum_face'] += 1
 		$booty_call['last_cum'] = 'facial'
 		$booty_call['cum_describe1'] = 'Thanks,'
 		$booty_call['cum_describe2'] = 'wiping the cum from your eyes'
@@ -902,7 +923,7 @@ if $ARGS[0] = 'facial_brace':
 			gs'booty_call_sex', 'sex_end'
 		end
 		if $npc_cum_pref[$boy] = 'facial' and booty_call['facial_ask'] = 1 and booty_call['facial_hate_comment'] ! daystart:
-			'"You hate it so much," he says "but you still asked me to do it."'
+			'"You hate it so much," he says "But you still asked me to do it?"'
 			act'I know you like it':
 				cla & *clr
 				'<center><video autoplay loop src="images/shared/sex/cum/facial/facial_after1.mp4"></video></center>'
@@ -958,14 +979,14 @@ if $ARGS[0] = 'facial_brace':
 				act'Feels weird':
 					cla & *clr
 					'"I don''t like the feeling of that on my skin," you grimace, <<$booty_call[''cum_describe2'']>>.'
-					'"So you had me cum on your face instead?"'
+					'"So you had me come onyour face instead?"'
 					'"... Shut up!"'
 					gs'booty_call_sex', 'sex_end'
 				end
 				
-				act'I should''ve let you cum on my tits':
+				act'I should''ve let you come on my tits':
 					cla & *clr
-					'"I should''ve let you cum on my tits," you grimace, <<$booty_call[''cum_describe2'']>>. "This was a mistake!"'
+					'"I should''ve let you come on my tits," you grimace, <<$booty_call[''cum_describe2'']>>. "This was a mistake!"'
 					gs'booty_call_sex', 'sex_end'
 				end
 			else
@@ -976,10 +997,14 @@ if $ARGS[0] = 'facial_brace':
 	end
 end
 if $ARGS[0] = 'cum_mouth':
-	booty_call['cock_remove'] = 1
+	cla
+	booty_call['cock_inserted'] = 0
 	!! differing descriptions based on position
 	!!'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
-	if booty_call['his_choice'] ! 2:
+	if booty_call['his_choice'] = 1:
+		'"I''m gonna come in your mouth!" is the only warning your receive before <<$npc_firstname[$boy]>> yanks his cock from your pussy and shoves it between your lips.'
+		act'Continue':gt'booty_call_cum', 'cum_mouth1'
+	else
 		if booty_call['mouth_ask'] = 1:
 			'"In my mouth!"'
 		elseif booty_call['he_ask_mouth'] = 1:
@@ -989,18 +1014,18 @@ if $ARGS[0] = 'cum_mouth':
 				'"Okay," you say.'
 			end
 		elseif booty_call['he_ask'] = 1:
-			'"Cum in my mouth instead!"'
+			'"Come in my mouth instead!"'
+			act'Put his cock in your mouth':gt'booty_call_cum', 'cum_mouth1'
 		elseif booty_call['not_inside'] = 1:
-			'"Not inside me!" you yelp frantically.'
+			'"Not inside me!" you yelp frantically. In response, <<$npc_firstname[$boy]>> yanks his cock from your pussy and moves it towards your mouth.'
 		end
+		act'Put his cock in your mouth':gt'booty_call_cum', 'cum_mouth1'
+		gs'booty_call_cum', 'facial_tongue_swallow'
 	end
-	cla
-	act'Put his cock in your mouth':gt'booty_call_cum', 'cum_mouth1'
-	gs'booty_call_cum', 'facial_tongue_swallow'
 end
 
 if $ARGS[0] = 'cum_mouth1':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	$booty_call['cum_choice'] = 'mouth'
 	$booty_call['last_cum'] = 'mouth'
 	booty_call['cum_mouth'] += 1
@@ -1050,7 +1075,10 @@ if $ARGS[0] = 'cum_mouth1':
 			end
 		end
 	end
-	
+	gs'booty_call_cum', 'cum_mouth2'
+end
+
+if $ARGS[0] = 'cum_mouth2':
 	act'Gather it in your mouth':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum51.jpg"></center>'
@@ -1084,6 +1112,20 @@ if $ARGS[0] = 'cum_mouth1':
 		end
 	end
 	
+	act'Spit':
+		booty_call['cum_mouth'] = 1
+		booty_call['spit'] = 1
+		booty_call['swallow'] = 0
+		booty_call['cum_count'] += 1
+		$booty_call['last_cum'] = 'spit'
+		gs 'cum_call', 'mouth', $boy, 1
+		gs 'stat'
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
+		'You draw yourself back up <<$npc_firstname[$boy]>>''s cock, keeping your lips tightly sealed, allowing the cum to pool at the front of your mouth. You hold it there for a few moments and then unpurse your lips, and letting all his cum dribble out of your mouth and down your chin.'
+		gs 'booty_call_sex', 'sex_end'
+	end
+	
 	if npc_like_cum_taste[$boy] < 1:
 		act'Gag':
 			cla & *clr
@@ -1094,7 +1136,7 @@ if $ARGS[0] = 'cum_mouth1':
 			booty_call['react'] = 1
 			gs'cum_call', 'mouth', $boy, 1
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/gag2.mp4"></video></center>'
-			'The intensity of the bitter flavor is far more than you expect and you immediately pull your mouth off, spitting out the first load. You stick your tongue out, tryiing to soldier through and at least take the rest of it but as soon as the next shot hits your tongue your gag reflex kicks in instead, causing you to retch.'
+			'The intensity of the bitter flavor is far more than you expect and you immediately pull your mouth off, spitting out the first load. You stick your tongue out, trying to soldier through and at least take the rest of it but as soon as the next shot hits your tongue your gag reflex kicks in instead, causing you to retch.'
 			'Still holding onto <<$npc_firstname[$boy]>>''s cock with one hand, you clamp your other hand over your mouth, throat convulsing. It smears the cum on your lips all over your face, but you somehow manage to stop yourself from throwing up all over the bed.'
 			
 			if npc_cum_gag[$boy] = 1:
@@ -1194,18 +1236,18 @@ if $ARGS[0] = 'cum_mouth_after':
 end
 
 if $ARGS[0] = 'cum_tits1':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	$booty_call['last_cum'] = 'tits'
 	booty_call['cum_tits'] += 1
 	gs'cum_call', 'face',$boy,1
 	!! differing descriptions based on position
 	cla & *nl
 	if booty_call['tits_ask'] = 1:
-		'"Cum on my tits!"'
+		'"Come on my tits!"'
 	elseif booty_call['he_ask_tits'] = 1:
 		'"Go ahead," you say.'
 	elseif booty_call['he_ask'] = 1:
-		'"Cum on my tits instead!"'
+		'"Come on my tits instead!"'
 	elseif booty_call['not_inside'] = 1:
 		'"Not inside me!" you yelp frantically.'
 	end
@@ -1231,14 +1273,16 @@ if $ARGS[0] = 'cum_tits1':
 	if booty_call['not_inside'] = 1:
 		act'Continue':gt 'booty_call_cum', 'cum_tits3'
 	else
+		act'Let him do it':gt 'booty_call_cum', 'cum_tits3'
+		
 		act'Finish him yourself':gt 'booty_call_cum', 'cum_tits2'
 		
-		act'Let him do it':gt 'booty_call_cum', 'cum_tits3'
+		gs 'booty_call_cum', 'cum_tits4'
 	end
 end
 
 if $ARGS[0] = 'cum_tits2':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	cla & *clr
 	booty_call['pc_titcum_jerk'] = 1
 	$booty_call['last_cum'] = 'tits'
@@ -1253,7 +1297,7 @@ if $ARGS[0] = 'cum_tits2':
 end
 
 if $ARGS[0] = 'cum_tits3':
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	cla & *clr
 	$booty_call['last_cum'] = 'tits'
 	gs 'cum_call', 'breasts', $boy, 1
@@ -1282,15 +1326,44 @@ if $ARGS[0] = 'cum_tits3':
 		if $booty_call['position'] = 'miss':
 			'You open up your legs to let him out and he scooches forward. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
 		elseif $booty_call['position'] = 'doggy':
-			'You hurridely pull yourself off of him, turning around and laying down on the bed. He scooches forward. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
+			'You hurriedly pull yourself off of him, turning around and laying down on the bed. He scooches forward. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
 		elseif $booty_call['position'] = 'cowgirl':
-			'You hurridely jump off of him, laying down on the bed. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
+			'You hurriedly jump off of him, laying down on the bed. After just a few pumps from his fingers, cum spurts out from the tip of his cock, sending the white fluid spattering across your skin as, <<$npc_firstname[$boy]>> blows his load all over your tits.'
 		end
 	end
 	'<<$npc_firstname[$boy]>> quickly moves over to you, holding his cock in his hand. As you sit up, cum bursts from the tip, thick white droplets spattering across your breasts as <<$npc_firstname[$boy]>> shudders in pleasure.'
 	gs'booty_call_sex', 'sex_end'
 end
 
+if $ARGS[0] = 'cum_tits4':
+	if tits > 1:
+		act'Finish him with your tits':
+			booty_call['cock_inserted'] = 0
+			booty_call['cum_tits'] = 1
+			$booty_call['last_cum'] = 'tits'
+			booty_call['cum_count'] += 1
+			gs 'cum_call', 'breasts', $boy, 1
+			gs 'cum_call', 'hands', $boy, 1
+			gs 'stat'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
+			if booty_call['cum_choice'] = 'tits':
+				'"I can do you one better than that," you grin.'
+			else
+				'"I''ve got an even better idea," you grin.'
+			end
+			if booty_call['fucking'] = 1:
+				'You jump off his cock and kneel between his legs, smooshing your breasts together around his cock and start working them up and down his shaft. Within seconds, cum erupts from the tip, smearing it across your still bouncing tits and all over your fingers.'
+			else
+				'You kneel between his legs, smooshing your breasts together around his cock and start working them up and down his shaft. Within seconds, cum erupts from the tip, smearing it across your still bouncing tits and all over your fingers.'
+			end
+			!! reactions?
+			gs 'booty_call_sex', 'sex_end'
+			gs 'booty_call_after', 'wipe_tits'
+		end
+	end
+end
+
 if $ARGS[0] = 'cum_tits_end':
 	!! add dialogue later
 	!! missing code
@@ -1333,7 +1406,7 @@ if $ARGS[0] = 'cum_inside':
 			booty_call['simultaneous_orgasm_count'] += 1
 			'<<$npc_firstname[$boy]>> drives himself inside you with a grunt and you feel cum spurting out inside you. The sensation pushes you over the edge, gasping as waves of orgasm wash through you. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course, and both of you are breathing hard.'
 			gs 'booty_call_cum', 'cum_inside_pull_away'
-			gs 'booty_call_reactions', 'creampie_react'
+			gs'booty_call_reactions', 'react_menu'
 		else
 			'<<$npc_firstname[$boy]>> drives himself inside you, grunting. His cock pulses inside you and warmth fills your pussy.'
 			act'Ride it out':
@@ -1355,7 +1428,7 @@ if $ARGS[0] = 'cum_inside':
 				'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you lay there panting.'
 				act'Continue':cla & gs'booty_call_sex', 'sex_end'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 			
 			act'Tolerate it (disgust)':
@@ -1375,26 +1448,24 @@ if $ARGS[0] = 'cum_inside':
 			booty_call['orgasm_count'] += 1
 			booty_call['came_together'] = 2
 			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm2.mp4"></video></center>'
-			if booty_call['creampie_ask'] = 1:'"Come inside me!" you cry. "Fill me up!"'
 			'<<$npc_firstname[$boy]>> grunts and you feel him come, cock pulsing inside you. The sensation pushes you over the edge, and you groan, tensing as waves of orgasm wash through you. The two of come together, both of your orgasms fueling the other''s until eventually they both end.'
 			gs 'booty_call_cum', 'cum_inside_pull_away'
-			gs 'booty_call_reactions', 'creampie_react'
+			gs'booty_call_reactions', 'react_menu'
 		else
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/doggy4.mp4"></video></center>'
-			if booty_call['creampie_ask'] = 1:'"Come inside me!" you cry. "Fill me up!"'
 			'<<$npc_firstname[$boy]>> drives himself inside you, grunting. His cock pulses inside you and warmth fills your pussy.'
 			act'Ride it out':
 				cla & *nl
 				'You stay there patiently, letting <<$npc_firstname[$boy]>> empty himself into your womb, waiting until you no longer feel him twitching inside you.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 			
 			act'Tolerate it (disgust)':
 				cla & *nl
 				'You stay there, trying not to squirm in discomfort, feeling <<$npc_firstname[$boy]>>''s spunk fill your womb. Despite your disgust, you don''t move, waiting until you no longer feel him twitching inside you.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 			
 			act'Come with him':
@@ -1408,13 +1479,12 @@ if $ARGS[0] = 'cum_inside':
 				booty_call['simultaneous_orgasm_count'] += 1
 				'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you collapse.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 		end
 	elseif $booty_call['position'] = 'cowgirl':
 		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cumvaginal.mp4"></video></center>'
 		if booty_call['creampie_ask'] = 1:
-			'"Come inside me!" you cry. "Fill me up!"'
 			if pcs_horny > 90:
 				$orgasm_or = 'yes'
 				gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
@@ -1422,11 +1492,31 @@ if $ARGS[0] = 'cum_inside':
 				booty_call['orgasm_count'] += 1
 				booty_call['came_together'] = 2
 				'You drop your hips, impaling yourself on <<$npc_firstname[$boy]>>''s cock. He thrusts his hips upward, driving himself deep inside you and you feel cum spurt out inside you. The sensation pushes you over the edge, causing your pussy to clamp down onto his cock even more and your body to spasm uncontrollably. The two of come together, holding each other tight, both of your orgasms fueling the other''s. After some time, your orgasm fades, leaving both of you panting.'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs'booty_call_reactions', 'react_menu'
 			else
 				'You drop your hips, impaling yourself on <<$npc_firstname[$boy]>>''s cock. He grabs you and holds you tight, thrusting humself upward, driving his cock in deep into you as he can manage. As he does, you feel him stiffen up and groan, and his cock pulses inside you.'
 			end
-			gs 'booty_call_cum', 'cum_inside_pull_away'
-			gs 'booty_call_reactions', 'creampie_react'
+			act'Ride it out':
+				cla & *nl
+				'You keep gently rocking your hips, letting <<$npc_firstname[$boy]>> empty himself into your womb, waiting until you no longer feel him twitching inside you.'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs'booty_call_reactions', 'react_menu'
+			end
+			
+			act'Come with him':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
+				$orgasm_or = 'yes'
+				gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
+				gs'stat'
+				booty_call['came_together'] = 2
+				booty_call['orgasm_count'] += 1
+				booty_call['simultaneous_orgasm_count'] += 1
+				'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you collapse.'
+				gs 'booty_call_cum', 'cum_inside_pull_away'
+				gs'booty_call_reactions', 'react_menu'
+			end
 		else
 			if pcs_horny > 90:
 				$orgasm_or = 'yes'
@@ -1436,21 +1526,21 @@ if $ARGS[0] = 'cum_inside':
 				booty_call['came_together'] = 2
 				'<<$npc_firstname[$boy]>> grabs you and pulls you down onto his cock, thrusting his hips upward at the same time, driving himself deep inside you and you feel cum spurt out inside you. The sensation pushes you over the edge, causing your pussy to clamp down onto his cock even more and your body to spasm uncontrollably. The two of come together, holding each other tight, both of your orgasms fueling the other''s. After some time, your orgasm fades, leaving both of you panting.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			else
 				'<<$npc_firstname[$boy]>> grabs you and pulls you down onto his cock. He holds you tight, thrusting humself upward, driving his cock in deep into you as he can manage. As he does, you feel him stiffen up and groan, and his cock pulses inside you.'
 				act'Ride it out':
 					cla & *nl
 					'You keep gently rocking your hips, letting <<$npc_firstname[$boy]>> empty himself into your womb, waiting until you no longer feel him twitching inside you.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 				
 				act'Tolerate it (disgust)':
 					cla & *nl
 					'You stay there, trying not to squirm in discomfort, feeling <<$npc_firstname[$boy]>>''s spunk fill your womb. Despite your disgust, you don''t move, waiting until you no longer feel him twitching inside you.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 				
 				act'Come with him':
@@ -1464,7 +1554,7 @@ if $ARGS[0] = 'cum_inside':
 					booty_call['simultaneous_orgasm_count'] += 1
 					'You gasp, the sensation triggering your own climax, and get sent over the edge yourself. The two of come together, each of your orgasms fueling the other''s until eventually they''ve run their course and both of you collapse.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 			end
 		end
@@ -1473,7 +1563,7 @@ end
 
 if $ARGS[0] = 'cum_inside_pull_away':
 	act'Pull away':
-		booty_call['cock_remove'] = 1
+		booty_call['cock_inserted'] = 0
 		cla & *clr
 		if $booty_call['position'] = 'miss':
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/drip3.mp4"></video></center>'
@@ -1489,7 +1579,7 @@ if $ARGS[0] = 'cum_inside_pull_away':
 	end
 	
 !!{	act'Let him pull out':
-		booty_call['cock_remove'] = 1
+		booty_call['cock_inserted'] = 0
 		cla & *clr
 		if $booty_call['position'] = 'miss':
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/miss1.mp4"></video></center>'
@@ -1511,7 +1601,7 @@ if $ARGS[0] = 'cum_together':
 	cla & *nl
 	if booty_call['he_ask_creampie'] = 1:
 		if $booty_call['position'] = 'miss':
-			'You just nod, unable to say anything and grab hold of him tightly. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
+			'You just nod, unable to say anything, and grab hold of him tightly. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
 		elseif $booty_call['position'] = 'doggy':
 			'You just nod, unable to say anything, eagerly throwing your hips back into his thrusts. You can feel <<$npc_firstname[$boy]>>''s cock swelling inside you, right on the edge of bursting. The tension in your pussy feels the same way. It feels like any moment you might just-'
 		elseif $booty_call['position'] = 'cowgirl':
@@ -1549,7 +1639,7 @@ if $ARGS[0] = 'cum_together':
 		end
 		'<<$npc_firstname[$boy]>>''s cock pulses inside you and something warm spills into your pussy. His hot cum filling you up is the last thing you need to get off and suddenly you''re right there with him, muscles going taut and quivering uncontrollably as the two of you come together.'
 		gs 'booty_call_cum', 'cum_inside_pull_away'
-		gs 'booty_call_reactions', 'creampie_react'
+		gs'booty_call_reactions', 'react_menu'
 	end
 end
 
@@ -1591,9 +1681,10 @@ end
 
 if $ARGS[0] = 'cum_force':
 	booty_call['creampie_force'] = 1
-	gs 'booty_call_cum', 'creampie_code'
+	
 	!! differing descriptions based on position
-	if booty_call['condom'] = 1:
+	if booty_call['condom'] = 1 and booty_call['no_condom'] = 0:
+		gs'cum_call', '',$boy,1,3
 		if pcs_horny > 90:
 			$orgasm_or = 'yes'
 			gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
@@ -1616,6 +1707,7 @@ if $ARGS[0] = 'cum_force':
 			gs'booty_call_sex', 'sex_end'
 		end
 	else
+		gs 'booty_call_cum', 'creampie_code'
 		if pcs_horny > 90:
 			$orgasm_or = 'yes'
 			gs 'arousal', 'vaginal', 1, 'no_orgasm_msg'
@@ -1631,7 +1723,7 @@ if $ARGS[0] = 'cum_force':
 				*nl
 				'Judging by the expression on his face, you just rocked his world finishing him like that.'
 				gs 'booty_call_cum', 'cum_inside_pull_away'
-				gs 'booty_call_reactions', 'creampie_react'
+				gs'booty_call_reactions', 'react_menu'
 			end
 		else
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cowgirl2.mp4"></video></center>'
@@ -1646,7 +1738,7 @@ if $ARGS[0] = 'cum_force':
 					*nl
 					'Judging by the expression on his face, you just rocked his world finishing him like that.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 			end
 			act'Creampie induced orgasm':
@@ -1659,7 +1751,7 @@ if $ARGS[0] = 'cum_force':
 					*nl
 					'Both of you are breathing hard, unable to do anything but pant wordlessly until the aftershocks subside.'
 					gs 'booty_call_cum', 'cum_inside_pull_away'
-					gs 'booty_call_reactions', 'creampie_react'
+					gs'booty_call_reactions', 'react_menu'
 				end
 			end
 		end
@@ -1669,7 +1761,7 @@ end
 
 if $ARGS[0] = 'cum_pullout':
 	if booty_call['cum_choice'] > 9 and booty_call['extra_caution'] = 0: gt'booty_call_cum', 'creampie_surprise'
-	booty_call['cock_remove'] = 1
+	booty_call['cock_inserted'] = 0
 	$booty_call['cum_choice'] = 'pullout'
 	$booty_call['last_cum'] = 'pullout'
 	if booty_call['pullout_ask'] = 1:
@@ -1712,7 +1804,7 @@ if $ARGS[0] = 'cum_pullout':
 				if booty_call['condom'] = 1:
 					'<<$npc_firstname[$boy]>> pulls himself out of your pussy and tears off the condom, furiously jacking off over you. Moments later, he ejaculates, sending cum flying all over your body, spattering across your belly.'
 				else
-					'He barely follows your instructions in time. No sooner does his cock slip from your pussy than cum bursts from the tip, spattering all across your stomach.'
+					'"Oh fuck!" <<$npc_firstname[$boy]>> barely follows your instructions in time. No sooner does his cock slip from your pussy than cum bursts from its tip, spattering all across your stomach.'
 				end
 			else
 				if booty_call['condom'] = 1:
@@ -1734,7 +1826,7 @@ if $ARGS[0] = 'cum_pullout':
 				if booty_call['condom'] = 1 and booty_call['no_condom'] = 0:
 					'<<$npc_firstname[$boy]>> yanks himself from your pussy and you hear a <i>snap</i> as he rips the condom off of his cock and moments later, you feel hot liquid spatter all over ass and across your back.'
 				else
-					'Not even a second passes between feeling <<$npc_firstname[$boy]>>''s cock slip from your snatch and when hot liquid spatters across your back and dribbles onto your ass.'
+					'"Oh fuck!" Not even a second passes between feeling <<$npc_firstname[$boy]>>''s cock vacate your pussy and when hot liquid spatters across your back and dribbles onto your ass.'
 				end
 			else
 				'"Oh fuck!" <<$npc_firstname[$boy]>> suddenly cries out. His cock slips from your snatch and not even a moment later do you feel hot liquid spattering across your back and dribbling onto your ass.'
@@ -1762,7 +1854,7 @@ if $ARGS[0] = 'cum_pullout':
 				if booty_call['condom'] = 1:
 					'<<$npc_firstname[$boy]>> suddenly pushes you backwards, eliciting a yelp as you fall onto your back, his cock popping out from your pussy along the way. He rips the condom off his cock and moments later, he ejaculates, sending cum spattering across your belly.'
 				else
-					'<<$npc_firstname[$boy]>> grunts, his cock slipping from your pussy and sliding up between your ass cheeks. You reach around to put it back in when you feel something hot and wet spattering across your ass and back.'
+					'"Oh fuck!" <<$npc_firstname[$boy]>> grunts, his cock slipping from your pussy and sliding up between your ass cheeks. You reach around to put it back in when you feel something hot and wet spattering across your ass and back.'
 				end
 			end
 		end
@@ -1891,11 +1983,13 @@ if $ARGS[0] = 'creampie_surprise_cum_together':
 	end
 	if npc_know_love_creampie[$boy] = 1:
 		'He stares into your eyes, smiling.'
-	else
+	elseif booty_call['came_together'] = 2:
+		booty_call['did_we_cum_together'] = 1
 		'"Did... did we... did you...?" he pants.'
 	end
 	
-	gs'booty_call_reactions', 'creampie_react'
+!!	gs'booty_call_reactions', 'creampie_react'
+	gs'booty_call_reactions', 'react_menu'
 
 	if (booty_call['orgasm_count'] >= 5 or pcs_sleep < 20) and (hour >= 20 or hour =< 4):
 		act'Collapse':gt'booty_call_after', 'black_out'
@@ -1996,19 +2090,18 @@ if $ARGS[0] = 'cum_condom':
 	if $booty_call['position'] = 'miss':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
 		$booty_call['cum_describe2'] = 'looking between your legs as he removes his cock, the rubber casing around it bulging with liquid'
-		booty_call['cock_remove'] = 1
 	elseif $booty_call['position'] = 'doggy':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum71.jpg"></center>'
 		$booty_call['cum_describe2'] = 'looking over your shoulder as you let his rubber encased cock slip from your pussy'
-		booty_call['cock_remove'] = 1
 	elseif $booty_call['position'] = 'cowgirl':
 		'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/cumvaginal.mp4"></video></center>'
 		$booty_call['cum_describe2'] = 'settling your self down onto his rubber encased cock'
 	end
 	if condom_break > 0:
+		$booty_call['last_cum'] = 'broken_condom'
 		booty_call['broken_condom'] = 1
 		if booty_call['orgasm'] < orgasm:
-			booty_call['came_together'] = 1
+			booty_call['came_together'] = 2
 			'<<$npc_firstname[$boy]>> buries his cock inside your pussy. It throbs inside you through the condom, causing you to come as well. You ride out your orgasms together, oblivious to everything except the pleasure.'
 			act'Continue':gs'booty_call_cum', 'broken_condom2'
 		else
@@ -2038,7 +2131,7 @@ if $ARGS[0] = 'broken_condom1':
 	end
 	
 	act'Take it in stride':
-		booty_call['cock_remove'] = 1
+		booty_call['cock_inserted'] = 0
 		cla & *clr
 		if $booty_call['position'] = 'cowgirl':
 			'<center><video autoplay loop src="images/shared/sex/cum/vagcreampie/creampie2.mp4"></video></center>'
@@ -2054,6 +2147,7 @@ if $ARGS[0] = 'broken_condom1':
 		end
 		gs'booty_call_reactions', 'oh_shit_options'
 		gs'booty_call_reactions', 'creampie_accident_birth_control'
+		gs'booty_call_reactions', 'creampie_safe_day'
 	end
 	
 	act'Come':
@@ -2086,6 +2180,7 @@ if $ARGS[0] = 'broken_condom1':
 			end
 			gs'booty_call_reactions', 'oh_shit_options'
 			gs'booty_call_reactions', 'creampie_accident_birth_control'
+			gs'booty_call_reactions', 'creampie_safe_day'
 		end
 	end
 end
@@ -2094,10 +2189,8 @@ if $ARGS[0] = 'broken_condom2':
 	cla & *clr
 	if $booty_call['position'] = 'miss':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
-		booty_call['cock_remove'] = 1
 	elseif $booty_call['position'] = 'doggy':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum71.jpg"></center>'
-		booty_call['cock_remove'] = 1
 	elseif $booty_call['position'] = 'cowgirl':
 		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum81.jpg"></center>'
 	end
@@ -2105,7 +2198,7 @@ if $ARGS[0] = 'broken_condom2':
 	*nl
 	'Something feels...'
 	act'Continue':
-		booty_call['cock_remove'] = 1
+		booty_call['cock_inserted'] = 0
 		cla & *clr
 		if $booty_call['position'] = 'doggy':
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy1.jpg"></center>'
@@ -2116,7 +2209,7 @@ if $ARGS[0] = 'broken_condom2':
 			'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
 			'<<$npc_firstname[$boy]>> slips his cock out from inside you and something wet trickles out after it.'
 			*nl
-			'Turning around, you look at his cock and confirm your suspicions: the condom broke.'
+			'Looking down between your legs, you see his cock and confirm your suspicions: the condom broke.'
 		end
 		gs'booty_call_reactions', 'oh_shit_options'
 		gs'booty_call_reactions', 'creampie_accident_birth_control'

locations/booty_call_doggy.qsrc

@@ -1,8 +1,16 @@
 # booty_call_doggy
 
 if $ARGS[0] = 'doggy_start':
+!!	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+!!		cla & *clr
+!!		'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+!!		'<<$npc_firstname[$boy]>> flips you over.'
+!!		act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+!!		act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+!!	elseif booty_call['change_pos'] = 1:
 	if booty_call['change_pos'] = 1:
 		act'Switch to doggy':
+			booty_call['cock_inserted'] = 1
 			cla & *clr
 			booty_call['change_pos'] = 0
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy2.jpg"></center>'
@@ -16,22 +24,28 @@ if $ARGS[0] = 'doggy_start':
 			'"I want you to fuck me from behind now."'
 			act'Keep fucking':gs'booty_call_doggy', 'doggy_goto'
 		end
-	elseif booty_call['force_initiative'] = 2:
-		gs 'booty_call_sex', 'speed_select'
-		if $booty_call['position'] = 'miss':
-			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
-			'You''ve barely finished your orgasm when he rolls you onto your knees and pulls your hips back towards him. With one swift thrust, he plunges his cock into your still-quivering pussy, earning him an involuntary gasp as he begins fucking you again.'
-		elseif $booty_call['position'] = 'doggy':
-			'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
-			'<<$npc_firstname[$boy]>> doesn''t give you a moment to rest, continuing to fuck you all the way through your orgasm. You quiver, your sensitive pussy spasming around his cock, driving your insane even after you''ve finished.'
-		elseif $booty_call['position'] = 'cowgirl':
-			'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog1.jpg"></center>'
-			'You''ve barely finished quivering when he pulls you off of him and rolls you onto your knees, pulling your hips back towards him. With one swift movement, he thrusts his cock into your still-quivering pussy. His actions earn him an involuntary gasp from your mouth before he begins fucking you again.'
+	elseif booty_call['force_initiative'] = 2 and booty_call['cock_inserted'] = 1:
+		cla
+		act'Continue':
+			booty_call['cock_inserted'] = 1
+			cla & *clr
+			gs 'booty_call_sex', 'speed_select'
+			if $booty_call['position'] = 'miss':
+				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
+				'You''ve barely finished your orgasm when he rolls you onto your knees and pulls your hips back towards him. With one swift thrust, he plunges his cock into your still-quivering pussy, earning him an involuntary gasp as he begins fucking you again.'
+			elseif $booty_call['position'] = 'doggy':
+				'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
+				'<<$npc_firstname[$boy]>> doesn''t give you a moment to rest, continuing to fuck you all the way through your orgasm. You quiver, your sensitive pussy spasming around his cock, driving your insane even after you''ve finished.'
+			elseif $booty_call['position'] = 'cowgirl':
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/dog1.jpg"></center>'
+				'You''ve barely finished quivering when he pulls you off of him and rolls you onto your knees, pulling your hips back towards him. With one swift movement, he thrusts his cock into your still-quivering pussy. His actions earn him an involuntary gasp from your mouth before he begins fucking you again.'
+			end
+			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
-		act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
-	elseif booty_call['initiative'] ! 1:
+	elseif booty_call['initiative'] ! 1 or booty_call['force_initiative'] = 2:
 		gs 'booty_call_sex', 'speed_select'
 		act'Continue':
+			booty_call['cock_inserted'] = 1
 			cla
 			if booty_call['fuck_count'] = 0:
 				if npc_rough_lover[$boy] = 1:
@@ -90,6 +104,7 @@ if $ARGS[0] = 'doggy_start':
 	else
 		gs 'booty_call_sex', 'speed_select'
 		act'Bend over':
+			booty_call['cock_inserted'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy2.jpg"></center>'
 			if booty_call['fuck_count'] = 0:
@@ -97,9 +112,10 @@ if $ARGS[0] = 'doggy_start':
 				'"Fuck me from behind."'
 			elseif $booty_call['position'] = 'doggy':
 				'You get back on your knees, waggling your ass enticingly at him.'
+			elseif $booty_call['position'] = 'miss' or $booty_call['position'] = 'cowgirl':
+				'"I want you to fuck me from behind this time," you say, giving him a sultry look over your shoulder.'
 			else
-				'You turn around and get on your knees, presenting your ass towards him.'
-				'"I want you to fuck me from behind this time."'
+				'"I need you inside me again," you say, giving him a sultry look over your shoulder.'
 			end
 			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
@@ -107,18 +123,19 @@ if $ARGS[0] = 'doggy_start':
 end
 
 if $ARGS[0] = 'doggy_goto':
+	booty_call['cock_inserted'] = 1
 	if booty_call['speed'] = 0: booty_call['speed'] = rand(1,3)
 	gt 'booty_call_doggy', 'doggy<<booty_call[''speed'']>>'
 end
 
 if $ARGS[0] = 'doggy1':
+	booty_call['doggy_fuck'] = 1
 	!! slow pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'doggy'
 	$booty_call['pos_speed'] = 'doggy1'
 	!! booty_call['doggy_fuck'] tracks if you fuck in this position
-	booty_call['doggy_fuck'] = 1
-!!	if pcs_vag = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
+	if pcs_vag = 0 and booty_call['fuck_count'] = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
 
@@ -137,9 +154,7 @@ if $ARGS[0] = 'doggy1':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/vag/doggy/slow2.mp4"></video></center>'
 		gs 'booty_call_doggy', 'doggy1_enjoy_desc'
-		if booty_call['orgasm'] < orgasm:
-			gs 'booty_call_sex', 'girl_cum_pre'
-		end
+		if booty_call['orgasm'] < orgasm: gs 'booty_call_sex', 'girl_cum_pre'
 		gs 'booty_call_cum', 'fuck_cum'
 	end
 
@@ -187,6 +202,7 @@ if $ARGS[0] = 'doggy1':
 end
 
 if $ARGS[0] = 'doggy1.1':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -198,6 +214,7 @@ if $ARGS[0] = 'doggy1.1':
 end
 
 if $ARGS[0] = 'doggy1.2':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -241,6 +258,7 @@ if $ARGS[0] = 'doggy1.2':
 end
 
 if $ARGS[0] = 'doggy1.bored':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -254,13 +272,13 @@ if $ARGS[0] = 'doggy1.bored':
 end
 
 if $ARGS[0] = 'doggy2':
+	booty_call['doggy_fuck'] = 1
 	!! medium pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'doggy'
 	$booty_call['pos_speed'] = 'doggy2'
 	!! booty_call['doggy_fuck'] tracks if you fuck in this position
-	booty_call['doggy_fuck'] = 1
-!!	if pcs_vag = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
+	if pcs_vag = 0 and booty_call['fuck_count'] = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
 
@@ -327,6 +345,7 @@ if $ARGS[0] = 'doggy2':
 end
 
 if $ARGS[0] = 'doggy2.1':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -339,6 +358,7 @@ if $ARGS[0] = 'doggy2.1':
 end
 
 if $ARGS[0] = 'doggy2.2':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -387,6 +407,7 @@ if $ARGS[0] = 'doggy2.2':
 end
 
 if $ARGS[0] = 'doggy2.bored':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy2'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -398,13 +419,14 @@ if $ARGS[0] = 'doggy2.bored':
 end
 
 if $ARGS[0] = 'doggy3':
+	booty_call['doggy_fuck'] = 1
 	!! fast/rough pace
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'doggy'
 	$booty_call['pos_speed'] = 'doggy3'
 	!! booty_call['doggy_fuck'] tracks if you fuck in this position
 	booty_call['doggy_fuck'] = 1
-!!	if pcs_vag = 0:gt 'booty_call_virgin', 'doggy_virg_norm1'
+	if pcs_vag = 0 and booty_call['fuck_count'] = 0:gt 'booty_call_virgin', 'doggy_virg_hard1'
 	gs 'arousal', 'vaginal',1,'no_orgasm_msg', 'rough'
 	gs 'stat'
 	'<center><video autoplay loop src="images/shared/sex/vag/doggy/rough1.mp4"></video></center>'
@@ -443,38 +465,67 @@ if $ARGS[0] = 'doggy3':
 			end
 			
 			act'It hurts!':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/2.jpg"></center>'
-				'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly, letting you collapse to the bed as he releases your hair.'
-				'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
-				act'No (enjoy)':
+				if ((npc_selfish[$boy] = 1 and npc_speed_pref[$boy] = 3) or npc_abusive[$boy] = 1) and npc_caretaker[$boy] ! 1:
 					cla & *nl
-					npc_knows_pc_likes_rough[$boy] = 1
-					booty_call['rough_enjoy'] = 1
-					'"No," you smile back at him. "I want you to pound me."'
-					'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
-					act'Continue':gt 'booty_call_doggy', 'doggy3.1'
-				end
+					'"Oh fuck! It hurts!" you cry.'
+					'"Hurts fucking good doesn''t it?" <<$npc_firstname[$boy]>> grunts back, not even pausing for a single beat.'
+					act'Please slow down!':
+						cla & *nl
+						booty_call['orgasm'] = orgasm
+						$orgasm_or = 'no'
+						booty_call['rough_hurt'] = 1
+						booty_call['boy_cum'] = 2
+						'"Please!" you beg, tears welling up in  your eyes. "Please slow down! I can''t-! Take-!'
+						'But <<$npc_firstname[$boy]>> is heedless of your cries. He keeps a firm hold on your hair and pulls hard with every thrust, forcing unceasing cries of pain from your lips.'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+					
+					act'If you slow down I will kill you':
+						pcs_sweat += 1
+						booty_call['orgasm'] = orgasm
+						booty_call['rough_enjoy'] = 1
+						gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
+						gs 'stat'
+						cla & *nl
+						'You scream another cry of agonizing pleasure and grimace at <<$npc_firstname[$boy]>>.'
+						'"If you slow down I will <i>fucking</i> kill you," you snarl, throwing your hips forward to slam into his for more force.'
+						gs 'booty_call_miss', 'miss3_enjoy_desc'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+				else
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/doggy/2.jpg"></center>'
+					'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly, letting you collapse to the bed as he releases your hair.'
+					'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
+					act'No (enjoy)':
+						cla & *nl
+						npc_knows_pc_likes_rough[$boy] = 1
+						booty_call['rough_enjoy'] = 1
+						'"No," you smile back at him. "I want you to pound me."'
+						'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
+						act'Continue':gt 'booty_call_doggy', 'doggy3.1'
+					end
 
-	!!			if npc_abusive[$boy] = 1:
-	!!				$orgasm_or = 'no'
-	!!				*nl
-	!!				'But <<$npc_firstname[$boy]>> is unrelenting. He ignores your pleas for mercy and he keeps on fucking you with barely a pause.'
-	!!			else
+		!!			if npc_abusive[$boy] = 1:
+		!!				$orgasm_or = 'no'
+		!!				*nl
+		!!				'But <<$npc_firstname[$boy]>> is unrelenting. He ignores your pleas for mercy and he keeps on fucking you with barely a pause.'
+		!!			else
 
-				act'Yes, gentle please':
-					cla & *nl
-					booty_call['too_rough'] = 1
-					'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
-					act'Continue':gt 'booty_call_doggy', 'doggy1.1'
-				end
+					act'Yes, gentle please':
+						cla & *nl
+						booty_call['too_rough'] = 1
+						'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
+						act'Continue':gt 'booty_call_doggy', 'doggy1.1'
+					end
 
-				act'Not <i>too</i> gentle':
-					cla & *nl
-					booty_call['too_rough'] = 1
-					'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
-					'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
-					act'Continue':gt 'booty_call_doggy', 'doggy2.2'
+					act'Not <i>too</i> gentle':
+						cla & *nl
+						booty_call['too_rough'] = 1
+						'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
+						'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
+						act'Continue':gt 'booty_call_doggy', 'doggy2.2'
+					end
 				end
 			end
 
@@ -527,6 +578,7 @@ if $ARGS[0] = 'doggy3':
 						end
 						*nl
 						'You don''t want to ruin the mood. Besides, <<$npc_firstname[$boy]>> wouldn''t understand...'
+						gs 'booty_call_cum', 'fuck_cum'
 					end
 					
 					act'Scream':
@@ -551,6 +603,7 @@ if $ARGS[0] = 'doggy3':
 end
 
 if $ARGS[0] = 'doggy3.1':
+	booty_call['doggy_fuck'] = 1
 	$booty_call['pos_speed'] = 'doggy3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
@@ -590,6 +643,7 @@ if $ARGS[0] = 'doggy3.1':
 end
 
 if $ARGS[0] = 'doggy3.2':
+	booty_call['doggy_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'doggy3'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'

locations/booty_call_favorite_part.qsrc

@@ -21,15 +21,15 @@ if $ARGS[0] = 'good_for_you':
 				gs'booty_call_favorite_part', 'tit_cum_favorite'
 			elseif npc_pussyeater[$boy] = 1 and booty_call['cuni_orgasm'] > 0:
 				gs'booty_call_favorite_part', 'pussyeat_favorite'
-			elseif $npc_fav_pos[$npclastgenerated] = 'missionary' and booty_call['miss_fuck'] = 1:
+			elseif $npc_fav_pos[$boy] = 'missionary' and booty_call['miss_fuck'] = 1:
 				gs'booty_call_favorite_part', 'npc_miss_fav1'
-			elseif $npc_fav_pos[$npclastgenerated] = 'doggy' and booty_call['doggy_fuck'] = 1:
+			elseif $npc_fav_pos[$boy] = 'doggy' and booty_call['doggy_fuck'] = 1:
 				gs'booty_call_favorite_part', 'npc_doggy_fav1'
-			elseif $npc_fav_pos[$npclastgenerated] = 'cowgirl' and booty_call['cowgirl_fuck'] = 1:
+			elseif $npc_fav_pos[$boy] = 'cowgirl' and booty_call['cowgirl_fuck'] = 1:
 				gs'booty_call_favorite_part', 'npc_cowgirl_fav1'
-			elseif $npc_fav_pos[$npclastgenerated] = 'blowjob' and booty_call['bj_count'] > 0:
+			elseif $npc_fav_pos[$boy] = 'blowjob' and booty_call['bj_count'] > 0:
 				gs'booty_call_favorite_part', 'npc_bj_fav1'
-			!! elseif $npc_fav_pos[$npclastgenerated] = 'titjob':
+			!! elseif $npc_fav_pos[$boy] = 'titjob':
 			!!	 gs'booty_call_favorite_part', 'pussyeat_favorite'
 			else
 				if booty_call['virgin'] ! 1:
@@ -605,13 +605,6 @@ if $ARGS[0] = 'pussyeat_favorite':
 		end
 	end
 	
-	act'What do I taste like?':
-		cla & *nl
-		'"Yeah?" you smirk back. "What do I taste like?"'
-		'"Hmm... A little salty. Maybe a little sweet too. Not exactly sure how to describe it other than to say you taste delicious. Did you enjoy it too?"'
-		gs'booty_call_favorite_part', 'pc_favorite_part'
-	end
-	
 	act'You''re really good at it':
 		cla & *nl
 		'"Did I mention that you''re really good at that?" you smile.'
@@ -620,6 +613,7 @@ if $ARGS[0] = 'pussyeat_favorite':
 		else
 			'"You didn''t have to," he smirks back. "I could tell by the way you were screaming my name."'
 		end
+		gs'booty_call_pillow_talk', 'topics'
 	end
 	
 	gs'booty_call_pillow_talk', 'kuni_wear_out'
@@ -1351,7 +1345,7 @@ if $ARGS[0] = 'pc_creampie_fav1':
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 			if $booty_call['boy_favorite'] = 'creampie' and npc_free_creampies[$boy] < 1 and booty_call['surprise_creampie_count'] > 0:
 				if npc_know_not_bc[$boy] = 1:
-					'"I... liked it when you came inside me," you admit, quickly holding up your finger before <<$npc_firstname[$boy]>> can say anything. "But you still need to ask before you do it! You know I''m on on birth control so it''s extra important!"'
+					'"I... liked it when you came inside me," you admit, quickly holding up your finger before <<$npc_firstname[$boy]>> can say anything. "But you still need to ask before you do it! You know I''m not on birth control so it''s extra important!"'
 				elseif birth_control['think_safe'] ! 1:
 					gs'booty_call_stats', 'no_birth_control_know'
 					'"I... liked it when you came inside me," you admit, quickly holding up your finger before <<$npc_firstname[$boy]>> can say anything. "But you still need to ask before you do it! I''m not on birth control so it''s dangerous."'
@@ -1371,7 +1365,7 @@ if $ARGS[0] = 'pc_creampie_fav1':
 					'"I liked it when you came inside me," you smile warmly at <<$npc_firstname[$boy]>> rubbing your wet thighs together where his cum was leaking from your snatch just minutes ago. "I can <i>feel</i> everything. Your cock throbs inside me, warmth spreading through my hips, I just feel <i>full</i> when you come inside me. And it feels really really good."'
 				end
 			end
-			if booty_call['accidental_creampie_convo'] = 0 and (npc_know_not_bc[$boy] = 1 or booty_call['risky_creampie'] > 0 or npc_childfree[$boy] > 0):
+			if booty_call['accidental_creampie_convo'] = 0 and (npc_know_not_bc[$boy] = 1 or booty_call['risky_creampie'] > 0 or npc_childfree[$boy] > 0) and booty_call['safe_day'] ! 1 and booty_call['probably_safe_day'] ! 1:
 				gs'booty_call_talk', 'boy_accidental_creampie'
 			else
 				gs'booty_call_pillow_talk', 'topics'

locations/booty_call_leave.qsrc

@@ -0,0 +1,1471 @@
+# booty_call_leave
+
+if $ARGS[0] = 'exit':
+	gs 'booty_call_leave', 'ending'
+	minut += 2
+	!! exit should be based on type of apartment and location
+	
+	if npc_residence[$boy] = 1:
+		!! Pav residential exit
+		gt 'pav_residential'
+	elseif npc_residence[$boy] = 2:
+		!! Student dorms exit
+		gt 'city_island'
+	elseif npc_residence[$boy] = 3:
+		!! St. Petersburg Residential exit
+		gt 'city_residential'
+	elseif npc_residence[$boy] = 4:
+		!! St. Petersburg City Center exit
+		gt 'city_center'
+!!{ disabled for bug testing
+	else
+		if $region = 'pav':
+			gt 'pav_residential'
+		elseif $region = 'pav':
+			gt 'pav_commercial'
+		elseif $region = 'pav_park':
+			gt 'pav_park', 'start'
+		elseif $region = 'city':
+			gt 'city_residential'
+		elseif $region = 'city_center':
+			gt 'city_center'
+		elseif $region = 'city_park':
+			gt 'city_park', 'start'
+		elseif $region = 'city_island':
+			gt 'city_island'
+		end}
+	end
+end
+
+if $ARGS[0] = 'break_up':
+	gs 'lover', 'remove fuckbuddy', $boy
+	act'Leave':gt'booty_call_leave', 'exit'
+end
+
+if $ARGS[0] = 'ending':
+!!	gs 'booty_call_stats', 'save'
+	gs 'arousal', 'end'
+	if $clothingworntype = 'nude': gs'booty_call_leave', 'dress'
+	if booty_call['fuck'] > 0: know_virgin[$boy] = 0
+	if booty_call['creampie_orgasm'] = 1: stat_memory['creampie_orgasm'] = daystart
+	npc_last_sex[$boy] = daystart
+	killvar 'booty_call'
+end
+
+if $ARGS[0] = 'leaving_dialogue':
+	'"I gotta get going," you say.'
+	'"Okay, see you later."'
+	act'"Bye"':
+		$booty_call['leave_dialogue'] = 'Bye'
+		gs'booty_call_leave', 'leaving_action'
+	end
+
+	act'"See ya"':
+		$booty_call['leave_dialogue'] = 'See ya'
+		gs'booty_call_leave', 'leaving_action'
+	end
+	
+	act'"Toodles"':
+		$booty_call['leave_dialogue'] = 'Toodles'
+		gs'booty_call_leave', 'leaving_action'
+	end
+	
+	act'"Text me"':
+		$booty_call['leave_dialogue'] = 'Text me'
+		gs'booty_call_leave', 'leaving_action'
+	end
+	
+	if npc_booty_call[$boy] = daystart and booty_call['sleepover'] = 1:
+		act'"See you soon"':
+			$booty_call['leave_dialogue'] = 'See you soon'
+			gs'booty_call_leave', 'leaving_action'
+		end
+	elseif npc_booty_call[$boy] = daystart + 1:
+		act'"See you tomorrow"':
+			$booty_call['leave_dialogue'] = 'See you tomorrow'
+			gs'booty_call_leave', 'leaving_action'
+		end
+	else
+		act'"Till next time"':
+			$booty_call['leave_dialogue'] = 'Till next time'
+			gs'booty_call_leave', 'leaving_action'
+		end
+	end
+end
+
+if $ARGS[0] = 'leaving_action':
+	cla
+	act'Nonchalant':
+		$booty_call['leave_action'] = ' nonchalantly and head out the door without a second glance'
+		gs'booty_call_leave', 'leaving_end'
+	end
+	
+	act'Wave goodbye':
+		$booty_call['leave_action'] = ', waggling your fingers at him and head out the door'
+		gs'booty_call_leave', 'leaving_end'
+	end
+
+	act'Wink':
+		$booty_call['leave_action'] = ' with a wink as you close the door behind you'
+		gs'booty_call_leave', 'leaving_end'
+	end
+	
+	act'Blow him a kiss':
+		$booty_call['leave_action'] = ', blowing him a kiss just before the door closes behind you'
+		gs'booty_call_leave', 'leaving_end'
+	end
+	
+	act'Shake your ass':
+		$booty_call['leave_action'] = ', giving him a teasing shake of your ass just before you close the door behind you'
+		gs'booty_call_leave', 'leaving_end'
+	end
+end
+
+if $ARGS[0] = 'leaving_end':
+	cla & *nl
+	'"<<$booty_call[''leave_dialogue'']>>," you say<<$booty_call[''leave_action'']>>.'
+	act'Leave':gt'booty_call_leave', 'exit'
+end
+
+if $ARGS[0] = 'breakup_start':
+	act'Break things off':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"This is the last time I''m coming over," you say, abruptly.'
+		'"Huh?" <<$npc_firstname[$boy]>> looks at you oddly. "What are you talking about?"'
+		'"Don''t text me expecting a booty call after this."'
+		'"Why not?" he asks.'
+		act'Don''t explain':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"I just can''t do this anymore," you say. "I''m sorry."'
+			'You grab your things and leave.'
+			gs'booty_call_after', 'break_up'
+		end
+		gs'booty_call_leave', 'unsatisfied_breakup'
+		gs'booty_call_leave', 'no_more_cheating_breakup'
+	end
+end
+
+if $ARGS[0] = 'unsatisfied_breakup':
+	act'You don''t satisfy me':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'"You''re just not what I want out of a fuckbuddy," you say flatly.'
+		act'Sexually incompatible':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"You''re just not what I want out of a fuckbuddy," you say flatly. "I just don''t think we''re sexually compatible."'
+			*nl
+			'You shrug once, grab your things, and leave without another word.'
+			gs'booty_call_leave', 'break_up'
+		end
+		if npc_sexdrive[$boy] = 1 or npc_two_pump[$boy] = 1:
+			act'You''re a two pump chump':
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"You''re just not what I want out of a fuckbuddy," you say flatly. "You come too fast. I can''t trust you to get me off."'
+				*nl
+				'"Wait but-"'
+				gs'booty_call_leave', 'isnt_going_to_work'
+			end
+		elseif npc_sexdrive[$boy] < 5:
+			act'You don''t last long enough for me':
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"You''re just not what I want out of a fuckbuddy," you say flatly. "You can''t keep it up and I can''t trust you to get me off."'
+				*nl
+				'"Wait but-"'
+				gs'booty_call_leave', 'isnt_going_to_work'
+			end
+		else
+			act'You last too long':
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"You''re just not what I want out of a fuckbuddy," you say flatly. "Honestly, your sex drive is way too high. By the time you''re satisfied, my pussy is sore."'
+				*nl
+				'"Wait but-"'
+				gs'booty_call_leave', 'isnt_going_to_work'
+			end
+		end
+		
+!!		act'You''re boring':
+	end
+end
+
+if $ARGS[0] = 'no_more_cheating_breakup':
+	if pcs_lovers > 0 and (npc_know_have_boyfriend + npc_know_have_girlfriend = 0):
+		act'I''ve started seeing somebody':
+			cla & *clr
+			npc_know_cheat[$boy] = 1
+			$npc_apt_bedroom[$boy]
+			'"The truth is, I''ve started seeing somebody. The sex has been good, but..." You shake your head, grabbing your purse. "I can''t keep doing this. I don''t want to fuck things up."'
+			if npc_fidelity[$boy] < 7:
+				'"Come on," he says. "We''re just having fun. It''s not cheating if it''s just physical. When you masturbate in the shower, you''re not cheating on him with your showerhead are you?"'
+				act'No means no':
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+					'"You''re not going to change my mind," you say. "We''re done."'
+					*nl
+					'And with that, you head out the door.'
+					gs'booty_call_leave', 'break_up'
+				end
+				
+				act'Well...':
+					cla & *nl
+					'You pause, biting your lip in consideration.'
+					act'As long as it''s just physical':
+						cla & *clr
+						$npc_apt_bedroom[$boy]
+						'"Well..." you say slowly. "As long as it''s <i>just</i> physical..."'
+						'"Thatta girl," <<$npc_firstname[$boy]>> grins from bed.'
+						gs'booty_call_after', 'cheating_end'
+					end
+					
+					act'Set some rules':
+						cla & *nl
+						'"Okay..." you say. "But there have to be rules!"'
+						gs'booty_call_talk', 'cheating_rules'
+					end
+				end
+			else
+				'"Oh." <<$npc_firstname[$npclastsaved]>> looks at you. "I guess that''s fair. So... I''ll see you around?"'
+				act'See you':
+					cla & *nl
+					'"Yeah," you mumble wistfully. "See you..."'
+					*nl
+					'And with that, you head out the door.'
+					gs'booty_call_leave', 'break_up'
+				end
+				
+				act'No I won''t':
+					cla & *clr
+					'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+					'"No, I won''t," you frown. "That''s the point."'
+					*nl
+					'And with that, you head out the door.'
+					gs'booty_call_leave', 'break_up'
+				end
+			end
+		end
+		
+		if pcs_lovers - pcs_girlfriends > 0:
+			act'I can''t keep cheating on my boyfriend':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+				if npc_know_cheat[$boy] = 1:
+					'"I can''t keep cheating on my boyfriend like this," you say, hanging your head shamefully. "It''s wrong, and I just can''t do this anymore. I have to go."'
+				else
+					'"The truth is, I''m in a relationship with somebody," you say, hanging your head shamefully. "I''ve been cheating on them with you this whole time. It''s wrong, and I— I just can''t do this anymore!"'
+				end
+				'You grab your things and rush out the door.'
+				gs'booty_call_leave', 'break_up'
+			end
+		end
+		if pcs_girlfriends > 0:
+			act'I can''t keep cheating on my girlfriend':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+				if npc_know_cheat[$boy] = 1:
+					'"I can''t keep cheating on my girlfriend like this," you say, hanging your head shamefully. "It''s wrong, and I just can''t do this anymore. I have to go."'
+				else
+					'"The truth is, I''m in a relationship with somebody," you say, hanging your head shamefully. "I''ve been cheating on them with you this whole time. It''s wrong, and I— I just can''t do this anymore!"'
+				end
+				'You grab your things and rush out the door.'
+				gs'booty_call_leave', 'break_up'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'isnt_going_to_work':
+	act'Grab your things':
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+		'"This just isn''t going to work," you say, cutting him off. "We''re done."'
+		*nl
+		'And with that, you head out the door.'
+		gs'booty_call_leave', 'break_up'
+	end
+end
+
+if $ARGS[0] = 'no_condom_breakoff':
+	if npc_no_condoms_know[$boy] = 1:
+		act'I can''t do this (break things off)':
+			!! add in rape chance later
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/depart_annoyed1.mp4"></video></center>'
+			'"Fuck this," you say, getting up and grabbing your clothes.'
+			'"Where the fuck are you going?" <<$npc_firstname[$boy]>> asks in bewilderment.'
+			'"I''m not gonna be fuckbuddies with a guy who never uses condoms," you sneer at him. "<i>Don''t</i> text me again."'
+			*nl
+			'The second you''re dressed you stalk out the door and slam it behind you.'
+			gs'booty_call_leave', 'break_up'
+		end
+	end
+end
+
+if $ARGS[0] = 'sneak_out1':
+	act'Sneak out': gt'booty_call_leave', 'sneak_out2'
+	act'Leave a note':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you find a piece of paper and a pen and scribble out a quick message.'
+		gs'booty_call_leave', 'sneak_out_note1'
+	end
+	if $pantyworntype ! 'none':
+		act'Leave your panties':
+			npc_panty_give[$boy] += 1
+			gs 'panties', 'dispose'
+			cla & *clr
+			$npc_apt_hall[$boy]
+			if CloSkirtShortness > 0:
+				'Suddenly feeling naughty, you quickly slip your panties down your legs, leaving your pussy bare underneath your skirt. You loop your warm underwear around the handle of <<$npc_firstname[$boy]>>''s bedroom door and then quietly sneak out of his apartment, leaving only your gift behind.'
+			else
+				'Suddenly feeling naughty, you pull down your trousers down and spend a minute untangling your legs before pulling your bottoms back up back up, sans panties. You loop your warm underwear around the handle of <<$npc_firstname[$boy]>>''s bedroom door and then quietly sneak out of his apartment, leaving only your gift behind.'
+			end
+			act'Leave':gt'booty_call_leave', 'exit'
+		end
+		
+		act'Leave your a note on your panties':
+			booty_call['panty_note'] = 1
+			npc_panty_give[$boy] += 1
+			gs 'panties', 'dispose'
+			cla & *clr
+			$npc_apt_hall[$boy]
+			if CloSkirtShortness > 0:
+				'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you start to look for a piece of paper when a naughty thought runs through your mind. Unable to resist the thought, you quickly slip your panties down from underneath your skirt and then rummage for a big marker.'
+			else
+				'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you start to look for a piece of paper when a naughty thought runs through your mind. Unable to resist the thought, you quickly pull down your trousers down and spend a minute untangling your legs before pulling your bottoms back up, sans panties. Then you rummage for a big marker.'
+			end
+			*nl
+			'You pop the cap with a grin and start scribbling.'
+			gs'booty_call_leave', 'sneak_out_note1'
+		end
+
+	end
+end
+
+if $ARGS[0] = 'sneak_out_note1':
+	act'Thanks for letting me stay over':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		$booty_call['note_desc1'] = '<i>Thanks for letting me spend the night.</i>'
+		$booty_call['note_desc1']
+		gs'booty_call_leave', 'sneak_out_note2'
+	end
+	
+	act'I had a good time':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		$booty_call['note_desc1'] = '<i>I had a good time last night.</i>'
+		$booty_call['note_desc1']
+		gs'booty_call_leave', 'sneak_out_note2'
+	end
+	
+	if booty_call['fuck_count'] > 0:
+		act'Thanks for the fuck':
+			cla & *clr
+			$npc_apt_hall[$boy]
+			$booty_call['note_desc1'] = '<i>Thanks for the fuck.</i>'
+			$booty_call['note_desc1']
+			gs'booty_call_leave', 'sneak_out_note2'
+		end
+	end
+	
+end
+
+if $ARGS[0] = 'sneak_out_note2':
+	act'It was fun':
+		$booty_call['note_desc2'] = '<i>It was fun.</i>'
+		gs'booty_call_leave', 'sneak_out_note3'
+	end
+
+	act'See ya':
+		$booty_call['note_desc2'] = '<i>See ya later.</i>'
+		gs'booty_call_leave', 'sneak_out_note3'
+	end
+	
+	act'Text me':
+		$booty_call['note_desc2'] = '<i>Don''t forget to text me.</i>'
+		gs'booty_call_leave', 'sneak_out_note3'
+	end
+	
+	act'Till next time':
+		$booty_call['note_desc2'] = '<i>Until next time.</i>'
+		gs'booty_call_leave', 'sneak_out_note3'
+	end
+end
+
+if $ARGS[0] = 'sneak_out_note3':
+	cla & *clr
+	$npc_apt_hall[$boy]
+	'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>>'
+	'You sign it with...'
+	act'Just your name':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> - <<$pcs_nickname>>'
+		gs'booty_call_leave', 'sneak_out_note_end'
+	end
+	
+	act'A smiley face':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> <b><i>:)</i></b>'
+		*nl
+		'You leave a little face, unable to keep yourself from smiling as you dot two little eyes over the mouth.'
+		gs'booty_call_leave', 'sneak_out_note_end'
+	end
+	
+	act'A winky face':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> <b><i>;)</i></b>'
+		*nl
+		'You leave a little face, unable to keep yourself from smiling as you dot little winky eyes over the mouth.'
+		gs'booty_call_leave', 'sneak_out_note_end'
+	end
+	
+	act'A heart':
+		cla & *clr
+		$npc_apt_hall[$boy]
+		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> <b><i><3</i></b>'
+		*nl
+		'You punctuate the note with a tiny little heart, feeling warmth in your chest as you do.'
+		gs'booty_call_leave', 'sneak_out_note_end'
+	end
+	
+	if pcs_makeup > 2:
+		act'A kiss':
+			cla & *clr
+			$npc_apt_hall[$boy]
+			'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>>'
+			*nl
+			if booty_call['panty_note'] = 1:
+				'You run your tongue over your lips and press them together a moment before planting a big sloppy wet smooch on your own underwear. As you pull back, your lipstick leaves a large kiss on the soft fabric. Good thing you did your makeup before you left.'
+			else
+				'You run your tongue over your lips and press them together a moment before planting a big sloppy wet smooch on the page. As you pull back, your lipstick leaves large kiss on the soft fabric. Good thing you did your makeup before you left.'
+			end
+			gs'booty_call_leave', 'sneak_out_note_end'
+		end
+	end
+end
+
+if $ARGS[0] = 'sneak_out_note_end':
+	*nl
+	if booty_call['panty_note'] = 1:
+		'Satisfied, you leave your panties on the counter and quietly slip out the door, wondering what <<$npc_firstname[$boy]>> will think when he discovers them.'
+	else
+		'Satisfied, you leave your note on the counter and quietly slip out the door, letting it click shut behind you.'
+	end
+	act'Leave':gt'booty_call_leave', 'exit'
+end
+
+if $ARGS[0] = 'sneak_out2':
+	$npc_apt_hall[$boy]
+	'You tip toe your way to the door, turning the handle as gently as you can so you don''t disturb <<$npc_firstname[$boy]>>, closing it with a soft click behind you.'
+	act'Leave':gt'booty_call_leave', 'exit'
+end
+
+if $ARGS[0] = 'dress':
+	if $clothingworntype = 'nude': gs 'clothing', 'wear_last_worn'
+	if $pantyworntype = 'none' and $lastwornpantytype['booty_call'] ! 'none' and $lastwornpantytype['booty_call'] ! '':
+		gs 'panties', 'wear', $lastwornpantytype['booty_call'], lastwornpantynumber['booty_call']
+	end
+	if $braworntype = 'none' and $lastwornbratype['booty_call'] ! 'none' and $lastwornbratype['booty_call'] ! '':
+		gs 'bras', 'wear', $lastwornbratype['booty_call'], lastwornbranumber['booty_call']
+	end
+	gs 'stat'
+end
+
+if $ARGS[0] = 'dressing_image':
+	if booty_call['CloDress'] = 1:
+		'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/bed_dress.jpg"></center>'
+	elseif $booty_call['dress_describe'] = 'pulling your panties up your legs and fastening your bra around your chest':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_underwear1.mp4"></video></center>'
+	elseif $booty_call['dress_describe'] = 'fastening your bra around your chest':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_bra1.mp4"></video></center>'
+	elseif $booty_call['dress_describe'] = 'slipping your skirt up your legs':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_skirt1.mp4"></video></center>'
+!!	elseif $booty_call['dress_describe'] = 'zipping your skirt up over your panties':
+!!		'<center><video autoplay loop src="images/pc/activities/misc/dress_skirt1.mp4"></video></center>'
+	elseif $booty_call['dress_describe'] = 'pulling your panties up':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_panties1.mp4"></video></center>'
+	elseif $booty_call['dress_describe'] = 'pulling your top over your breasts':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_top1.mp4"></video></center>'
+!!	elseif $booty_call['dress_describe'] = 'pulling your top over your bra':
+!!		'<center><video autoplay loop src="images/pc/activities/misc/dress_top1.mp4"></video></center>'
+	elseif $booty_call['dress_describe'] = 'tugging your pants over your hips':
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+	elseif booty_call['hotel'] = 1:
+		!! IMAGE HERE
+		!! hotel room image
+	else
+		$npc_apt_bedroom[$boy]
+	end
+end
+
+if $ARGS[0] = 'dress_start_desc':
+	if booty_call['towel'] = 1:
+		!!booty_call['towel'] = 0
+		'You drop the towel and reach down for your clothes and start to pick them up.'
+	else
+		'You reach down for where you left your clothes and start to pick them up.'
+	end
+end
+
+if $ARGS[0] = 'dressing1':
+	cla & *clr
+!!	gs'booty_call_leave', 'dress'
+	gs'booty_call_leave', 'dress_loop'
+	
+	if booty_call['sleepover'] = 1 and npc_latesleeper[$boy] = 1 and booty_call['boy_asleep'] ! 0:
+		if booty_call['towel'] = 1:
+			booty_call['towel'] = 0
+			'You drop the towel and quietly reach down for your clothes and try to pick them up without waking <<$npc_firstname[$boy]>>.'
+		else
+			'You quietly reach down for where you left your clothes and try to pick them up without waking <<$npc_firstname[$boy]>>.'
+		end
+		
+		gs'booty_call_leave', 'dressing2'
+	else
+		gs'booty_call_leave', 'dress_start_desc'
+		if booty_call['angry_after'] = 1 or booty_call['annoyed'] > 0:
+			'"I have to go," you say flatly, reaching down for your clothes without looking at <<$npc_firstname[$boy]>>.'
+			gs'booty_call_leave', 'dressing2'
+		elseif booty_call['cant_stay'] = 1:
+			!! there is an additional dress_loop here to make it possible to give panties here
+			gs'booty_call_leave', 'dress_loop_code'
+			'"Guess I''ll go then," you sigh, <<$booty_call[''dress_describe'']>>.'
+			gs'booty_call_leave', 'dressing2'
+			gs 'booty_call_leave', 'panty_gift'
+		elseif booty_call['npc_late'] = 0:
+			'"You heading out?" <<$npc_firstname[$boy]>> asks as you are <<$booty_call[''dress_describe'']>>.'
+			gs'booty_call_leave', 'not_leaving'
+			gs'booty_call_leave', 'leaving_soon'
+			gs'booty_call_leave', 'something_to_do'
+			gs'booty_call_leave', 'see_a_friend'
+			gs'booty_call_leave', 'another_fuckbuddy'
+			if booty_call['sleepover'] < 1:
+				gs'booty_call_leave', 'going_disco'
+				gs'booty_call_leave', 'mom_late'
+				gs'booty_call_leave', 'need_homework'
+				gs'booty_call_leave', 'school_night'
+			else
+				gs'booty_call_leave', 'going_school'
+				gs'booty_call_leave', 'dress_talk'
+			end
+		else
+			'<<$npc_firstname[$boy]>> starts getting dressed next to you.'
+			gs'booty_call_leave', 'dressing2'
+		end
+
+	!!	act'Talk while you dress':
+	!!		gs'booty_call_leave', 'dress_talk'
+	!!	end
+	end
+end
+
+if $ARGS[0] = 'dressing2':
+	if booty_call['sleepover'] = 1:
+		gs'booty_call_morning', 'end_morning'
+	else
+		gs'booty_call_leave', 'dressing_finish'
+	end
+	act'Talk while you dress':cla & gs'booty_call_leave', 'dress_talk'
+end
+
+if $ARGS[0] = 'dressing_finish':
+!!	if booty_call['dress_end'] ! 1:
+		act'Finish getting dressed':
+			cla & *clr
+		!!			$npc_apt_bedroom[$boy]
+			gs'booty_call_leave', 'dress_loop'
+			'You finish <<$booty_call[''dress_describe'']>>.'
+			gs'booty_call_after', 'after_sex_dressed'
+		end
+!!	end
+end
+
+if $ARGS[0] = 'not_leaving':
+	act'Not yet':
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		gs'booty_call_leave', 'dress_start_desc'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+		'"Not yet," you say, <<$booty_call[''dress_describe'']>>. "Just tired of hanging around naked."'
+		'"I''m never tired of seeing you naked."'
+		'"Whatever," you roll your eyes.'
+		gs 'booty_call_leave', 'dressing2'
+	end
+end
+
+if $ARGS[0] = 'leaving_soon':
+	act'Yeah':
+		booty_call['leaving'] = 1
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		gs'booty_call_leave', 'dress_start_desc'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+		if booty_call['sleepover'] < 1:
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>.'
+			gs 'booty_call_leave', 'dressing2'
+			gs 'booty_call_leave', 'panty_gift'
+		else
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>.'
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				gs 'booty_call_leave', 'dressing2'
+				gs 'booty_call_leave', 'panty_gift'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'going_disco':
+	if hour >= 18 and (week = 5 or week = 6):
+		if $region = 'pav':
+			act'Going to the disco':
+				cla & *clr
+				gs'booty_call_leave', 'dress_loop'
+				gs'booty_call_leave', 'dress_start_desc'
+				'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+				if booty_call['disco_after'] = 1:
+					'"Weren''t you listening to me?" you say, <<$booty_call[''dress_describe'']>>. "I told you, I''m going to the disco tonight."'
+				else
+					'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "I want to go to the disco."'
+				end
+				!! add spontaneous disco date
+				gs 'booty_call_leave', 'dressing2'
+				
+				gs 'booty_call_leave', 'panty_gift'
+			end
+		else
+			act'Going to the club':
+				cla & *clr
+				gs'booty_call_leave', 'dress_loop'
+				gs'booty_call_leave', 'dress_start_desc'
+				'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+				if booty_call['club_after'] = 1:
+					'"Weren''t you listening to me?" you say, <<$booty_call[''dress_describe'']>>. "I told you, I''m going clubbing tonight."'
+				else
+					'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "I want to hit the club tonight."'
+				end
+				!! add spontaneous club date
+				gs 'booty_call_leave', 'dressing2'
+				
+				gs 'booty_call_leave', 'panty_gift'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'mom_late':
+	if mid($start_type,1,2) = 'sg' and hour >= 20:
+		act'Mom will kill me':
+			booty_call['mom_kill'] = 1
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			gs'booty_call_leave', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			if hour < 3:
+				'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "I''m already going to be in trouble as it is, but if I don''t come home at all tonight, my mom will kill me."'
+			else
+				'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "My mom will kill me if I don''t come home before curfew."'
+			end			
+			gs 'booty_call_leave', 'dressing2'
+			
+			gs 'booty_call_leave', 'panty_gift'
+		end
+	end
+end
+
+if $ARGS[0] = 'need_homework':
+	if lernHome > 0:
+		act'Need to finish my homework':
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			gs'booty_call_leave', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "I need to do my homework."'
+!!			if rand(0,1) = 1:
+			'"Seriously? That''s what you''re in a rush for?"'
+			act'I want to go to uni':
+				cla & *clr
+				gs'booty_call_leave', 'dress_loop'
+				gs'booty_call_leave', 'dress_start_desc'
+				'"I want to go to uni," you say, <<$booty_call[''dress_describe'']>>. "Can''t do that if I fail out of school for not doing my homework."'
+				gs 'booty_call_leave', 'dressing2'
+			end
+			act'Don''t be an asshole':
+				cla & *clr
+				gs'booty_call_leave', 'dress_loop'
+				gs'booty_call_leave', 'dress_start_desc'
+				'"Don''t be an asshole," you glare, <<$booty_call[''dress_describe'']>>. "My grades are important to me. More important than spending more time fucking you."'
+				gs 'booty_call_leave', 'dressing2'
+			end
+			gs 'booty_call_leave', 'panty_gift'
+		end
+	end
+end
+
+if $ARGS[0] = 'something_to_do':
+	act'Gotta do something':
+		booty_call['leaving'] = 1
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		gs'booty_call_leave', 'dress_start_desc'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+		if booty_call['sleepover'] < 1:
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Have a few things I need to get done."'
+			gs 'booty_call_leave', 'dressing2'
+			gs 'booty_call_leave', 'panty_gift'
+		else
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Have a few things I need to get done. Thanks for letting me spend the night."'
+			
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'see_a_friend':
+	act'Meeting a friend':
+		booty_call['leaving'] = 1
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		gs'booty_call_leave', 'dress_start_desc'
+		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+		if booty_call['sleepover'] < 1:
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Need to see a friend later."'
+			gs 'booty_call_leave', 'dressing2'
+			gs 'booty_call_leave', 'panty_gift'
+		else
+			'"Yeah," you say, <<$booty_call[''dress_describe'']>>. "Need to see a friend later. Thanks for letting me spend the night."'
+			
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'another_fuckbuddy':
+	if arrsize('$fuckbuddy') > 1:
+		act'Another booty call':
+			booty_call['leaving'] = 1
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			gs'booty_call_leave', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			'"Yeah," you smirk, <<$booty_call[''dress_describe'']>>. "Got another booty call to show up to."'
+			'"You really get around don''t you?" <<$npc_firstname[$boy]>> smirks back.'
+			gs 'booty_call_leave', 'dressing2'
+			gs 'booty_call_leave', 'panty_gift'
+		end
+	end
+end
+
+if $ARGS[0] = 'going_school':
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and week < 6: 
+		act'School':
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			gs'booty_call_leave', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			if booty_call['late_for_school'] = 1 and hour >= 8:
+				'"I already told you, I''m late for school," you say, <<$booty_call[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
+			elseif booty_call['late_for_school'] = 1:
+				'"I already told you, I''m gonna be late for school," you say, <<$booty_call[''dress_describe'']>>. "But thanks for letting me spend the night. And the second fuck," you add with a wink.'
+			elseif hour = 7:
+				'"Gotta get to school," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
+			else
+				'"Gotta get ready for school," you say, <<$booty_call[''dress_describe'']>>. "Thanks for letting me spend the night."'
+			end
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				'"No problem."'
+				gs'booty_call_morning', 'end_morning'
+			end
+			gs'booty_call_leave', 'dress_talk'
+		end
+	end
+end
+
+if $ARGS[0] = 'school_night':
+	if kanikuli = 0 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and SchoolBlock = 0 and (week < 5 or week = 7): 
+		act'It''s a school night':
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			gs'booty_call_leave', 'dress_start_desc'
+			'"You heading out?" <<$npc_firstname[$boy]>> asks.'
+			!! if schoolprogul = 1:
+				'"It''s a school night," you say, <<$booty_call[''dress_describe'']>>. "Gotta get home so I can set my alarm and get up for class tomorrow."'
+			if rand(1,3) = 3 and (npc_day_off[$boy] = week or (npc_day_off[$boy] = week + 1) or (week = 7 and npc_day_off[$boy] = 1)):
+				gs'booty_call_morning', 'booty_call_invite_later'
+			else
+				gs 'booty_call_leave', 'dressing2'
+			end
+			gs'booty_call_leave', 'dress_talk'
+		end
+	end
+end
+
+if $ARGS[0] = 'panty_gift':
+	if $pantyworntype ! 'none' and $braworntype = 'none' and $clothingworntype = 'nude' and booty_call['mad'] = 0 and booty_call['fuck_count'] > 0:
+		act'Give him your panties':
+			npc_panty_give[$boy] += 1
+			gs 'panties', 'dispose'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/romance/misc/panty_gift.mp4"></video></center>'
+			'Just after you put on your panties, a sexy thought pops into your head.'
+			*nl
+			'"But before I go," you say mischievously. "I have a gift for you."'
+			if npc_panty_give[$boy] = 1:
+				'"A gift?" <<$npc_firstname[$boy]>> asks curiously.'
+				*nl
+				'In one smooth motion, you slide your panties down your legs and daintily toss them onto the rumpled sheets of the bed on which you fucked <<$npc_firstname[$boy]>>.'
+				gs 'booty_call_leave', 'panty_gift2'
+			else
+				'"Another pair of your panties?" <<$npc_firstname[$boy]>> grins.'
+				'"You guessed correctly," you grin back. "And your prize is-!"'
+				*nl
+				'In one smooth motion, you slide your panties down your legs and daintily toss them into the rumpled sheets of the bed you were just fucked in.'
+				*nl
+				'"Enjoy," you smirk.'
+				gs 'booty_call_leave', 'dressing2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'panty_gift2':
+	act'You did a good job':
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		'"You did a good job," you smile, <<$booty_call[''dress_describe'']>>. "Consider that your reward."'
+		if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+			if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
+			'"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
+			gs 'booty_call_leave', 'panty_gift_girlfriend'
+		else
+			'<<$npc_firstname[$boy]>> doesn''t reply, but his expression says that he isn''t displeased.'
+			gs 'booty_call_leave', 'dressing2'
+		end
+	end
+	
+	act'Something to remember the occasion':
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		if daystage > 3:
+			'"Something to remember the night," you smile, <<$booty_call[''dress_describe'']>>. "Keep the good times in mind."'
+		else
+			'"Something to remember the day," you smile, <<$booty_call[''dress_describe'']>>. "Keep the good times in mind."'
+		end
+		if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+			if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
+			'"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
+			gs 'booty_call_leave', 'panty_gift_girlfriend'
+		else
+			'"Maybe I should frame it," <<$npc_firstname[$boy]>> snickers.'
+			gs 'booty_call_leave', 'dressing2'
+		end
+	end
+	
+	act'Consider it a trophy':
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		'"Consider it a trophy," you smile, <<$booty_call[''dress_describe'']>>. "Think of it as proof of conquest."'
+		if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+			if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
+			'"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
+			gs 'booty_call_leave', 'panty_gift_girlfriend'
+		else
+			'<<$npc_firstname[$boy]>> doesn''t reply, but his expression says that he isn''t displeased.'
+			gs 'booty_call_leave', 'dressing2'
+		end
+	end
+	
+	if booty_call['virgin'] = 1:
+		act'To remember my virginity':
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			'"To remember my virginity," you smile, <<$booty_call[''dress_describe'']>>. "And that you made me a woman."'
+			if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+				if pc_know_npc_has_girlfriend[$boy] = 0: pc_know_npc_has_girlfriend[$boy] = 1
+				'"And what am I supposed to do with these when my girlfriend comes home?" he asks, looking at them amusedly.'
+				gs 'booty_call_leave', 'panty_gift_girlfriend'
+			else
+				'<<$npc_firstname[$boy]>> doesn''t reply, but his expression says that he isn''t displeased.'
+				gs 'booty_call_leave', 'dressing2'
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'panty_gift_girlfriend':
+	act'Hide them':
+		cla & *nl
+		'"Just hide them," you say, <<$booty_call[''dress_describe'']>>. "If you can hide a fucking a girl in your bed, surely you can hide a pair of panties."'
+		gs 'booty_call_leave', 'dressing2'
+	end
+	
+	act'Say they''re hers':
+		cla & *nl
+		'"Tell her they''re hers," you shrug with a wry smirk, <<$booty_call[''dress_describe'']>>. "Maybe she''ll think she bought them."'
+		gs 'booty_call_leave', 'dressing2'
+	end
+	
+	act'Say they''re yours':
+		gs'booty_call_leave', 'dress_loop_code'
+		cla & *nl
+		'"Tell her they''re yours," you shrug with a wry smirk, <<$booty_call[''dress_describe'']>>. "A guy can''t wear a cute pair of panties now and then?"'
+		if npc_insecure[$boy] = 1:
+			gs'booty_call_leave', 'dress_loop_code'
+			'<<$npc_firstname[$boy]>>''s face immediately reddens and he looks at you with an angry glare.'
+			'"What the fuck? I''m not some twink who puts on girlie panties like a fucking faggot!"'
+			act'I was kidding (amused)':
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"I was just kidding," you snicker, rolling your eyes. "Bad joke, sorry."'
+				'You move to <<$booty_call[''dress_describe'']>> but <<$npc_firstname[$boy]>> continues to glare at you out of the corner of your eye for a few moments longer before looking away.'
+				gs 'booty_call_leave', 'dressing2'
+			end
+			
+			act'I was kidding (acerbic)':
+				cla & *clr
+				$npc_apt_bedroom[$boy]
+				'"Christ, I was just kidding," you say, giving <<$npc_firstname[$boy]>> a look of exasperation. "Of course I wasn''t seriously suggesting that. Take a joke, dumbass."'
+				'You start <<$booty_call[''dress_describe'']>> but <<$npc_firstname[$boy]>> continues to glare at you out of the corner of your eye for a few moments longer before looking away.'
+				gs 'booty_call_leave', 'dressing2'
+			end
+		else
+			'<<$npc_firstname[$boy]>> laughs aloud.'
+			'"Yeah, I bet that''d get me off the hook."'
+			gs 'booty_call_leave', 'dressing2'
+		end
+	end
+	
+	act'Give them to her':
+		cla & *nl
+		'"Gift them to her," you say mischievously, <<$booty_call[''dress_describe'']>>. "Maybe she''ll put them on."'
+		gs 'booty_call_leave', 'dressing2'
+	end
+	
+	act'Throw them away':
+		cla & *nl
+		'"Throw them away then," you shrug, <<$booty_call[''dress_describe'']>>. "Do whatever you want with them.'
+		gs'booty_call_leave', 'dress_loop_code'
+		'"After all, they''re your panties now," you add with a smirk, <<$booty_call[''dress_describe'']>>.'
+		gs 'booty_call_leave', 'dressing2'
+	end
+end
+
+if $ARGS[0] = 'dress_image':
+	cla & *clr
+	if booty_call['CloDress'] = 1:
+		'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/bed_dress.jpg"></center>'
+	else
+		'<center><video autoplay loop src="images/pc/activities/misc/dress_1.mp4"></video></center>'
+	end
+end
+
+if $ARGS[0] = 'dress_loop':
+	cla & *clr
+	gs'booty_call_leave', 'dress_loop_code'
+	gs'booty_call_leave', 'dressing_image'
+	gs'stat'
+end
+
+if $ARGS[0] = 'dress_loop_code':
+	:dress_loop_start
+	if booty_call['dressing_start'] ! 1:
+		booty_call['dressing_start'] = 1
+		$booty_call['dress_describe'] = 'reaching down for your clothes'
+	elseif $lastwornpantytype['booty_call'] ! 'none' and $lastwornbratype['booty_call'] ! 'none'  and $pantyworntype = 'none' and booty_call['panty_wear'] ! 1 and booty_call['bra_wear'] ! 1:
+		gs 'panties', 'wear', $lastwornpantytype['booty_call'], lastwornpantynumber['booty_call']
+		gs 'bras', 'wear', $lastwornbratype['booty_call'], lastwornbranumber['booty_call']
+		booty_call['panty_wear'] = 1
+		booty_call['bra_wear'] = 1
+		killvar 'lastwornpantytype'
+		killvar 'lastwornpantynumber'
+		killvar 'lastwornbratype'
+		killvar 'lastwornbranumber'
+		$booty_call['dress_describe'] = 'pulling your panties up your legs and fastening your bra around your chest'
+	elseif $lastwornpantytype['booty_call'] ! 'none' and $pantyworntype = 'none' and booty_call['panty_wear'] ! 1:
+		gs 'panties', 'wear', $lastwornpantytype['booty_call'], lastwornpantynumber['booty_call']
+		killvar 'lastwornpantytype'
+		killvar 'lastwornpantynumber'
+		booty_call['panty_wear'] = 1
+		$booty_call['dress_describe'] = 'pulling your panties up'
+	elseif $lastwornbratype['booty_call'] ! 'none' and $lastwornbratype['booty_call'] ! '' and $braworntype = 'none' and booty_call['bra_wear'] ! 1:
+		gs 'bras', 'wear', $lastwornbratype['booty_call'], lastwornbranumber['booty_call']
+		killvar 'lastwornbratype'
+		killvar 'lastwornbranumber'
+		booty_call['bra_wear'] = 1
+		$booty_call['dress_describe'] = 'fastening your bra around your chest'
+	elseif $clothingworntype = 'nude':
+		gs'clothing', 'wear_last_worn'
+		jump 'dress_loop_start'
+	elseif $clothingworntype ! 'nude' and booty_call['dress_end'] ! 1:
+		if CloDress = 1 and (booty_call['dress_top_wear'] ! 1 or booty_call['dress_skirt_wear'] ! 1):
+			if booty_call['dress_top_wear'] ! 1:
+				booty_call['dress_top_wear'] = 1
+				$booty_call['dress_describe'] = 'pulling your dress over your shoulders'
+			elseif booty_call['dress_skirt_wear'] ! 1:
+				booty_call['dress_skirt_wear'] = 1
+				booty_call['dress_end'] = 1
+				$booty_call['dress_describe'] = 'smoothing your skirt out'
+			end
+		else
+			if CloSkirtShortness > 0 and booty_call['skirt_wear'] ! 1 and booty_call['dress_end'] ! 1:
+				booty_call['skirt_wear'] = 1
+				if $pantyworntype = 'none':
+					$booty_call['dress_describe'] = 'slipping your skirt up your legs'
+				else
+					$booty_call['dress_describe'] = 'zipping your skirt up over your panties'
+				end
+			elseif CloSkirtShortness = 0 and booty_call['dress_end'] ! 1 and booty_call['pants_wear'] ! 1:
+				booty_call['pants_wear'] = 1
+				$booty_call['dress_describe'] = 'tugging your pants over your hips'
+			else
+				booty_call['dress_end'] = 1
+				if $braworntype = 'none':
+					$booty_call['dress_describe'] = 'pulling your top over your breasts'
+				else
+					$booty_call['dress_describe'] = 'pulling your top over your bra'
+				end
+			end
+		end
+	elseif booty_call['dress_end'] = 1:
+		if CloDress = 1:
+			$booty_call['dress_describe'] = 'checking your dress'
+		elseif CloSkirtShortness > 0:
+			$booty_call['dress_describe'] = 'smoothing your skirt'
+		else
+			$booty_call['dress_describe'] = 'checking your clothes'
+		end
+	end
+end
+
+
+if $ARGS[0] = 'dress_talk':
+	gs'booty_call_leave', 'dressing_finish'
+	
+	gs 'booty_call_leave', 'dress_talk_pc'
+	if booty_call['dress_end'] ! 1 and booty_call['plans_later_talk'] = 0 and rand(0,1) = 1:
+		gs 'booty_call_leave', 'npc_booty_call_invite'
+!!{
+		!! he initiates
+		gs 'booty_call_leave', 'dress_talk_boy'
+	else
+		!! player initiates
+		gs 'booty_call_leave', 'dress_talk_pc'
+	}
+	else
+		gs 'booty_call_after', 'after_sex_dressed'
+	end
+end
+
+if $ARGS[0] = 'dress_talk_boy':
+	gs 'booty_call_leave', 'npc_booty_call_invite'
+
+	if booty_call['dress_talk2'] = 0:
+		'"What''re you up to later?"'
+		if date_variable > 0:
+			!! CHANGE THIS PLACEHOLDER VARIABLE
+			act'I have a date with my boyfriend':
+				cla
+				act'Embarrassed':
+					gs'booty_call_after', 'dress_image'
+					'"I have a date with my boyfriend later," you say, blushing shyly.'
+					gs'booty_call_after', 'npc_date_later_response'
+					'Your blush deepens in response.'
+				end
+				
+				act'Casual':
+					gs'booty_call_after', 'dress_image'
+					'"I have a date with my boyfriend later,"'
+					gs'booty_call_after', 'npc_date_later_response'
+				end
+				
+				act'Exhasperated':
+					gs'booty_call_after', 'dress_image'
+					'"I have a date with my boyfriend later,"'
+					gs'booty_call_after', 'npc_date_later_response'
+				end
+			end
+		end
+	end
+
+	if booty_call['dress_talk3'] = 0:
+
+
+	end
+
+	if booty_call['dress_talk4'] = 0:
+
+
+	end
+
+	if booty_call['dress_talk5'] = 0:
+
+
+	end
+end
+
+if $ARGS[0] = 'dress_talk_pc':
+	if booty_call['plans_later_talk'] = 0 and (hour < 21 or booty_call['sleepover'] = 1):
+		act'Ask him what he''s doing later':
+			booty_call['plans_later_talk'] = 1
+			gs'booty_call_leave', 'dress_loop'
+			'"Got any plans for the rest day?" you ask, casually <<$booty_call[''dress_describe'']>>.'
+			gs 'booty_call_leave', 'dress_talk'
+			if npc_day_off[$boy] = week:
+				'"Not really," <<$npc_firstname[$boy]>> shrugs. "It''s my day off so I''m just chilling."'
+				gs'booty_call_leave', 'pc_booty_call_invite'
+			else
+				'"I have to go to work," <<$npc_firstname[$boy]>> replies.'
+				gs'booty_call_leave', 'when_do_you_get_off'
+			end
+		end
+	end
+
+	if booty_call['dress_talk2'] = 0:
+
+
+	end
+
+	if booty_call['dress_talk3'] = 0:
+
+
+	end
+
+	if booty_call['dress_talk4'] = 0:
+
+
+	end
+
+	
+	gs'booty_call_leave', 'had_a_good_time'
+	
+	gs'booty_call_leave', 'stay_over_thanks'
+	
+end
+
+!!if $ARGS[0] = '':
+
+!!end
+
+if $ARGS[0] = 'had_a_good_time':
+	if booty_call['good_time'] = 0 and booty_call['annoyed'] = 0:
+		act'I had a good time':
+			cla & *clr
+			booty_call['good_time'] = 1
+			gs'booty_call_leave', 'dress_loop'
+			if booty_call['spend_night_thanks'] = 1:
+				'"Last night was really great," you smile at <<$npc_firstname[$boy]>>. "I had a lot of fun."'
+			elseif booty_call['sleepover'] = 1:
+				'"I had a great time last night," you smile at <<$npc_firstname[$boy]>>.'
+			else
+				'"This was really fun," you smile at <<$npc_firstname[$boy]>>. "I had a great time."'
+			end
+			if booty_call['blue_ball'] = 0:
+				'"Me too," he smirks back, watching you <<$booty_call[''dress_describe'']>>.'
+			elseif npc_selfish[$boy] = 1:
+				'"Still bullshit that I didn''t get to finish properly," he mutters sourly.'
+			else
+				'"I just wish it didn''t have to end so soon," he replies, watching you <<$booty_call[''dress_describe'']>>.'
+				'"Sorry," you say ruefully.'
+			end
+			act'Continue':cla & gs'booty_call_leave', 'dress_talk'
+			gs'booty_call_leave', 'stay_over_thanks'
+		end
+	end
+end
+
+if $ARGS[0] = 'stay_over_thanks':
+	if booty_call['spend_night_thanks'] = 0 and booty_call['sleepover'] = 1:
+		act'Thanks for letting me stay over':
+			cla & *clr
+			booty_call['spend_night_thanks'] = 1
+			gs'booty_call_leave', 'dress_loop'
+			if booty_call['good_time'] = 1:
+				'"Thanks for letting me stay over too," you tell <<$npc_firstname[$boy]>>. "I really appreciate it."'
+			else
+				'"Thanks for letting me spend the night," you tell <<$npc_firstname[$boy]>>. "I really appreciate it."'
+			end
+			if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+				pc_know_npc_has_girlfriend[$boy] = 1
+				'"Lucky my girlfriend wasn''t coming over," he smirks back, watching you <<$booty_call[''dress_describe'']>>.'
+			elseif npc_caretaker[$boy] = 1 or npc_generous[$boy] = 1:
+				'"Yeah no problem," he smiles back, watching you <<$booty_call[''dress_describe'']>>.'
+			elseif booty_call['pass_out'] = 1:
+				'"You passed out on me," he shrugs, watching you <<$booty_call[''dress_describe'']>>. "What was I supposed to do? Wake you up and kick you out?"'
+			else
+				'He shrugs in a "whatever" manner while he watches you <<$booty_call[''dress_describe'']>>.'
+			end
+			act'Continue':cla & gs'booty_call_leave', 'dress_talk'
+			gs'booty_call_leave', 'had_a_good_time'
+		end
+	end
+end
+
+if $ARGS[0] = 'when_do_you_get_off':
+	act'Ask what time he gets off':
+		cla & *clr
+		gs'booty_call_leave', 'dress_loop'
+		'"What time do you get off?" you ask while <<$booty_call[''dress_describe'']>>.'
+		'"Around <<npc_start_free_time[$boy]>>. Why?"'
+		act'Just curious':
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			'"Just curious," you shrug, <<$booty_call[''dress_describe'']>> next.'
+			act'Continue':cla & gs'booty_call_leave', 'dress_talk'
+		end
+		gs'booty_call_leave', 'pc_booty_call_invite'
+	end
+end
+
+if $ARGS[0] = 'ruined_panties':
+	if cum_loc['vagina'] > 0 and booty_call['ruin_my_panties'] = 0 and $lastwornpantytype['booty_call'] ! 'none' and booty_call['panty_wear'] ! 1:
+		act'':
+			
+		end
+	end
+end
+
+if $ARGS[0] = 'npc_date_later_response':
+	if npc_know_cheat[$boy] = 1:
+		if npc_fidelity[$boy] < 7:
+			'"You''re still with that stick in the mud?" <<$npc_firstname[$boy]>> scoffs.'
+		else
+		
+		end
+	else
+		npc_know_cheat[$boy] = 1
+		if npc_fidelity[$boy] < 7:
+			'"And you''re fucking me right before your date?" <<$npc_firstname[$boy]>> snickers. "Hot."'
+		else
+			'"Oh." <<$npc_firstname[$boy]>> looks away uncomfortably.'
+		end
+		
+	end
+end
+
+if $ARGS[0] = 'pc_booty_call_invite':
+	if booty_call['sleepover'] = 1 or hour < 5:
+		act'Ask to come over later':
+			booty_call['invite_today'] = 1
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			if npc_day_off[$boy] = week:
+				if booty_call['sleepover'] = 1:
+					'"Want to do this again later?" you grin, <<$booty_call[''dress_describe'']>>.'
+				else
+					'"Want to do this again later?" you grin, <<$booty_call[''dress_describe'']>>. "In the daytime?"'
+				end
+				if rand(1,10)/2 <= npc_sexdrive[$boy]:
+					'"Maybe. What time were you thinking?"'
+					gs'booty_call_leave', 'pc_booty_call_timeset'
+				else
+					'"Twice in one day might be a little bit too much for me," <<$npc_firstname[$boy]>> smiles back ruefully.'
+					gs'booty_call_leave', 'pc_booty_call_invite_denied'
+				end
+			else
+				if rand(1,10)/2 <= npc_sexdrive[$boy]:
+					'"What time were you thinking?"'
+					gs'booty_call_leave', 'pc_booty_call_timeset'
+				else
+					'"Think I might be a little too tapped out from work," <<$npc_firstname[$boy]>> grunts.'
+					gs'booty_call_leave', 'pc_booty_call_invite_denied'
+				end
+			end
+		end
+	elseif hour >= 5:
+		act'Ask to come over tomorrow':
+			booty_call['invite_tomorrow'] = 1
+			cla & *clr
+			gs'booty_call_leave', 'dress_loop'
+			'"Want to do this again tomorrow?" you ask, flashing a smile while you''re <<$booty_call[''dress_describe'']>>.'
+			if npc_day_off[$boy] = week + 1 or (npc_day_off[$boy] = 1 and week = 7):
+				if rand(1,10)/2 <= npc_sexdrive[$boy]:
+					'"Hmm... It''ll be my day off... What time were you thinking?"'
+					gs'booty_call_leave', 'pc_booty_call_timeset'
+				else
+					'"Sorry, I have some things I need to get done tomorrow."'
+					gs'booty_call_leave', 'pc_booty_call_invite_denied'
+				end
+			else
+				if rand(1,10)/2 <= npc_sexdrive[$boy]:
+					'"What time were you thinking?"'
+					gs'booty_call_leave', 'pc_booty_call_timeset'
+				else
+					'"Sorry, I have some things I need to get done tomorrow."'
+					gs'booty_call_leave', 'pc_booty_call_invite_denied'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'pc_booty_call_timeset':
+	act'How about...': 
+		:invalid_timeset
+		npc_booty_call_time[$boy] = input ("When do you want to set your reminder? (Pick an hour 1 - 22. A reminder icon will appear in the stat display during that hour.)")
+		if npc_booty_call_time[$boy] < npc_start_free_time[$boy] or npc_booty_call_time[$boy] > 22:
+			msg 'Invalid input. Pick an hour between npc_start_free_time[$boy] and 22.'
+			jump 'invalid_timeset'
+		else
+			gs'booty_call_leave', 'pc_booty_call_invite2'
+		end
+	end
+end
+
+if $ARGS[0] = 'pc_booty_call_invite2':
+	cla & *clr
+	gs'booty_call_leave', 'dress_loop'
+	if booty_call['invite_today'] = 1:
+		if npc_booty_call_time[$boy] = npc_start_free_time[$boy]:
+			'"How about <<npc_booty_call_time[$boy]>>?" you smirk <<$booty_call[''dress_describe'']>>. "We can get off together."'
+			gs 'booty_call_leave', 'pc_booty_call_invite_accepted'
+		else
+			'"How about <<npc_booty_call_time[$boy]>>?" you ask <<$booty_call[''dress_describe'']>>.'
+			if npc_booty_call_time[$boy] > npc_end_free_time[$boy]:
+				'"Sorry, that doesn''t work for me," <<$npc_firstname[$boy]>> grunts.'
+				gs'booty_call_leave', 'pc_booty_call_invite_denied'
+			else
+				gs 'booty_call_leave', 'pc_booty_call_invite_accepted'
+			end
+		end
+	else
+		'"How about <<npc_booty_call_time[$boy]>>?" you ask <<$booty_call[''dress_describe'']>>.'
+		if npc_booty_call_time[$boy] > npc_end_free_time[$boy]:
+			'"Sorry, that doesn''t work for me," <<$npc_firstname[$boy]>> grunts.'
+			gs'booty_call_leave', 'pc_booty_call_invite_denied'
+		else
+			gs 'booty_call_leave', 'pc_booty_call_invite_accepted'
+		end
+	end
+end
+
+if $ARGS[0] = 'pc_booty_call_invite_accepted':
+	'"That sounds good," <<$npc_firstname[$boy]>> grins back. "Okay, see you then."'
+	gs 'booty_call', 'set_booty_call_date'
+	gs 'booty_call_leave', 'dress_talk'
+end
+
+if $ARGS[0] = 'pc_booty_call_invite_denied':
+	gs'booty_call_leave', 'dress_loop_code'
+	'"Damn," you sigh disappointedly, continuing <<$booty_call[''dress_describe'']>>'
+	gs 'booty_call', 'block_booty_calls'
+	gs 'booty_call_leave', 'dress_talk'
+end
+
+if $ARGS[0] = 'npc_booty_call_invite':
+	if booty_call['plans_later_talk'] = 0:
+		gs 'booty_call_leave', 'dress_loop'
+		booty_call['plans_later_talk'] = 1
+		if npc_day_off[$boy] = week + 1 or (week = 7 and npc_day_off[$boy] = 1):
+			booty_call['invite_tomorrow'] = 1
+			if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+				pc_know_npc_has_girlfriend[$boy] = 1
+				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''ll be my day off and my girlfriend won''t be around. Want to come over and do this again?"'
+			else
+				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''ll be my day off. Want to come by and do this again?"'
+			end
+		elseif npc_day_off[$boy] = week and (booty_call['sleepover'] = 1 or hour < 5):
+			booty_call['invite_today'] = 1
+			if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+				pc_know_npc_has_girlfriend[$boy] = 1
+				'"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "Today''s my day off and my girlfriend won''t be around. Want to come over and do this again?"'
+			else
+				'"You busy later?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "It''s my day off. Want to come by and do this again?"'
+			end
+		else
+			booty_call['invite_tomorrow'] = 1
+			if npc_girlfriend[$boy] = 1 and npc_fidelity[$boy] = 6:
+				pc_know_npc_has_girlfriend[$boy] = 1
+				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "My girlfriend won''t be around. Want to come over and do this again?"'
+			else
+				'"You busy tomorrow?" <<$npc_firstname[$boy]>> asks as you''re <<$booty_call[''dress_describe'']>>. "Want to come by and do this again?"'
+			end
+		end
+		
+		gs 'booty_call_leave', 'busy_tomorrow'
+		
+		act'What time?':
+			gs 'booty_call_leave', 'dress_loop'
+			'"That depends," you say, <<$booty_call[''dress_describe'']>>. "What time were you thinking?"'
+			'"<<npc_start_free_time[$boy]>>?" <<$npc_firstname[$boy]>> asks.'
+			gs 'booty_call_leave', 'busy_time'
+			gs 'booty_call_leave', 'booty_call_plan'
+		end
+	end
+end
+
+if $ARGS[0] = 'busy_tomorrow':
+	act'I''m busy':
+		gs 'booty_call', 'block_booty_calls'
+		gs 'booty_call_leave', 'dress_loop'
+		if booty_call['invite_tomorrow'] = 1:
+			'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I''m busy tomorrow."'
+		else
+			'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I''m busy."'
+		end
+		'"Damn," <<$npc_firstname[$boy]>> says disappointedly.'
+		gs 'booty_call_leave', 'dress_talk'
+	end
+end
+
+if $ARGS[0] = 'busy_time':
+	act'I''m busy':
+		gs 'booty_call', 'block_booty_calls'
+		gs 'booty_call_leave', 'dress_loop'
+		'"I can''t, sorry," you say, <<$booty_call[''dress_describe'']>>. "I have something to do then."'
+		'"Damn," <<$npc_firstname[$boy]>> says disappointedly.'
+		gs 'booty_call_leave', 'dress_talk'
+	end
+end
+
+if $ARGS[0] = 'booty_call_plan':
+	act'Sounds good':
+		gs 'booty_call', 'set_booty_call_date'
+		gs 'booty_call_leave', 'dress_loop'
+		'"Sounds good," you grin, <<$booty_call[''dress_describe'']>>. "I''ll see you then."'
+		'"Great," <<$npc_firstname[$boy]>> grins back.'
+		gs 'booty_call_leave', 'dress_talk'
+	end
+	
+	act'I''ve got nothing better to do':
+		gs 'booty_call', 'set_booty_call_date'
+		gs 'booty_call_leave', 'dress_loop'
+		'"Sure," you smirk, <<$booty_call[''dress_describe'']>>. "I got nothing better to do."'
+		'"Great," <<$npc_firstname[$boy]>> grins back.'
+		gs 'booty_call_leave', 'dress_talk'
+	end
+	
+	act'I could fit it in':
+		gs 'booty_call', 'set_booty_call_date'
+		gs 'booty_call_leave', 'dress_loop'
+		'"I think I can fit that in," you smirk, <<$booty_call[''dress_describe'']>>.'
+		if npc_humor[$boy] = 2:
+			'"You sure can," <<$npc_firstname[$boy]>> grins lewdly at you.'
+		else
+			'"Great," <<$npc_firstname[$boy]>> grins back.'
+		end
+		gs 'booty_call_leave', 'dress_talk'
+	end
+end
+
+--- booty_call_leave ---------------------------------

locations/booty_call_miss.qsrc

@@ -1,10 +1,17 @@
 # booty_call_miss
 
 if $ARGS[0] = 'missionary_start':
-	if booty_call['change_pos'] = 1:
+	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+		cla & *clr
+		'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+		'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
+		act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+		act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+	elseif booty_call['change_pos'] = 1:
 		act'Switch to missionary':
 			cla & *clr
 			booty_call['change_pos'] = 0
+			booty_call['cock_inserted'] = 1
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss2.jpg"></center>'
 			if $booty_call['position'] = 'doggy':
 				'You lean forward, letting <<$npc_firstname[$boy]>>''s cock slip from your pussy. You flip over onto your back, spreading your legs, giving him a sultry look.'
@@ -14,21 +21,26 @@ if $ARGS[0] = 'missionary_start':
 			'"I want you on top," you whisper huskily.'
 			act'Keep fucking':gs'booty_call_miss', 'miss_goto'
 		end
-	elseif booty_call['force_initiative'] = 2:
-		'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex1.mp4"></video></center>'
-		if $booty_call['position'] = 'miss':
-			'You''ve barely finished quivering when he starts moving his hips again. The motion inside your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
-		elseif $booty_call['position'] = 'doggy':
-			!! IMAGE HERE
-			'You''ve barely finished quivering when he rolls you onto your back and plunges his cock all the way inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
-		elseif $booty_call['position'] = 'cowgirl':
-			!! IMAGE HERE
-			'You''ve barely finished quivering when he pulls you off of him and pushes you onto your back, immediately plunging his cock back inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again.'
-		end
-		act'Get fucked':gs'booty_call_miss', 'miss_goto'
-	elseif booty_call['initiative'] ! 1:
+	elseif booty_call['force_initiative'] = 2 and booty_call['cock_inserted'] = 1:
+		cla
+		act'Continue':
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex1.mp4"></video></center>'
+			if $booty_call['position'] = 'miss':
+				'You''ve barely finished quivering when he starts moving his hips again. The motion inside your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
+			elseif $booty_call['position'] = 'doggy':
+				!! IMAGE HERE
+				'You''ve barely finished quivering when he rolls you onto your back and plunges his cock all the way inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again'
+			elseif $booty_call['position'] = 'cowgirl':
+				!! IMAGE HERE
+				'You''ve barely finished quivering when he pulls you off of him and pushes you onto your back, immediately plunging his cock back inside you. The sudden penetration of your still-sensitive pussy elicits involuntary whimpers of protest from you, but it doesn''t stop him for a moment, ramping back into fucking you again.'
+			end
+			act'Get fucked':gs'booty_call_miss', 'miss_goto'
+		end
+	elseif booty_call['initiative'] ! 1 or booty_call['force_initiative'] = 2:
 		gs 'booty_call_sex', 'speed_select'
 		act'Continue':
+			booty_call['cock_inserted'] = 1
 			if booty_call['condom'] = 0: booty_call['no_condom'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
@@ -45,6 +57,7 @@ if $ARGS[0] = 'missionary_start':
 	else
 		gs 'booty_call_sex', 'speed_select'
 		act'Spread your legs':
+			booty_call['cock_inserted'] = 1
 			if booty_call['condom'] = 0: booty_call['no_condom'] = 1
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss2.jpg"></center>'
@@ -52,8 +65,10 @@ if $ARGS[0] = 'missionary_start':
 				'You lean back, spreading your legs and pussy wide for <<$npc_firstname[$boy]>>.'
 			elseif $booty_call['position'] = 'miss':
 				'You lean back and spread your legs, beckoning him back between them.'
+			elseif $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl':
+				'"I want you on top this time," you whisper huskily.'
 			else
-				'"I want you on top this time."'
+				'"I need you inside me again," you whisper, spreading your legs and pussy wide for <<$npc_firstname[$boy]>>.'
 			end
 			act'Get fucked':gs'booty_call_miss', 'miss_goto'
 		end
@@ -61,19 +76,21 @@ if $ARGS[0] = 'missionary_start':
 end
 
 if $ARGS[0] = 'miss_goto':
+	booty_call['cock_inserted'] = 1
 	if booty_call['speed'] = 0: booty_call['speed'] = rand(1,3)
 	gt 'booty_call_miss', 'miss<<booty_call[''speed'']>>'
 end
 
 if $ARGS[0] = 'miss1':
 	!! slow pace
+	booty_call['miss_fuck'] = 1
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	$booty_call['position'] = 'miss'
 	$booty_call['pos_speed'] = 'miss1'
 	!! booty_call['missionary_fuck'] tracks if you fuck in this position
 	booty_call['missionary_fuck'] = 1
 	booty_call['kiss'] = 0
-!!	if pcs_vag = 0:gt 'booty_call_virgin', 'miss_virg_norm1'
+	if pcs_vag = 0 and booty_call['fuck_count'] = 0:gt 'booty_call_virgin', 'miss_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
 	if mesec > 0:
@@ -100,8 +117,8 @@ if $ARGS[0] = 'miss1':
 		if rand(0,2) = 2 and booty_call['kiss_skip'] = 1 and cum_loc['face'] <= 0:
 			gs 'booty_call_miss', 'miss_kiss'
 		else
-			gs 'booty_call_cum', 'fuck_cum'
 			if booty_call['orgasm'] < orgasm:gs 'booty_call_sex', 'girl_cum_pre'
+			gs 'booty_call_cum', 'fuck_cum'
 		end
 	end
 
@@ -158,6 +175,7 @@ end
 
 if $ARGS[0] = 'miss1.1':
 	cla & *clr
+	booty_call['miss_fuck'] = 1
 	$booty_call['pos_speed'] = 'miss1'
 	booty_call['kiss'] = 0
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -170,6 +188,7 @@ if $ARGS[0] = 'miss1.1':
 end
 
 if $ARGS[0] = 'miss1.2':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'miss1'
 	booty_call['kiss'] = 0
@@ -230,6 +249,7 @@ end
 
 if $ARGS[0] = 'miss1.bored':
 	cla & *clr
+	booty_call['miss_fuck'] = 1
 	$booty_call['pos_speed'] = 'miss1'
 	booty_call['kiss'] = 0
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
@@ -243,13 +263,14 @@ end
 
 if $ARGS[0] = 'miss2':
 	!! medium pace
+	booty_call['miss_fuck'] = 1
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['kiss'] = 0
 	$booty_call['position'] = 'miss'
 	$booty_call['pos_speed'] = 'miss2'
 	!! booty_call['missionary_fuck'] tracks if you fuck in this position
 	booty_call['missionary_fuck'] = 1
-!!	if pcs_vag = 0:gt 'booty_call_virgin', 'miss_virg_norm1'
+	if pcs_vag = 0 and booty_call['fuck_count'] = 0:gt 'booty_call_virgin', 'miss_virg_norm1'
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
 	if mesec > 0:
@@ -308,10 +329,12 @@ if $ARGS[0] = 'miss2':
 				'<center><video autoplay loop src="images/shared/sex/vag/miss/slow2.mp4"></video></center>'
 				'"Hey," you say, looking <<$npc_firstname[$boy]>> right in the eyes. "I didn''t come here for you to hump me like a Disney princess. I came here to <b>fuck.</b> Now fuck me like you mean it already!"'
 				*nl
-				if rand(0,1) = 1:
-					'A concentrated look shadows <<$npc_firstname[$boy]>>''s face and quickly starts fucking you with accelerated speed.'
-				else
-					'Before you can even finish your sentence, <<$npc_firstname[$boy]>> grabs you by the hips and rams his cock into you.'
+				if npc_abusive[$boy] = 1 and (npc_knows_pc_likes_rough[$boy] = 0 or booty_call['rough_enjoy'] ! 1):
+					if rand(0,1) = 1:
+						'A concentrated look shadows <<$npc_firstname[$boy]>>''s face and quickly starts fucking you with accelerated speed.'
+					else
+						'Before you can even finish your sentence, <<$npc_firstname[$boy]>> grabs you by the hips and rams his cock into you.'
+					end
 				end
 				act'Continue':gt 'booty_call_miss', 'miss3.1'
 			end
@@ -328,10 +351,10 @@ if $ARGS[0] = 'miss2':
 end
 
 if $ARGS[0] = 'miss2.1':
+	booty_call['miss_fuck'] = 1
 	gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
 	gs 'stat'
 	booty_call['kiss'] = 0
-	$booty_call['pos_speed'] = 'miss2'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/med1.mp4"></video></center>'
 	if $booty_call['pos_speed'] = 'miss1':
@@ -345,6 +368,7 @@ if $ARGS[0] = 'miss2.1':
 end
 
 if $ARGS[0] = 'miss2.2':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'miss2'
 	booty_call['kiss'] = 0
@@ -397,6 +421,7 @@ if $ARGS[0] = 'miss2.2':
 end
 
 if $ARGS[0] = 'miss2.bored':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	$booty_call['pos_speed'] = 'miss2'
 	booty_call['kiss'] = 0
@@ -410,6 +435,7 @@ if $ARGS[0] = 'miss2.bored':
 end
 
 if $ARGS[0] = 'miss3':
+	booty_call['miss_fuck'] = 1
 	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	!! fast/rough pace
 	$booty_call['position'] = 'miss'
@@ -417,7 +443,7 @@ if $ARGS[0] = 'miss3':
 	!! booty_call['missionary_fuck'] tracks if you fuck in this position
 	booty_call['missionary_fuck'] = 1
 	booty_call['kiss'] = 0
-!!	if pcs_vag = 0:gt 'booty_call_virgin', 'miss_virg_norm1'
+	if pcs_vag = 0 and booty_call['fuck_count'] = 0:gt 'booty_call_virgin', 'miss_virg_hard1'
 	gs 'arousal', 'vaginal',1,'no_orgasm_msg', 'rough'
 	gs 'stat'
 	'<center><video autoplay loop src="images/shared/sex/vag/miss/rough1.mp4"></video></center>'
@@ -463,32 +489,61 @@ if $ARGS[0] = 'miss3':
 			end
 			
 			act'It hurts!':
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/1.jpg"></center>'
-				'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly.'
-				'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
-				act'No (enjoy)':
+				if ((npc_selfish[$boy] = 1 and npc_speed_pref[$boy] = 3) or npc_abusive[$boy] = 1) and npc_caretaker[$boy] ! 1:
 					cla & *nl
-					npc_knows_pc_likes_rough[$boy] = 1
-					booty_call['rough_enjoy'] = 1
-					'"No," you smile back at him. "I want you to pound me."'
-					'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
-					act'Continue':gt 'booty_call_miss', 'miss3.1'
-				end
-				
-				act'Yes, gentle please':
-					booty_call['too_rough'] = 1
-					cla & *nl
-					'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
-					act'Continue':gt 'booty_call_miss', 'miss1.1'
-				end
+					'"Oh fuck! It hurts!" you cry.'
+					'"Hurts fucking good doesn''t it?" <<$npc_firstname[$boy]>> grunts back, not even pausing for a single beat.'
+					act'Please slow down!':
+						cla & *nl
+						booty_call['orgasm'] = orgasm
+						$orgasm_or = 'no'
+						booty_call['rough_hurt'] = 1
+						booty_call['boy_cum'] = 2
+						'"Please!" you beg, tears welling up in  your eyes. "Please slow down! I can''t-! Take-!'
+						'But <<$npc_firstname[$boy]>> is heedless of your cries. He keeps a firm hold on your hair and pulls hard with every thrust, forcing unceasing cries of pain from your lips.'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+					
+					act'If you slow down I will kill you':
+						pcs_sweat += 1
+						booty_call['orgasm'] = orgasm
+						booty_call['rough_enjoy'] = 1
+						gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
+						gs 'stat'
+						cla & *nl
+						'You scream another cry of agonizing pleasure and grimace at <<$npc_firstname[$boy]>>.'
+						'"If you slow down I will <i>fucking</i> kill you," you snarl, throwing your hips forward to slam into his for more force.'
+						gs 'booty_call_miss', 'miss3_enjoy_desc'
+						act'Continue':gs 'booty_call_cum', 'fuck_cum'
+					end
+				else
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/1.jpg"></center>'
+					'"Oh fuck! It hurts!" you moan and <<$npc_firstname[$boy]>> stops abruptly.'
+					'"Oh! Sorry. I thought you liked it rough. Do you want me to stop?"'
+					act'No (enjoy)':
+						cla & *nl
+						npc_knows_pc_likes_rough[$boy] = 1
+						booty_call['rough_enjoy'] = 1
+						'"No," you smile back at him. "I want you to pound me."'
+						'In response, <<$npc_firstname[$boy]>> yanks you back by the hair even harder than before, slamming his cock into you to fulfil your request.'
+						act'Continue':gt 'booty_call_miss', 'miss3.1'
+					end
+					
+					act'Yes, gentle please':
+						booty_call['too_rough'] = 1
+						cla & *nl
+						'"Yes please," you say, giving him a small smile. "A little more gently would be very nice..."'
+						act'Continue':gt 'booty_call_miss', 'miss1.1'
+					end
 
-				act'Not <i>too</i> gentle':
-					booty_call['too_rough'] = 1
-					cla & *nl
-					'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
-					'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
-					act'Continue':gt 'booty_call_miss', 'miss2.2'
+					act'Not <i>too</i> gentle':
+						booty_call['too_rough'] = 1
+						cla & *nl
+						'"You don''t have to be <i>too</i> gentle with me," you giggle. "I just don''t want to feel like I''m having sex with Vlad the Impaler here."'
+						'You sigh in relief as he picks up his pace again, this time without leaving you feel like you''re being battered to bits.'
+						act'Continue':gt 'booty_call_miss', 'miss2.2'
+					end
 				end
 			end
 
@@ -523,24 +578,10 @@ if $ARGS[0] = 'miss3':
 			end
 		end
 	end
-	
-	act'If you slow down I will kill you':
-		pcs_sweat += 1
-		booty_call['orgasm'] = orgasm
-		booty_call['rough_enjoy'] = 1
-		gs 'arousal', 'vaginal', rand(4,8),'no_orgasm_msg'
-		gs 'stat'
-		cla & *nl
-		'"Oh <i>fuck!</i>" you scream through the pain, even as you throw your hips forward to slam into his.'
-		'"Want me to slow down?" he huffs.'
-		'"If you slow down I will <i>fucking</i> kill you," you snarl back glaring directly into <<$npc_firstname[$boy]>>''s eyes.'
-		gs 'booty_call_miss', 'miss3_enjoy_desc'
-		gs 'booty_call_cum', 'fuck_cum'
-	end
-	
 end
 
 if $ARGS[0] = 'miss3.1':
+	booty_call['miss_fuck'] = 1
 	pcs_sweat += 1
 	$booty_call['pos_speed'] = 'miss3'
 	booty_call['kiss'] = 0
@@ -581,6 +622,7 @@ if $ARGS[0] = 'miss3.1':
 end
 
 if $ARGS[0] = 'miss3.2':
+	booty_call['miss_fuck'] = 1
 	pcs_sweat += 1
 	$booty_call['pos_speed'] = 'miss3'
 	booty_call['kiss'] = 0
@@ -627,6 +669,7 @@ if $ARGS[0] = 'miss3.2':
 end
 
 if $ARGS[0] = 'miss3.bored':
+	booty_call['miss_fuck'] = 1
 	cla & *clr
 	pcs_sweat += 1
 	$booty_call['pos_speed'] = 'miss3'
@@ -669,22 +712,26 @@ if $ARGS[0] = 'miss_kiss':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/vag/miss/kiss1.mp4"></video></center>'
 		if booty_call['bored'] = 1:
-			if npc_smoker[$boy] > 0:
+			if booty_call['cuni_count'] > 0:
+				'You let <<$npc_firstname[$boy]>>''s lips touch yours and feel his tongue snake through your mouth, accompanied by an additional salty flavour that takes you a moment to realize is the taste of your own pussy. His tongue swirls against yours, sending waves of heat through your hips.'
+			elseif npc_smoker[$boy] > 0:
 				'You let <<$npc_firstname[$boy]>>''s lips touch yours and feel his tongue snake through your mouth. It swirls against yours, sending waves of heat through your hips.'
 			else
-				'You let his <<$npc_firstname[$boy]>>''s touch yours and feel his tongue snake through your mouth. It swirls against yours, tasting vaguely of smoke and tabacco, and sends waves of heat through your hips.'
+				'You let his <<$npc_firstname[$boy]>>''s touch yours and feel his tongue snake through your mouth. It swirls against yours, tasting vaguely of smoke and tobacco, and sends waves of heat through your hips.'
 			end
 			*nl
 			'<i>At least this part feels good,</i> you think to yourself, allowing a small smile to break through.'
 		elseif booty_call['orgasm'] < orgasm:
-			if npc_smoker[$boy] > 0:
-				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. His tongue, tasting vaguely of smoke and tabacco, pushes up against yours, gently complimenting the pleasure of his cock inside you. You close your eyes, letting them roll back in your head, knowing that he''s about to make you come.'
+			if booty_call['cuni_count'] > 0:
+				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. They taste slightly... salty... and you realize with a start that it''s the flavour of your own pussy, being passed back into your mouth. His tongue pushes up against yours, gently complimenting the pleasure of his cock inside you. You close your eyes, letting them roll back in your head, knowing that he''s about to make you come.'
+			elseif npc_smoker[$boy] > 0:
+				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. His tongue, tasting vaguely of smoke and tobacco, pushes up against yours, gently complimenting the pleasure of his cock inside you. You close your eyes, letting them roll back in your head, knowing that he''s about to make you come.'
 			else
 				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. They press softly together and his tongue spreads them apart to push up against yours, gently complimenting the pleasure of his cock inside you. You close your eyes, letting them roll back in your head, knowing that he''s about to make you come.'
 			end
 		else
 			if npc_smoker[$boy] > 0:
-				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. His tongue, tasting vaguely of smoke and tabacco, spreads them apart to push up against yours, gently complimenting the pleasure of his cock inside you.'
+				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. His tongue, tasting vaguely of smoke and tobacco, spreads them apart to push up against yours, gently complimenting the pleasure of his cock inside you.'
 			else
 				'You smile up at <<$npc_firstname[$boy]>> as his lips meet yours. They press softly together and his tongue spreads them apart to push up against yours, compounding the pleasure of his cock inside you. You kiss him back with everything you have, moaning into his mouth as he continues to thrust into you.'
 			end

locations/booty_call_morning.qsrc

@@ -48,7 +48,7 @@ if $ARGS[0] = 'morning':
 		if pcs_lovers - pcs_girlfriends > 0:act'Your boyfriend':$booty_call['cheat'] = 'boyfriend' & gt'booty_call_morning', 'guilt1'
 		if pcs_girlfriends > 0:act'Your girlfriend': $booty_call['cheat'] = 'girlfriend' & gt'booty_call_morning', 'guilt1'
 		
-		if pilldaychk < daystart - 1: gs'booty_call_morning', 'forgot_bc_pill'
+		if pilldaychk < daystart - 1 and birth_control['using_bc'] = 1: gs'booty_call_morning', 'forgot_bc_pill'
 	end
 end
 
@@ -248,7 +248,7 @@ if $ARGS[0] = 'late_for_school':
 			cla & *nl
 			'"I''m gonna be late for something!" you say hurriedly. "Gotta go!"'
 			'With one last quick check, you make sure all your clothes are in place and rush out the door, leaving <<$npc_firstname[$boy]>> and your night together behind you.'
-			act'Leave':gs'booty_call_after', 'exit'
+			act'Leave':gs'booty_call_leave', 'exit'
 		end
 
 		act'I''m gonna be late for school!':
@@ -267,7 +267,7 @@ if $ARGS[0] = 'late_for_school':
 					'"No, I''ll be okay. Thanks for the offer though." '
 					*nl
 					'With one last quick check, you make sure all your clothes are in place and call, "See you later!" over your shoulder as you rush out the door.'
-					act'Leave':gs'booty_call_after', 'exit'
+					act'Leave':gs'booty_call_leave', 'exit'
 				end
 
 				act'That''d be great':
@@ -288,7 +288,7 @@ if $ARGS[0] = 'late_for_school':
 						'"That''s okay," you shake your head. "It''s right here in the residential area. I can just walk.Thanks for the offer though."'
 						*nl
 						'With one last quick check, you make sure all your clothes are in place and call, "See you later!" over your shoulder as you rush out the door.'
-						act'Leave':gs'booty_call_after', 'exit'
+						act'Leave':gs'booty_call_leave', 'exit'
 					end
 				end
 
@@ -298,11 +298,11 @@ if $ARGS[0] = 'late_for_school':
 					'You hesitate for a moment, considering it.'
 					*nl
 					'"No," you shake your head. "I don''t want someone seeing me get out of your car. Rumors spread like fire at my school. I can''t risk it." With one last quick check, you make sure all your clothes are in place, you shout, "See you later!" over your shoulder and rush out the door.'
-					act'Leave':gs'booty_call_after', 'exit'
+					act'Leave':gs'booty_call_leave', 'exit'
 				end
 			else
 				'With one last quick check, you make sure all your clothes are in place and grab the rest of your things. "See you later!" you call over your shoulder as you rush out the door.'
-				act'Leave':gs'booty_call_after', 'exit'
+				act'Leave':gs'booty_call_leave', 'exit'
 			end
 		end
 	end
@@ -354,124 +354,124 @@ end
 if $ARGS[0] = 'kiss_wake':
 	cla & *clr
 	gs'arousal', 'kiss', 1, 'no_orgasm_msg'
+	booty_call['boy_asleep'] = 0
 	npc_rel[$boy] += 1
 	'<center><img <<$set_imgh>> src="images/shared/sex/kiss/bed1.jpg"></center>'
-	'You roll over onto <<$npc_firstname[$boy]>>, letting your breasts rest on his chest as you straddle him and plant a kiss on his lips.'
-	'"Good <i>-mmmph-</i> morning," you murmur between kisses.'
-	'"Morning," he smiles back.'
-	gs'booty_call_morning', 'wakeup1'
-	act'Give <<$npc_firstname[$boy]>> a blowjob':
-		gs'arousal', 'bj', 1, 'no_orgasm_msg'
-		cla & *clr
-		'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
-		'You break the kiss from <<$npc_firstname[$boy]>>''s lips and start trailing them down his neck and then his chest and then his stomach and soon you have your lips wrapped around his already stiff member.'
-		if npc_end_free_time <= hour + 2:
-			booty_call['npc_late_work'] = 1
-			'"Nngh," he grunts as you start sucking his cock. "I''m gonna be late for work..."'
-			act'Too bad (stop)':
-				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
-				'You give <<$npc_firstname[$boy]>> one more good suck before you withdraw your lips.'
-				'"Too bad then," you smirk, teasing his cock with your hand while you savour his taste. "Guess it''ll have to wait until later."'
-				gs'booty_call_morning', 'wakeup1'
-			end
-			
-			act'I''ll be fast':
-				booty_call['morning_fuck'] = 1
-				booty_call['extra_cum'] += npc_sexdrive[$boy]
-				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
-				'You give <<$npc_firstname[$boy]>> one more good suck before you withdraw your lips to speak.'
-				'"Don''t worry," you say, working his cock with your hand as a smirk spreads across your lips. "I''ll be fast."'
-				'And you wrap your lips back around his shaft.'
-				act'Continue':gt'booty_call_start', 'bj_dom2'
-			end
-		else
-			'"Nngh," he grunts as you give his tip a slurpy suck. "That feels great..."'
-			act'Keep blowing him':
+	'You roll over onto <<$npc_firstname[$boy]>>, letting your breasts rest on his chest as you straddle him.'
+	'"Good <i>-mmmph-</i> morning," you murmur, planting a kiss on his lips.'
+	if cum_loc['face'] > 0:
+		'"Ugch~! What the fuck is that?" he sputters, shaking his head in disgust.'
+		act'Didn''t wash my face':
+			cla & *nl
+			'"It''s your cum," you smirk wryly. "Didn''t get to wash it off after you cumshot me last night."'
+			'"Couldn''t you have washed it off before you kissed me?"'
+			gs'booty_call_morning', 'wakeup1'
+			act'Give <<$npc_firstname[$boy]>> a blowjob':
+				gs'arousal', 'bj', 1, 'no_orgasm_msg'
 				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
-				booty_call['morning_fuck'] = 1
-				booty_call['extra_cum'] += npc_sexdrive[$boy]
-				'"Good," you say, letting his cock pop from your mouth as a smirk spreads across your face. And then you wrap your lips back around his shaft.'
-				act'Continue':gt'booty_call_start', 'bj_dom2'
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+				'"Let me make it up to you," you smile, throwing back the covers and wrapping your lips around his already stiff cock.'
+				gs'booty_call_morning', 'bj_wake'
 			end
-			
-			act'Fuck him':
+		end
+		
+		act'His fault':
+			cla & *nl
+			'"It''s your fault," you smirk wryly. "You''re the one who plastered my face last night."'
+			'"Couldn''t you have washed it off before you kissed me?"'
+			gs'booty_call_morning', 'wakeup1'
+			act'Give <<$npc_firstname[$boy]>> a blowjob':
+				gs'arousal', 'bj', 1, 'no_orgasm_msg'
 				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
-				booty_call['morning_fuck'] = 1
-				booty_call['extra_cum'] += npc_sexdrive[$boy]
-				'"Bet I can make you feel even better," you say, letting his cock pop from your mouth as a smirk spreads across your face and you climb on top to straddle him.'
-				act'Ride him gently':gt 'booty_call_cowgirl', 'cowgirl1'
-				act'Ride him steadily':gt 'booty_call_cowgirl', 'cowgirl2'
-				act'Ride him hard':gt 'booty_call_cowgirl', 'cowgirl3'
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+				'"Let me make it up to you," you smile, throwing back the covers and wrapping your lips around his already stiff cock.'
+				gs'booty_call_morning', 'bj_wake'
 			end
 		end
+	else
+		'"Morning," he smiles back.'
+		gs'booty_call_morning', 'wakeup1'
+		act'Give <<$npc_firstname[$boy]>> a blowjob':
+			gs'arousal', 'bj', 1, 'no_orgasm_msg'
+			cla & *clr
+			'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+			'You break the kiss from <<$npc_firstname[$boy]>>''s lips and start trailing them down his neck and then his chest and then his stomach and soon you have your lips wrapped around his already stiff member.'
+			gs'booty_call_morning', 'bj_wake'
+		end
 	end
 end
 
+
 if $ARGS[0] = 'bj_wake':
 	booty_call['boy_asleep'] = 0
 	gs'arousal', 'bj', 1, 'no_orgasm_msg'
-	cla & *clr
-	'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
-	'You slither under the covers and wrap your lips around <<$npc_firstname[$boy]>>''s already hard cock.'
-	if $npc_fav_pos[$boy] = 'blowjob' or rand(1,10) < npc_sexdrive[$boy]:
-		'"Nngh... that feels great..." he moans sleepily.'
-		act'Stop':
-			npc_rel[$boy] -= 3
+	if npc_end_free_time <= hour + 2:
+		booty_call['npc_late_work'] = 1
+		'"Nngh," he grunts as you start sucking his cock. "I''m gonna be late for work..."'
+		act'Too bad (stop)':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
-			'You pull away, working his cock with your hand.'
-			'"Just getting you up on time," you grin, letting go with one more teasing jerk.'
-			'"Ungh, you bitch," he grumbles.'
-			gs 'booty_call_morning', 'wakeup1'
+			'You give <<$npc_firstname[$boy]>> one more good suck before you withdraw your lips.'
+			'"Too bad," you smirk, teasing his cock with your hand while you savour his taste. "Guess it''ll have to wait until later."'
+			gs'booty_call_morning', 'wakeup1'
 		end
 		
-		act'Want me to keep going?':
+		act'I''ll be fast':
+			booty_call['morning_fuck'] = 1
+			booty_call['extra_cum'] += npc_sexdrive[$boy]
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
-			'"Want me to keep going?" you ask pulling your lips away with a teasing pop.'
-			'"Fuck yes," he groans and you get back to work.'
-			act'Continue':gt'booty_call_start', 'bj_dom2'
-		end
-		
-		act'Keep sucking':
-			cla & *nl
-			'"Mmmm," you hum around the cock in your mouth, sending shivers through his body that you can feel between your lips. You never stop sucking.'
+			'You give <<$npc_firstname[$boy]>> one more good suck before you withdraw your lips to speak.'
+			'"Don''t worry," you say, working his cock with your hand as a smirk spreads across your lips. "I''ll be fast."'
+			'And you wrap your lips back around his shaft.'
 			act'Continue':gt'booty_call_start', 'bj_dom2'
 		end
 	else
-		'"Nngh... Hey... what are you doing...?" he groans sleepily.'
 		act'Stop':
 			npc_rel[$boy] -= 3
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
 			'You pull away, working his cock with your hand.'
-			'"Just getting you up on time," you grin, letting go with one more teasing jerk.'
-			'"Ungh, you bitch," he grumbles.'
+			'"Just making sure you''re fully awake," you grin, letting go with one more teasing jerk.'
+			'"Ungh, you teasing bitch," he grumbles.'
 			gs 'booty_call_morning', 'wakeup1'
 		end
-		
-		act'Best wakeup in the world':
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
-			'"Just giving you the best wakeup call in the world," you grin pulling your lips away with a teasing pop. "Want me to stop?"'
-			'"Fuck no," he groans and you get back to work.'
-			act'Continue':gt'booty_call_start', 'bj_dom2'
-		end
-		
-		act'Guess':
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+		if $npc_fav_pos[$boy] = 'blowjob' or rand(1,10) < npc_sexdrive[$boy] or booty_call['boy_asleep'] = 0:
+			'"Nngh... that feels great..." he moans sleepily.'
+			act'Want me to keep going?':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+				'"Want me to keep going?" you ask pulling your lips away with a teasing pop.'
+				'"Fuck yes," he groans and you get back to work.'
+				act'Continue':gt'booty_call_start', 'bj_dom2'
+			end
+			
+			act'Keep sucking':
+				cla & *nl
+				'"Mmmm," you hum around the cock in your mouth, sending shivers through his body that you can feel between your lips. You never stop sucking.'
+				act'Continue':gt'booty_call_start', 'bj_dom2'
+			end
+		else
 			'"Nngh... Hey... what are you doing...?" he groans sleepily.'
-			'You pull your lips away with a pop and stare <<$npc_firstname[$boy]>> straight in the eye.'
-			*nl
-			'"Guess."'
-			*nl
-			'Without waiting for a response you start running your tongue up and down his shaft and peppering it with kisses before swallowing it whole again.'
-			act'Continue':gt'booty_call_start', 'bj_dom2'
+			act'Best wakeup in the world':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj48.mp4"></video></center>'
+				'"Just giving you the best wakeup call in the world," you grin pulling your lips away with a teasing pop. "Want me to stop?"'
+				'"Fuck no," he groans and you get back to work.'
+				act'Continue':gt'booty_call_start', 'bj_dom2'
+			end
+			
+			act'Guess':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
+				'"Nngh... Hey... what are you doing...?" he groans sleepily.'
+				'You pull your lips away with a pop and stare <<$npc_firstname[$boy]>> straight in the eye.'
+				*nl
+				'"Guess."'
+				*nl
+				'Without waiting for a response you start running your tongue up and down his shaft and peppering it with kisses before swallowing it whole again.'
+				act'Continue':gt'booty_call_start', 'bj_dom2'
+			end
 		end
 	end
 end
@@ -517,8 +517,12 @@ if $ARGS[0] = 'wakeup1':
 		
 		act'Let me cook instead':
 			cla & *nl
-			'"Please, allow me," you smile, getting out of bed and making your way to his kitchen. "Least I can do for letting me sleep over is make you breakfast."'
-			
+			if booty_call['get_up'] = 0:
+				'"Please, allow me," you smile, moving to get out of bed. "It''s the least I can do for letting me sleep over."'
+			else
+				'"Please, allow me," you smile. "It''s the least I can do for letting me sleep over."'
+			end
+			act'Make breakfast':gt'booty_call_morning', 'pc_make_breakfast'
 		end
 		
 		if booty_call['morning_fuck'] = 0:
@@ -541,10 +545,10 @@ if $ARGS[0] = 'wakeup1':
 			act'Get dressed':
 				cla & *clr
 				$npc_apt_bedroom[$boy]
-				gs 'shortgs', 'dress'
-				'You get dressed.'
+!!				gs 'shortgs', 'dress'
+!!				'You get dressed.'
 				!!gs'booty_call_morning', 'dressing1'
-				gs'booty_call_after', 'dressing1'
+				gs'booty_call_leave', 'dressing1'
 			end
 		end
 
@@ -635,8 +639,13 @@ if $ARGS[0] = 'wakeup1':
 			end
 		end
 		
-		if booty_call['boy_asleep'] = 1:
-			act'Wake <<$npc_firstname[$boy]>> with a blowjob':gt'booty_call_morning', 'bj_wake'
+		if booty_call['boy_asleep'] = 1 and booty_call['breakfast_eat'] = 0:
+			act'Wake <<$npc_firstname[$boy]>> with a blowjob':
+				cla & *clr
+				'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
+				'You slither under the covers and wrap your lips around <<$npc_firstname[$boy]>>''s already hard cock.'
+				gs'booty_call_morning', 'bj_wake'
+			end
 		end
 	!!	act'Snuggle back into bed':
 	end
@@ -668,6 +677,7 @@ if $ARGS[0] = 'shower2':
 	minut += 10
 	shampoo += 1
 	dynamic $showerdin
+	gs'stat'
 	'You twist the faucet and hot water comes rushing out, pouring over you, soaking into your skin. Slowly over time, your sleepiness washes away and clarity comes back.'
 	*nl
 	'Feeling sufficiently awake, you turn off the tap and step out of the shower.'
@@ -684,6 +694,7 @@ if $ARGS[0] = '2nd_shower':
 		minut += 5
 		shampoo += 1
 		dynamic $showerdin
+		gs'stat'
 		'You get into <<$npc_firstname[$boy]>>''s shower for the <i>second</i> time this morning, washing the sex sweat from your body.'
 		*nl
 		'You take a shorter one this time, mostly just rinsing off, before shutting the water off and getting out.'
@@ -713,13 +724,13 @@ end
 if $ARGS[0] = 'head_out':
 	if $clothingworntype = 'nude':
 		!! gt'booty_call_morning', 'dressing1'
-		gt'booty_call_after', 'dressing1'
+		gt'booty_call_leave', 'dressing1'
 	else
 		if npc_latesleeper[$boy] = 1 and booty_call['boy_wakeup'] = 0:
 			'Not wanting to wake <<$npc_firstname[$boy]>>, you sneak over to the door and let yourself out, closing it as gently as you can behind you.'
-			act'Leave':gt'booty_call_after', 'exit'
+			act'Leave':gt'booty_call_leave', 'exit'
 		else
-			gs'booty_call_after', 'leaving_dialogue'
+			gs'booty_call_leave', 'leaving_dialogue'
 		end
 	end
 end
@@ -784,7 +795,7 @@ if $ARGS[0] = 'dressing1':
 		'You reach down for your discarded clothes and tug them on quietly, not wanting to wake <<$npc_firstname[$boy]>>.'
 		*nl
 		'Once everything is in place, you sneak over to the door and let yourself out, closing it as gently as you can behind you.'
-		act'Leave':gt'booty_call_after', 'exit'
+		act'Leave':gt'booty_call_leave', 'exit'
 	else
 		'You reach down for where you left your clothes and start to pick them up.'
 		'"You heading out?" <<$npc_firstname[$boy]>> asks.'
@@ -895,176 +906,13 @@ if $ARGS[0] = 'end_morning':
 		$npc_apt_bedroom[$boy]
 		'You finish <<$booty_call[''dress_describe'']>>.'
 		if booty_call['sleepover'] = 1 and npc_latesleeper[$boy] = 1 and booty_call['boy_asleep'] ! 0:
-			gs'booty_call_morning', 'sneak_out1'
+			gs'booty_call_leave', 'sneak_out1'
 		else
-			gs'booty_call_after', 'leaving_dialogue'
-		end
-	end
-end
-
-
-if $ARGS[0] = 'sneak_out1':
-	act'Sneak out': gt'booty_call_after', 'sneak_out2'
-	act'Leave a note':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you find a piece of paper and a pen and scribble out a quick message.'
-		gs'booty_call_morning', 'sneak_out_note1'
-	end
-	if $pantyworntype ! 'none':
-		act'Leave your panties':
-			npc_panty_give[$boy] += 1
-			gs 'panties', 'dispose'
-			cla & *clr
-			$npc_apt_hall[$boy]
-			if CloSkirtShortness > 0:
-				'Suddenly feeling naughty, you quickly slip your panties down your legs, leaving your pussy bare underneath your skirt. You loop your warm underwear around the handle of <<$npc_firstname[$boy]>>''s bedroom door and then quietly sneak out of his apartment, leaving only your gift behind.'
-			else
-				'Suddenly feeling naughty, you pull down your trousers down and spend a minute untangling your legs before pulling your bottoms back up back up, sans panties. You loop your warm underwear around the handle of <<$npc_firstname[$boy]>>''s bedroom door and then quietly sneak out of his apartment, leaving only your gift behind.'
-			end
-			act'Leave':gt'booty_call_after', 'exit'
-		end
-		
-		act'Leave your a note on your panties':
-			booty_call['panty_note'] = 1
-			npc_panty_give[$boy] += 1
-			gs 'panties', 'dispose'
-			cla & *clr
-			$npc_apt_hall[$boy]
-			if CloSkirtShortness > 0:
-				'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you start to look for a piece of paper when a naughty thought runs through your mind. Unable to resist the thought, you quickly slip your panties down from underneath your skirt and then rummage for a big marker.'
-			else
-				'Not wanting to leave without saying goodbye but not wanting to wake <<$npc_firstname[$boy]>> either, you start to look for a piece of paper when a naughty thought runs through your mind. Unable to resist the thought, you quickly pull down your trousers down and spend a minute untangling your legs before pulling your bottoms back up, sans panties. Then you rummage for a big marker.'
-			end
-			*nl
-			'You pop the cap with a grin and start scribbling.'
-			gs'booty_call_morning', 'sneak_out_note1'
-		end
-
-	end
-end
-
-if $ARGS[0] = 'sneak_out_note1':
-	act'Thanks for letting me stay over':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		$booty_call['note_desc1'] = '<i>Thanks for letting me spend the night.</i>'
-		$booty_call['note_desc1']
-		gs'booty_call_morning', 'sneak_out_note2'
-	end
-	
-	act'I had a good time':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		$booty_call['note_desc1'] = '<i>I had a good time last night.</i>'
-		$booty_call['note_desc1']
-		gs'booty_call_morning', 'sneak_out_note2'
-	end
-	
-	if booty_call['fuck_count'] > 0:
-		act'Thanks for the fuck':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			$booty_call['note_desc1'] = '<i>Thanks for the fuck.</i>'
-			$booty_call['note_desc1']
-			gs'booty_call_morning', 'sneak_out_note2'
-		end
-	end
-	
-end
-
-if $ARGS[0] = 'sneak_out_note2':
-	act'It was fun':
-		$booty_call['note_desc2'] = '<i>It was fun.</i>'
-		gs'booty_call_morning', 'sneak_out_note3'
-	end
-
-	act'See ya':
-		$booty_call['note_desc2'] = '<i>See ya later.</i>'
-		gs'booty_call_morning', 'sneak_out_note3'
-	end
-	
-	act'Text me':
-		$booty_call['note_desc2'] = '<i>Don''t forget to text me.</i>'
-		gs'booty_call_morning', 'sneak_out_note3'
-	end
-	
-	act'Till next time':
-		$booty_call['note_desc2'] = '<i>Until next time.</i>'
-		gs'booty_call_morning', 'sneak_out_note3'
-	end
-end
-
-if $ARGS[0] = 'sneak_out_note3':
-	cla & *clr
-	$npc_apt_hall[$boy]
-	'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>>'
-	'You sign it with...'
-	act'Just your name':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> - <<$pcs_nickname>>'
-		gs'booty_call_morning', 'sneak_out_note_end'
-	end
-	
-	act'A smiley face':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> <b><i>:)</i></b>'
-		*nl
-		'You leave a little face, unable to keep yourself from smiling as you dot two little eyes over the mouth.'
-		gs'booty_call_morning', 'sneak_out_note_end'
-	end
-	
-	act'A winky face':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> <b><i>;)</i></b>'
-		*nl
-		'You leave a little face, unable to keep yourself from smiling as you dot little winky eyes over the mouth.'
-		gs'booty_call_morning', 'sneak_out_note_end'
-	end
-	
-	act'A heart':
-		cla & *clr
-		$npc_apt_hall[$boy]
-		'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>> <b><i><3</i></b>'
-		*nl
-		'You punctuate the note with a tiny little heart, feeling warmth in your chest as you do.'
-		gs'booty_call_morning', 'sneak_out_note_end'
-	end
-	
-	if pcs_makeup > 2:
-		act'A kiss':
-			cla & *clr
-			$npc_apt_hall[$boy]
-			'<<$booty_call[''note_desc1'']>> <<$booty_call[''note_desc2'']>>'
-			*nl
-			if booty_call['panty_note'] = 1:
-				'You run your tongue over your lips and press them together a moment before planting a big sloppy wet smooch on your own underwear. As you pull back, your lipstick leaves a large kiss on the soft fabric. Good thing you did your makeup before you left.'
-			else
-				'You run your tongue over your lips and press them together a moment before planting a big sloppy wet smooch on the page. As you pull back, your lipstick leaves large kiss on the soft fabric. Good thing you did your makeup before you left.'
-			end
-			gs'booty_call_morning', 'sneak_out_note_end'
+			gs'booty_call_leave', 'dressing1'
 		end
 	end
 end
 
-if $ARGS[0] = 'sneak_out_note_end':
-	*nl
-	if booty_call['panty_note'] = 1:
-		'Satisfied, you leave your panties on the counter and quietly slip out the door, wondering what <<$npc_firstname[$boy]>> will think when he discovers them.'
-	else
-		'Satisfied, you leave your note on the counter and quietly slip out the door, letting it click shut behind you.'
-	end
-	act'Leave':gt'booty_call_after', 'exit'
-end
-
-if $ARGS[0] = 'sneak_out2':
-	$npc_apt_hall[$boy]
-	'You tip toe your way to the door, turning the handle as gently as you can so you don''t disturb <<$npc_firstname[$boy]>>, closing it with a soft click behind you.'
-	act'Leave':gt'booty_call_after', 'exit'
-end
 
 
 !! ------------------------------------ Morning Sex Stuff -------------------------------------------------------
@@ -1305,7 +1153,16 @@ if $ARGS[0] = 'guilt1':
 			'Your thoughts wander through your night with <<$npc_firstname[$boy]>>...'
 			*nl
 			if booty_call['bj'] > 0:'<i>Sucking his cock...</i>'
-			if booty_call['fuck'] > 0:'<i>Fucking him on his bed...</i>'
+			if booty_call['fuck'] > 0:
+				if booty_call['virgin'] = 1:
+					'<i>You gave him your virginity...</i>'
+				else
+					'<i>Fucking him on his bed...</i>'
+				end
+				if booty_call['no_condom'] = 1:
+					'<i>You didn''t even use condoms...</i>'
+				end
+			end
 			if booty_call['orgasm_count'] > 5:
 				'<i>He made you come so many times...</i>'
 			elseif booty_call['orgasm_count'] > 0:
@@ -1784,7 +1641,7 @@ if $ARGS[0] = 'pc_make_breakfast_cooking':
 	gs 'stat'
 	if booty_call['cooking_total'] = 1:
 		if booty_call['coffee_make'] = 1:
-			'<center><img <<$set_imgh>> src="images/pc/drink/nude_coffee2.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/pc/activities/drinking/nude_coffee2.jpg"></center>'
 			'You put the coffee into the machine and wait, drumming your fingers on the counter until the dark liquid is brewed.'
 		elseif booty_call['toast_make'] = 1:
 			'<center><img <<$set_imgh>> src="images/pc/activities/cooking/nude_misc1.jpg"></center>'
@@ -1819,7 +1676,7 @@ if $ARGS[0] = 'pc_make_breakfast_done':
 			else
 				'"Coffee''s ready," you say, turning around to walk two steaming mugs back to <<$npc_firstname[$boy]>>.'
 			end
-			act'Drink your coffee':gt'booty_call_morning', 'eat_breakfast'
+			act'Drink your coffee':gt'booty_call_morning', 'eat_breakfast1'
 		else
 			if booty_call['boy_asleep'] = 1 and booty_call['wake_fuck'] = 0 and booty_call['morning_fuck'] = 0:
 				'<<$npc_firstname[$boy]>> begins to stir in bed, blearily blinking at you.'
@@ -1866,6 +1723,7 @@ end
 
 if $ARGS[0] = 'eat_breakfast1':
 	booty_call['breakfast_eat'] = 1
+	if booty_call['boy_asleep'] = 1: booty_call['boy_asleep'] = 0
 	npc_rel[$boy] += rand(1,3)
 	act'Eat a small portion':gs'booty_call_morning', 'eat_breakfast2'
 	act'Eat a medium portion':gs'booty_call_morning', 'eat_breakfast3'
@@ -2128,6 +1986,12 @@ end
 !! ---------------------------------- OUTSIDE APARTMENT -------------------------------------------
 
 if $ARGS[0] = 'give_lift':
+	if $region = 'city':
+		minut += 45
+	elseif $region = 'pav':
+		minut += 5
+	end
+	gs'stat'
 	!! add in option later to give road head along the way
 	if booty_call['give_lift'] = 2:
 		!!take to school
@@ -2183,7 +2047,6 @@ if $ARGS[0] = 'give_lift':
 
 		act'Kiss him goodbye (tongue)':
 			cla & *clr
-			gs 'booty_call_after', 'ending'
 			$booty_call['drop_off_image']
 			gs'arousal', 'kiss', -5
 			gs 'booty_call_after', 'ending'

locations/booty_call_pillow_talk.qsrc

@@ -5,7 +5,7 @@ if $ARGS[0] = 'start':
 	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 	booty_call['pillow_talking'] = 1
 	'You and <<$npc_firstname[$boy]>> relax on the bed together, basking in the afterglow as you idly chit chat about things.'
-	if booty_call['virgin'] = 1 and booty_call['virgin_talk'] = 0:
+	if booty_call['virgin'] = 1 and booty_call['virgin_talk'] = 0 and booty_call['fuck_count'] > 0:
 		gs'booty_call_virgin', 'first_time_talk'
 	else
 		gs'booty_call_pillow_talk', 'topics'
@@ -17,6 +17,8 @@ if $ARGS[0] = 'topics':
 !!	if booty_call['angry_after'] = 0:
 		act'Small talk':cla & gs'booty_call_pillow_talk2', 'small_talk'
 		act'Talk about the sex':cla & gs'booty_call_pillow_talk', 'sex_talk'
+		act'Talk about condoms':cla & gs'booty_call_pillow_talk', 'condom_talk'
+		act'Talk about cum':cla & gs'booty_call_pillow_talk', 'cum_talk'
 		act'Play with his cock':cla & gs'booty_call_pillow_talk2', 'dick_talk'
 		if booty_call['creampie_count'] > 0 and npc_free_creampies[$boy] < 1: gs'booty_call_pillow_talk', 'free_creampies'
 		if booty_call['wake_fuck'] = 1 or booty_call['sleep_fuck'] = 1 or booty_call['morning_fuck'] = 1:
@@ -38,15 +40,27 @@ if $ARGS[0] = 'sex_talk':
 	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
 	act'Change the subject':cla & gs'booty_call_pillow_talk', 'topics'
 	gs'booty_call_favorite_part', 'good_for_you'
-	gs'booty_call_pillow_talk', 'better_without'
 	gs'booty_call_pillow_talk', 'kuni_wear_out'
 	gs'booty_call_pillow_talk', 'long_time'
+	gs'booty_call_pillow_talk', 'better_than_boyfriend'
+	
+	if booty_call['sleepover'] = 1:gs'booty_call_talk', 'morning_talk'
+end
+
+if $ARGS[0] = 'condom_talk':
+	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
+	act'Change the subject':cla & gs'booty_call_pillow_talk', 'topics'
 	gs'booty_call_pillow_talk', 'ran_out_of_condoms'
-	gs'booty_call_pillow_talk', 'keep_it_up'
+	gs'booty_call_pillow_talk', 'better_without'
+end
+
+if $ARGS[0] = 'cum_talk':
+	act'Stop talking':cla & gs'booty_call_after', 'after_sex2'
+	act'Change the subject':cla & gs'booty_call_pillow_talk', 'topics'
 	gs'booty_call_pillow_talk', 'so_many_creampies'
 	gs'booty_call_pillow_talk', 'broken_creampie_rule'
 	gs'booty_call_pillow_talk', 'plastered'
-	if booty_call['sleepover'] = 1:gs'booty_call_talk', 'morning_talk'
+	gs'booty_call_pillow_talk', 'thank_no_creampie'
 end
 
 if $ARGS[0] = 'good_for_you':
@@ -79,21 +93,6 @@ if $ARGS[0] = 'good_for_you':
 	end
 end
 
-if $ARGS[0] = 'keep_it_up':
-	if booty_call['cum_count'] >= 5 and booty_call['keep_it_up'] = 0:
-		act'You can really keep it up':
-			gs'booty_call_pillow_talk', 'talk_time_add'
-			cla & *clr
-			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-			booty_call['keep_it_up'] = 1
-			minut += 1
-			'"You can really keep it up, huh?" you say, trying to count how many times he came.'
-			'"Yeah, I guess I have a pretty high sex drive," he smiles back.'
-			gs'booty_call_pillow_talk', 'topics'
-		end
-	end
-end
-
 if $ARGS[0] = 'kuni_wear_out':
 	if booty_call['cuni_orgasm'] >= 5 and booty_call['pussy_psycho_talk'] ! 1:
 		act'You''re a pussyeating psycho':
@@ -117,33 +116,64 @@ end
 
 if $ARGS[0] = 'long_time':
 	if booty_call['long_time_talk'] = 0:
-		if $daystage['desc'] = 'pre_dawn' or $daystage['desc'] = 'dawn':
-			act'We fucked all night':
-				gs'booty_call_pillow_talk', 'talk_time_add'
-				booty_call['long_time_talk'] = 1
-				booty_call['keep_it_up'] = 1
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'"Wow," you pant, looking through the window. "We fucked all night long."'
-				'Sure enough, cracks of purple-orange light glow at the edge of night, the sun is rising.'
-				'"I just can''t stop fucking you," he grins back. "It''s too much fun."'
-				gs'booty_call_pillow_talk', 'sex_talk'
+		act'We were at it a long time':
+			cla
+			if $daystage['desc'] = 'pre_dawn' or $daystage['desc'] = 'dawn' and booty_call['sleepover'] = 0:
+				act'We fucked all night':
+					gs'booty_call_pillow_talk', 'talk_time_add'
+					booty_call['long_time_talk'] = 1
+					booty_call['keep_it_up'] = 1
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'"Wow," you pant, looking through the window. "We fucked all night long."'
+					'Sure enough, cracks of purple-orange light glow at the edge of night, the sun is rising.'
+					'"I just can''t stop fucking you," he grins back. "It''s too much fun."'
+					gs'booty_call_pillow_talk', 'sex_talk'
+				end
+			elseif totminut > booty_call['start_time'] + 120:
+				act'It''s been hours':
+					gs'booty_call_pillow_talk', 'talk_time_add'
+					booty_call['long_time_talk'] = 1
+					booty_call['keep_it_up'] = 1
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					'"Wow," you say, looking over at the clock. "We were at it for a long time. We''ve been going for <<(totminut - booty_call[''start_time'']) / 60>> hours straight!"'
+					'"I just can''t stop fucking you," he grins back. "It''s too much fun."'
+					gs'booty_call_pillow_talk', 'sex_talk'
+				end
 			end
-		elseif totminut > booty_call['start_time'] + 120:
-			act'We were at it a long time':
-				gs'booty_call_pillow_talk', 'talk_time_add'
-				booty_call['long_time_talk'] = 1
-				booty_call['keep_it_up'] = 1
-				cla & *clr
-				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-				'"Wow," you say, looking over at the clock. "We were at it for a long time."'
-				'"I just can''t stop fucking you," he grins back. "It''s too much fun."'
-				gs'booty_call_pillow_talk', 'sex_talk'
+			if booty_call['cum_count'] >= 5 and booty_call['keep_it_up'] = 0:
+				act'You can really keep it up':
+					gs'booty_call_pillow_talk', 'talk_time_add'
+					cla & *clr
+					'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+					booty_call['keep_it_up'] = 1
+					minut += 1
+					'"You can really keep it up, huh?" you say, trying to count how many times he came.'
+					'"Yeah, I guess I have a pretty high sex drive," he smiles back.'
+					gs'booty_call_pillow_talk', 'topics'
+				end
 			end
 		end
 	end
 end
 
+if $ARGS[0] = 'better_than_boyfriend':
+	if pcs_lovers - pcs_girlfriends > 0 and booty_call['better_than_lover_talk'] = 0 and booty_call['virgin'] = 0:
+		act'You''re better than my boyfriend':
+			booty_call['better_than_lover_talk'] = 1
+			npc_know_have_boyfriend[$boy] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk2.jpg"></center>'
+			'"You''re even better than my boyfriend," you tell <<$npc_firstname[$boy]>> with a satisfied smile.'
+			gs'booty_call_pillow_talk', 'sex_talk'
+		end
+	end
+end
+
+
+!! ----------------------- CONDOM TALK ---------------------------------------
+
 if $ARGS[0] = 'ran_out_of_condoms':
 	if booty_call['out_of_condoms'] >= 1 and booty_call['used_condoms_talk'] = 0 and (booty_call['condoms_used'] + booty_call['pc_condoms_used'] >= 5):
 		act'Can''t believe we ran out of condoms':
@@ -305,14 +335,14 @@ if $ARGS[0] = 'condom_buy_fight2':
 					cla & *clr
 					$npc_apt_bedroom
 					'Throwing your clothes on as fast as you can, you stomp to the door, shouting, "ASSHOLE!" as you slam it behind you.'
-					act'Leave':gt'booty_call_after', 'exit'
+					act'Leave':gt'booty_call_leave', 'exit'
 				end
 				
 				act'Bastard!':
 					cla & *clr
 					$npc_apt_bedroom
 					'Throwing your clothes on as fast as you can, you stomp to the door, shouting, "BASTARD!" as you slam it behind you.'
-					act'Leave':gt'booty_call_after', 'exit'
+					act'Leave':gt'booty_call_leave', 'exit'
 				end
 				
 				act'You''re such a-!':
@@ -321,7 +351,7 @@ if $ARGS[0] = 'condom_buy_fight2':
 					'You sputter in anger, unable to form coherrent sentences as you throw your clothes on as fast as you can.'
 					*nl
 					'"You''re such a-! I can''t believ-! You know wh-! UGH! FUCK YOU!" you shout, slamming the door behind you.'
-					act'Leave':gt'booty_call_after', 'exit'
+					act'Leave':gt'booty_call_leave', 'exit'
 				end
 			end
 		else
@@ -444,102 +474,106 @@ if $ARGS[0] = 'better_without':
 						gs'booty_call_pillow_talk', 'topics'
 					end
 
-					if booty_call['condom'] >= 2:
-						act'Thanks for coming outside':
-							cla
-							if npc_dont_like_creampie[$boy] = 1:
-								'"Thanks for coming outside," you smile.'
-							else
-								'"Thanks for not coming inside me," you murmur.'
-								if booty_call['promise_no_creampie'] = 1:
-									'"Hey, I promised didn''t I?"'
-									'"I know. But some guys don''t listen. I appreciate that you actually followed through."'
-									gs'booty_call_pillow_talk', 'topics'
-								else
-									'"No problem. Though you didn''t ask me to. Would it have been a problem if I had?"'
-									act'No but thanks anyways':
+					gs'booty_call_pillow_talk', 'thank_no_creampie'
+				end
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'thank_no_creampie':
+	if booty_call['no_condom'] = 1 and booty_call['creampie_count'] = 0:
+		act'Thanks for coming outside':
+			cla
+			if npc_dont_like_creampie[$boy] = 1:
+				'"Thanks for coming outside," you smile.'
+			else
+				'"Thanks for not coming inside me," you murmur.'
+				if booty_call['promise_no_creampie'] = 1:
+					'"Hey, I promised didn''t I?"'
+					'"I know. But some guys don''t listen. I appreciate that you actually followed through."'
+					gs'booty_call_pillow_talk', 'topics'
+				else
+					'"No problem. Though you didn''t ask me to. Would it have been a problem if I had?"'
+					act'No but thanks anyways':
+						cla & *nl
+						'"No," you shake your head. "But thanks anyways. I thought it was considerate."'
+						'You lean over, giving him a peck on the cheek.'
+						gs'booty_call_pillow_talk', 'topics'
+					end
+
+					act'Too intimate':
+						cla & *nl
+						know_intimate_creampies[$boy] = 1
+						'"Too intimate for me," you grimace. "I have to really trust a guy before I let them do something like that, you know?"'
+						'"You should say something next time then."'
+						'"Probably," you say with an embarrassed smile. "I didn''t want to ruin the mood..."'
+						gs'booty_call_pillow_talk', 'topics'
+					end
+					if tabletkishot > 0 or birth_control['think_safe'] = 1:
+						act'I just like being extra safe':
+							cla & *nl
+							'"No," you shake your head. "I''m on birth control so it probably would''ve been fine. I just like being extra safe."'
+							gs'booty_call_pillow_talk', 'topics'
+						end
+
+						act'I don''t like creampies':
+							npc_dont_like_creampie[$boy] = 1
+							cla & *nl
+							'"It wouldn''t have been a ''problem''. I''m on birth control. I just don''t like getting creampied," you grimace. "It feels weird."'
+							gs'booty_call_pillow_talk', 'topics'
+						end
+					else
+						act'I don''t like creampies':
+							cla & *nl
+							'"I don''t like getting creampied," you grimace. "It feels weird."'
+							gs'booty_call_pillow_talk', 'topics'
+						end
+						if pillcon2 > 0 and birth_control['think_safe'] ! 1:
+							act'Birth control hasn''t kicked in':
+								npc_know_start_bc[$boy] = 1
+								cla & *nl
+								'"I just started the pill," you say. "But it hasn''t kicked in yet."'
+								if $npc_cum_pref[$boy] = 'creampie':
+									'"Tell me when it does," he says. "I can''t wait to pump you full of cum."'
+									
+									act'We''ll see':
 										cla & *nl
-										'"No," you shake your head. "But thanks anyways. I thought it was considerate."'
-										'You lean over, giving him a peck on the cheek.'
+										'"We''ll see," you smirk.'
 										gs'booty_call_pillow_talk', 'topics'
 									end
-
-									act'Too intimate':
+									
+									act'Me too':
 										cla & *nl
-										know_intimate_creampies[$boy] = 1
-										'"Too intimate for me," you grimace. "I have to really trust a guy before I let them do something like that, you know?"'
-										'"You should say something next time then."'
-										'"Probably," you say with an embarrassed smile. "I didn''t want to ruin the mood..."'
+										'"Me too," you grin back. "I want to feel my pussy overflowing with you."'
 										gs'booty_call_pillow_talk', 'topics'
 									end
-									if tabletkishot > 0 or birth_control['think_safe'] = 1:
-										act'I just like being extra safe':
-											cla & *nl
-											'"No," you shake your head. "I''m on birth control so it probably would''ve been fine. I just like being extra safe."'
-											gs'booty_call_pillow_talk', 'topics'
-										end
-
-										act'I don''t like creampies':
-											npc_dont_like_creampie[$boy] = 1
-											cla & *nl
-											'"It wouldn''t have been a ''problem''. I''m on birth control. I just don''t like getting creampied," you grimace. "It feels weird."'
-											gs'booty_call_pillow_talk', 'topics'
-										end
-									else
-										act'I don''t like creampies':
-											cla & *nl
-											'"I don''t like getting creampied," you grimace. "It feels weird."'
-											gs'booty_call_pillow_talk', 'topics'
-										end
-										if pillcon2 > 0 and birth_control['think_safe'] ! 1:
-											act'Birth control hasn''t kicked in':
-												npc_know_start_bc[$boy] = 1
-												cla & *nl
-												'"I just started the pill," you say. "But it hasn''t kicked in yet."'
-												if $npc_cum_pref[$boy] = 'creampie':
-													'"Tell me when it does," he says. "I can''t wait to pump you full of cum."'
-													
-													act'We''ll see':
-														cla & *nl
-														'"We''ll see," you smirk.'
-														gs'booty_call_pillow_talk', 'topics'
-													end
-													
-													act'Me too':
-														cla & *nl
-														'"Me too," you grin back. "I want to feel my pussy overflowing with you."'
-														gs'booty_call_pillow_talk', 'topics'
-													end
-													
-													act'Patience':
-														cla & *nl
-														'"You''ll just have to be patient," you smirk.'
-														gs'booty_call_pillow_talk', 'topics'
-													end
-													
-													act'Gulp':
-														cla & *nl
-														'Suddenly, your throat goes dry and wetness spreads between your thighs simultaneously. The thought of his sperm filling you to the brim and overflowing from your snatch suddenly has you feeling...'
-														*nl
-														'You gulp hard, shivering as you try to suppress the arousal washing over your body.'
-														gs'booty_call_pillow_talk', 'topics'
-													end
-												else
-													gs'booty_call_pillow_talk', 'topics'
-												end
-											end
-										else
-											act'I''m not on birth control':
-												gs'booty_call_stats', 'no_birth_control_know'
-												cla & *nl
-												'"I''m not on birth control," you grimace. "Really, I shouldn''t have even taken the chance. Or I should have said something. But it turned out okay. So thanks."'
-												'You smile warmly at him.'
-												gs'booty_call_pillow_talk', 'topics'
-											end
-										end
+									
+									act'Patience':
+										cla & *nl
+										'"You''ll just have to be patient," you smirk.'
+										gs'booty_call_pillow_talk', 'topics'
+									end
+									
+									act'Gulp':
+										cla & *nl
+										'Suddenly, your throat goes dry and wetness spreads between your thighs simultaneously. The thought of his sperm filling you to the brim and overflowing from your snatch suddenly has you feeling...'
+										*nl
+										'You gulp hard, shivering as you try to suppress the arousal washing over your body.'
+										gs'booty_call_pillow_talk', 'topics'
 									end
+								else
+									gs'booty_call_pillow_talk', 'topics'
 								end
 							end
+						else
+							act'I''m not on birth control':
+								gs'booty_call_stats', 'no_birth_control_know'
+								cla & *nl
+								'"I''m not on birth control," you grimace. "Really, I shouldn''t have even taken the chance. Or I should have said something. But it turned out okay. So thanks."'
+								'You smile warmly at him.'
+								gs'booty_call_pillow_talk', 'topics'
+							end
 						end
 					end
 				end
@@ -548,6 +582,24 @@ if $ARGS[0] = 'better_without':
 	end
 end
 
+if $ARGS[0] = 'wish_no_condoms':
+	if booty_call['no_condom'] ! 1 and booty_call['wish_no_condoms_talk'] = 0 and booty_call['fuck_count'] > 0:
+		act'Wish we didn''t need condoms':
+			booty_call['wish_no_condoms_talk'] = 1
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+			'"I wish we didn''t need to use condoms," you sigh disappointedly.'
+			if npc_condom_conscious[$boy] > 0:
+				'"Safety is important," <<$npc_firstname[$boy]>> says sternly. "We don''t want to be taking chances do we?"'
+			elseif booty_call['pc_wants_condoms'] = 1:
+			
+			else
+			
+			end
+		end
+	end
+end
+
 if $ARGS[0] = 'creampie_okay':
 	booty_call['creampie_okay'] = 1
 	act'I''ll be fine':
@@ -647,9 +699,9 @@ if $ARGS[0] = 'plastered':
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 				if cum_loc['vagina'] > 0:
 					if cum_loc['hair'] > 0:
-						'"Fucking shit!" you scowl, taking note of all the different places cum is coating or leaking from your body. "Did you have to get it everywhere? You completely plastered me! It''s even in my fucking hair! Do you have any idea how much of a pain this is going to be to clean off?"'
+						'"Ugh, fuck!" you scowl, taking note of all the different places cum is coating or leaking from your body. "Did you have to get it everywhere? You completely plastered me! It''s even in my fucking hair! Do you have any idea how much of a pain this is going to be to clean off?"'
 					else
-						'"Fucking shit!" you scowl, taking note of all the different places cum is coating or leaking from your body. "Did you have to get it everywhere? You completely plastered me! Do you have any idea how much of a pain this is going to be to clean off?"'
+						'"Ugh, fuck!" you scowl, taking note of all the different places cum is coating or leaking from your body. "Did you have to get it everywhere? You completely plastered me! Do you have any idea how much of a pain this is going to be to clean off?"'
 					end
 				else
 					if cum_loc['hair'] > 0:
@@ -677,15 +729,15 @@ if $ARGS[0] = 'plastered':
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 				if cum_loc['vagina'] > 0:
 					if cum_loc['hair'] > 0:
-						'"Holy cow!" you giggle, taking note of all the different places you can feel cum coating or leaking from your body. "You totally plastered me. You even managed to get it in my hair!"'
+						'"You really plastered me," you giggle, taking note of all the different places you can feel cum coating or leaking from your body. "How did you even manage to get it in my hair?"'
 					else
-						'"Holy cow!" you giggle, taking note of all the different places you can feel cum coating or leaking from your body. "You totally plastered me! How is there even this much in your balls to spray me with?"'
+						'"You really plastered me," you giggle, taking note of all the different places you can feel cum coating or leaking from your body. "How is there even this much in your balls to spray me with?"'
 					end
 				else
 					if cum_loc['hair'] > 0:
-						'"Holy cow!" you giggle, taking note of all the different places you can feel cum on your body. "You totally plastered me. You even managed to get it in my hair!"'
+						'"You really plastered me," you giggle, taking note of all the different places you can feel cum on your body. "How did you even manage to get it in my hair?"'
 					else
-						'"Holy cow!" you giggle, taking note of all the different places you can feel cum on your body. "You totally plastered me! How is there even this much in your balls to spray me with?"'
+						'"You really plastered me," you giggle, taking note of all the different places you can feel cum on your body. "How is there even this much in your balls to spray me with?"'
 					end
 				end
 				if npc_bukakke_fetish[$boy] = 1:
@@ -698,14 +750,14 @@ if $ARGS[0] = 'plastered':
 					
 					act'Joke':
 						cla & *nl
-						'"I like my new makeup," you smile teasingly. "Maybe I <i>will</i> go out like this,"'
+						'"I like my new makeup," you smile teasingly. "Maybe I <i>will</i> go out like this."'
 						gs'booty_call_pillow_talk', 'topics'
 					end
 				elseif npc_argumentative[$boy] = 1:
 					'"It''s not my fault," he grumbles. "You''re the one who made me come so many times."'
 					'"I suppose that''s true," you smile back.'
 					gs'booty_call_pillow_talk', 'topics'
-				elseif $npc_cum_pref[$boy] = 'creampie':
+				elseif $npc_cum_pref[$boy] = 'creampie' and booty_call['creampie_count'] = 0:
 					'"It''s not my fault," he grumbles. "You''re the one who made me come outside."'
 					act'It''s hot':
 						cla & *nl
@@ -758,6 +810,8 @@ if $ARGS[0] = 'ruined_makeup':
 	end
 end
 
+!! ----------------------- CUM TALK --------------------------------------------
+
 if $ARGS[0] = 'so_many_creampies':
 	if booty_call['creampie_count'] >= 4 and booty_call['creampie_pillow_talk'] = 0:
 		act'So many creampies':
@@ -1236,9 +1290,9 @@ if $ARGS[0] = 'boy_broken_condom':
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 		if cum_loc['vagina'] > 0:
-			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy still leaking his cum. "You know, with the... broken condom and everything..."'
+			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy still leaking his cum. "You know, with the... broken condom and everything...?"'
 		else
-			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy. "You know, with the... broken condom and everything..."'
+			'"Are you going to be okay?" <<$npc_firstname[$boy]>> asks, looking worriedly at your pussy. "You know, with the... broken condom and everything...?"'
 		end
 		
 		if morning_after_pill = 0:
@@ -1272,7 +1326,7 @@ if $ARGS[0] = 'boy_broken_condom':
 			
 			act'Take your morning after pill (sexy)':
 				cla & *nl
-				'"It''s fine," you say, smiling mischeviously. "In fact..."'
+				'"It''s fine," you say, smiling mischievously. "In fact..."'
 				'As <<$npc_firstname[$boy]>> watches you pull your morning after pill from your purse, you give him a smouldering look. Sticking out your tongue at him, you pop the pill onto your mouth, swallowing with a wide grin.'
 				if $booty_call['last_cum'] = 'swallow':
 					'"If only I thought to do this earlier," you grin. "Could''ve washed it down with your load."'

locations/booty_call_pillow_talk2.qsrc

@@ -304,8 +304,56 @@ if $ARGS[0] = 'fav_body_part':
 	end
 end
 
+if $ARGS[0] = 'made_me_late1':
+	if schoolprogul > 0 and npc_school_absences[$boy] < schoolprogul and npc_school_absences[$boy] > 0:
+		act'Made me late for school again':
+			cla
+			act'Annoyed':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				if npc_last_sex[$boy] = daystart:
+					'"You made me late for school this morning," you grumble, eyeballing <<$npc_firstname[$boy]>>. "Again."'
+				else
+					'"You made me late for school the last time I came over," you grumble, eyeballing  <<$npc_firstname[$boy]>>.'
+				end
+				gs'booty_call_pillow_talk2', 'made_me_late2'
+			end
+			
+			act'Not mad':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				
+			end
+		end
+	elseif schoolprogul > 0:
+		act'Made me late for school':
+			cla
+			act'Annoyed':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				if npc_last_sex[$boy] = daystart:
+					'"You made me late for school this morning," you grumble, eyeballing <<$npc_firstname[$boy]>>.'
+				else
+					'"You made me late for school the last time I came over," you grumble, eyeballing  <<$npc_firstname[$boy]>>.'
+				end
+				gs'booty_call_pillow_talk2', 'made_me_late2'
+			end
+			
+			act'Not mad':
+				cla & *clr
+				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+				
+			end
+		end
+	end
+end
+
+if $ARGS[0] = 'made_me_late2':
+	
+end
+
 if $ARGS[0] = 'plans_later':
-	if booty_call['plans_later_talk'] = 0:
+	if booty_call['plans_later_talk'] = 0 and booty_call['what_do_today'] = 0:
 		if hour < 14 and hour >= 5:
 			act'What''re you up to later?':
 				booty_call['plans_later_talk'] = 1
@@ -329,7 +377,7 @@ if $ARGS[0] = 'plans_later':
 			end
 		elseif hour >= 20:
 			act'What''d you do today?':
-				booty_call['plans_later_talk'] = 1
+				booty_call['what_do_today'] = 1
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 				'"So, what''d you get up to today?" you ask.'
@@ -337,7 +385,7 @@ if $ARGS[0] = 'plans_later':
 			end
 		else
 			act'Doing anything else today?':
-				booty_call['plans_later_talk'] = 1
+				booty_call['what_do_today'] = 1
 				cla & *clr
 				'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
 				'"So, what else have you done today? Besides me I mean," you smirk at <<$npc_firstname[$boy]>>.'
@@ -1295,4 +1343,52 @@ if $ARGS[0] = 'morning_sleep_fuck_okay':
 	end
 end
 
+!! ------------------------------ BOY INITIATED CONVERSATIONS -------------------------------------------------
+
+if $ARGS[0] = 'new_with_you_boy':
+	booty_call['new_with_you'] = 1
+	cla & *clr
+	'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
+	'"So, anything new going on with you?" <<$npc_firstname[$boy]>> asks.'
+	
+	act'Nothing new':
+		cla & *nl
+		'"Not really," you shrug. "Same old same old."'
+		gs'booty_call_pillow_talk', 'topics'
+	end
+	
+	if npc_know_have_girlfriend[$boy] = 1 or npc_know_have_boyfriend[$boy] = 1:
+		if pcs_lovers + pcs_girlfriends = 0:
+			act'Single now':
+				gs 'booty_call_stats', 'single_know'
+				cla
+				act'Broke up with...':
+					cla
+					act'My boyfriend':
+						cla & *nl
+						'"I broke up with my boyfriend," you tell <<$npc_firstname[$boy]>>. "So I guess I''m single now."'
+						
+					end
+					
+					act'My girlfriend':
+						cla & *nl
+						'"I broke up with my boyfriend," you tell <<$npc_firstname[$boy]>>. "So I guess I''m single now."'
+						
+					end
+				end
+				
+			!!{	act'Got broken up with...':
+					cla
+					act'By my boyfriend':
+					
+					end
+					
+					act'By my girlfriend':
+					
+					end
+				end}
+			end
+		end
+	end
+end
 --- booty_call_pillow_talk2 ---------------------------------

locations/booty_call_sex.qsrc

@@ -1,26 +1,59 @@
 # booty_call_sex
 
 if $ARGS[0] = 'sex_start':
-	if booty_call['no_sex'] = 0:
-		if stat['think_virgin'] = 1 and booty_call['virgin'] = 0 and booty_call['fuck_count'] = 0: 
-			act'Give him your virginity':gt'booty_call_virgin', 'start1'
-		elseif booty_call['fuck_count'] = 0:
-			act'Fuck <<$npc_firstname[$boy]>>':booty_call['must_fuck'] = 1 & booty_call['fuck_now'] = 1 & gs 'booty_call_sex', 'sex_pre'
-		else
-			act'Fuck again':
-				if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
-					booty_call['fuck_again'] = 1
-					gs 'booty_call_after', 'fucked_out'
-				else
+	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0: 
+		act'Give him your virginity':gs'booty_call_virgin', 'start1'
+	elseif booty_call['fuck_count'] = 0 and ($booty_call['position'] ! 'miss' or  $booty_call['position'] ! 'doggy' or  $booty_call['position'] ! 'cowgirl'):
+		act'Fuck <<$npc_firstname[$boy]>>':booty_call['must_fuck'] = 1 & gs 'booty_call_sex', 'sex_pre'
+	elseif booty_call['cock_inserted'] = 1 and $booty_call['last_cum'] = 'creampie' and ($booty_call['position'] = 'miss' or  $booty_call['position'] = 'doggy' or  $booty_call['position'] = 'cowgirl'):
+		act'Fuck again':
+			booty_call['must_fuck'] = 1
+			if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
+				gs 'booty_call_after', 'fucked_out'
+			else
+!!					cla & *nl
+				cla
+				$booty_call['reset_pos'] = $booty_call['position']
+!!					minut += rand(1,2)
+!!					'"Wanna keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
+				act'Stay in the same position':
 					cla
 					gs 'booty_call_sex', 'reset'
-					if booty_call['no_condom'] = 0:
+					if booty_call['no_condom'] ! 1:
+						gs 'booty_call_condoms', 'condoms'
+					else
+						gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
+					end
+				end
+				
+				act'Change positions':
+					booty_call['force_initiative'] = 1
+					cla
+					if booty_call['no_condom'] ! 1:
 						gs 'booty_call_condoms', 'condoms'
 					else
 						gs 'booty_call_sex', 'position_choose'
 					end
-				!!	gs 'booty_call_sex', 'position_change'
-					
+				end
+			end
+		end
+	else
+		act'Fuck again':
+			cla
+			booty_call['fuck_again'] = 1
+			if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
+				gs 'booty_call_after', 'fucked_out'
+			else
+!!					cla & *clr
+!!					'<center><img <<$set_imgh>> src="images/shared/sex/misc/smile.jpg"></center>'
+!!					'"Ready to go again?" you grin eagerly at <<$npc_firstname[$boy]>>.'
+!!					'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock while you decide what position you want to fuck in next.'
+				gs 'booty_call_sex', 'reset'
+				booty_call['must_fuck'] = 1
+				if booty_call['no_condom'] = 0:
+					gs 'booty_call_condoms', 'condoms'
+				else
+					gs 'booty_call_sex', 'position_choose'
 				end
 			end
 		end
@@ -70,31 +103,37 @@ if $ARGS[0] = 'sex_pre':
 end
 
 
-
 if $ARGS[0] = 'position_choose':
-	if booty_call['virgin'] = 1 and $booty_call['virgin_react'] = '': 
+	booty_call['cum_warn'] = 0
+	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0: 
 		gs 'booty_call_virgin', 'start_options'
 	!! initiative roll
-	elseif booty_call['no_sex'] = 0:
+!!	elseif booty_call['no_sex'] = 0:
+	else
 		booty_call['initiative'] = rand(0,1)
 		if (booty_call['initiative'] = 1 and booty_call['force_initiative'] ! 2) or booty_call['force_initiative'] = 1:
 			!! player wins initiative
-			if $booty_call['pos_speed'] = '':
-				act'Let him choose':
-					cla & *nl
+			
+			act'Let him choose':
+				cla & *nl
+				if $booty_call['pos_speed'] = '':
 					'"Take me however you want," you smile.'
-					booty_call['must_fuck'] = 1
-					if $npc_fav_pos[$boy] = 'missionary':
-						gs 'booty_call_miss', 'missionary_start'
-					elseif $npc_fav_pos[$boy] = 'doggy':
-						gs 'booty_call_doggy', 'doggy_start'
-					elseif $npc_fav_pos[$boy] = 'cowgirl':
-						gs 'booty_call_cowgirl', 'cowgirl_start'
-					else
-						gs 'booty_call_sex', 'rand_position'
-					end
-	!!				if npc_condom_conscious[$boy] = 1 or booty_call['condom'] = 1:
+				else
+					'"Fuck me again," you smile. "You pick how."'
+				end
+				booty_call['must_fuck'] = 1
+				booty_call['force_initiative'] = 2
+				if $npc_fav_pos[$boy] = 'missionary':
+					gs 'booty_call_miss', 'missionary_start'
+				elseif $npc_fav_pos[$boy] = 'doggy':
+					gs 'booty_call_doggy', 'doggy_start'
+				elseif $npc_fav_pos[$boy] = 'cowgirl':
+					gs 'booty_call_cowgirl', 'cowgirl_start'
+				else
+					gs 'booty_call_sex', 'rand_position'
 				end
+	!!				if npc_condom_conscious[$boy] = 1 or booty_call['condom'] = 1:
+	!!			end
 			end
 			gs 'booty_call_miss', 'missionary_start'
 			gs 'booty_call_doggy', 'doggy_start'
@@ -126,50 +165,64 @@ if $ARGS[0] = 'he_choose_position':
 	else
 		'"Do whatever you want to me <<$npc_lovername[$boy]>>," you smile.'
 	end
-	
-	if rand(0,1) = 1:
-		if $npc_fav_pos[$boy] = 'missionary':
-			gs 'booty_call_miss', 'missionary_start'
-		elseif $npc_fav_pos[$boy] = 'doggy':
-			gs 'booty_call_doggy', 'doggy_start'
-		elseif $npc_fav_pos[$boy] = 'cowgirl':
-			gs 'booty_call_cowgirl', 'cowgirl_start'
-		elseif $npc_fav_pos[$boy] = 'blowjob' and booty_call['must_fuck'] ! 1:
-			gs 'booty_call_start', 'bj_ask'
-		elseif npc_pussyeater[$boy] = 1 and booty_call['must_fuck'] ! 1:
-			*nl
-			'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
-			gs 'booty_call_start', 'kuni_start'
+	act'Continue':
+		if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+			cla & *clr
+			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
+			'<<$npc_firstname[$boy]>> pushes you down onto the bed and puts his hands on your knees, spreading your legs apart, and lines his cock up with your pussy.'
+			'"I wanna fuck your pussy."'
+			act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+			act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+		elseif rand(0,1) = 1:
+			if $npc_fav_pos[$boy] = 'missionary':
+				gs 'booty_call_miss', 'missionary_start'
+			elseif $npc_fav_pos[$boy] = 'doggy':
+				gs 'booty_call_doggy', 'doggy_start'
+			elseif $npc_fav_pos[$boy] = 'cowgirl':
+				gs 'booty_call_cowgirl', 'cowgirl_start'
+			elseif $npc_fav_pos[$boy] = 'blowjob' and booty_call['must_fuck'] ! 1:
+				gs 'booty_call_start', 'bj_ask'
+			elseif npc_pussyeater[$boy] = 1 and booty_call['must_fuck'] ! 1:
+				*nl
+				'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
+				gs 'booty_call_start', 'kuni_start'
+			else
+				gs 'booty_call_sex', 'rand_position'
+			end
 		else
 			gs 'booty_call_sex', 'rand_position'
 		end
-	else
-		gs 'booty_call_sex', 'rand_position'
 	end
 end
 
 if $ARGS[0] = 'rand_position':
+	cla
 	if booty_call['must_fuck'] = 1:
 		booty_call['position_rand'] = rand(1,3)
 	else
 		booty_call['position_rand'] = rand(1,5)
 	end
-	if booty_call['position_rand'] = 1:
-		!! missionary
-		gs 'booty_call_miss', 'missionary_start'
-	elseif booty_call['position_rand'] = 2:
-		!! doggy
-		gs 'booty_call_doggy', 'doggy_start'
-	elseif booty_call['position_rand'] = 3:
-		!! cowgirl
-		gs 'booty_call_cowgirl', 'cowgirl_start'
-	elseif booty_call['position_rand'] = 4 and booty_call['must_fuck'] ! 1:
-		!! blowjob
-		gs 'booty_call_start', 'bj_ask'
-	elseif booty_call['position_rand'] = 5 and booty_call['must_fuck'] ! 1 and (booty_call['creampie_count'] < 1 or npc_pussyeater[$boy] = 1):
-		*nl
-		'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
-		gs 'booty_call_start', 'kuni_start'
+	if stat['think_virgin'] = 0 or booty_call['fuck_count'] > 0:
+		if booty_call['position_rand'] = 1:
+			!! missionary
+			gs 'booty_call_miss', 'missionary_start'
+		elseif booty_call['position_rand'] = 2:
+			!! doggy
+			gs 'booty_call_doggy', 'doggy_start'
+		elseif booty_call['position_rand'] = 3:
+			!! cowgirl
+			gs 'booty_call_cowgirl', 'cowgirl_start'
+		elseif booty_call['position_rand'] = 4 and booty_call['must_fuck'] ! 1:
+			!! blowjob
+			gs 'booty_call_start', 'bj_ask'
+		elseif booty_call['position_rand'] = 5 and booty_call['must_fuck'] ! 1 and (booty_call['creampie_count'] < 1 or npc_pussyeater[$boy] = 1):
+			*nl
+			'<<$npc_firstname[$boy]>> starts leading a trail of kisses down your stomach towards your pussy.'
+			gs 'booty_call_start', 'kuni_start'
+		else
+			!! failsafe: default to missionary
+			gs 'booty_call_miss', 'missionary_start'
+		end
 	else
 		!! failsafe: default to missionary
 		gs 'booty_call_miss', 'missionary_start'
@@ -177,7 +230,8 @@ if $ARGS[0] = 'rand_position':
 end
 
 if $ARGS[0] = 'fuck_continue':
-	booty_call['cock_remove'] = 0
+	booty_call['cock_inserted'] = 1
+	booty_call['fucking'] = 1
 	!! this is just so the game remembers what positions you fucked in
 	if $booty_call['position'] = 'miss':
 		booty_call['miss_fuck'] = 1
@@ -265,17 +319,17 @@ if $ARGS[0] = 'sex_end':
 		gs'booty_call_after', 'stop_here'
 	end
 	if booty_call['sex_stop'] = 0:
-		gs'booty_call_sex', 'keep_fucking'
+!!		gs'booty_call_sex', 'keep_fucking'
+		gs'booty_call_sex', 'keep_going'
+!!		gs'booty_call_sex', 'sex_start'
 		gs'booty_call_sex', 'take_a_break'
-!!		gs'booty_call_after', 'keep_going'
 		gs'booty_call_sex', 'harden_hand'
 		gs'booty_call_sex', 'harden_mouth'
-		gs'booty_call_sex', 'sex_start'
 	end
 	gs'booty_call_after', 'wipes'
 	if booty_call['react'] = 0:
 		gs'booty_call_after', 'facial_mouth_clean'
-		gs'booty_call_after', 'cum_kiss_cock'
+		gs'booty_call_reactions', 'cum_kiss_cock'
 		gs'booty_call_reactions', 'cum_react'
 	end
 	gs'booty_call_after', 'tap_out'
@@ -318,35 +372,6 @@ if $ARGS[0] = 'dirty_talk2':
 	gt 'booty_call_<<$booty_call[''position'']>>', '<<$booty_call[''pos_speed'']>>.2'
 end
 
-if $ARGS[0] = 'keep_fucking':
-	if booty_call['cock_remove'] = 0 and ($booty_call['position'] = 'miss' or  $booty_call['position'] = 'doggy' or  $booty_call['position'] = 'cowgirl'):
-		act'Keep fucking':
-			cla & *nl
-			$booty_call['reset_pos'] = $booty_call['position']
-			minut += rand(1,2)
-			'"Think you can keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
-			gs'booty_call_sex', 'reset'
-			act'Continue':
-				cla
-				gs 'booty_call_sex', 'reset'
-				gs 'booty_call_condoms', 'condoms'
-				gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
-			end
-		end
-	end
-end
-
-if $ARGS[0] = 'keep_fucking_act':
-	if booty_call['cock_remove'] = 0:
-		act'Keep fucking':
-			$booty_call['reset_pos'] = $booty_call['position']
-			cla
-			gs 'booty_call_sex', 'reset'
-			gs 'booty_call_condoms', 'condoms'
-			gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
-		end
-	end
-end
 
 if $ARGS[0] = 'take_a_break':
 	act'Take a break':
@@ -356,7 +381,7 @@ if $ARGS[0] = 'take_a_break':
 		gs 'stat'
 		booty_call['react'] = 1
 		if $booty_call['last_cum'] = 'creampie':
-			if booty_call['cock_remove'] = 1:
+			if booty_call['cock_inserted'] = 0:
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/miss1.jpg"></center>'
 				gs 'booty_call_sex', 'break_ask'
 				*nl
@@ -375,17 +400,30 @@ if $ARGS[0] = 'take_a_break':
 				gs 'booty_call_sex', 'break_ask'
 				
 				act'Pull apart':
-					booty_call['cock_remove'] = 1
+					booty_call['cock_inserted'] = 0
 					cla & *clr
-					if $booty_call['position'] = 'miss':
-						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
-						'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You breathe slowly, letting yourself sink into the bed as you feel <<$npc_firstname[$boy]>>''s cum trickle from your pussy.'
-					elseif $booty_call['position'] = 'doggy':
-						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
-						'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You barely move, breathing slowly and let your face sink into the pillow as <<$npc_firstname[$boy]>>''s cum trickles from your pussy.'
-					elseif $booty_call['position'] = 'cowgirl':
-						'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
-						'You climb off of <<$npc_firstname[$boy]>>, flopping down beside him and let yourself sink into the softness of the bed. His cum slowly oozes from your pussy.'
+					if $booty_call['last_cum'] = 'creampie':
+						if $booty_call['position'] = 'miss':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You breathe slowly, letting yourself sink into the bed as you feel <<$npc_firstname[$boy]>>''s cum trickle from your pussy.'
+						elseif $booty_call['position'] = 'doggy':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/doggy2.jpg"></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You barely move, breathing slowly and let your face sink into the pillow as <<$npc_firstname[$boy]>>''s cum trickles from your pussy.'
+						elseif $booty_call['position'] = 'cowgirl':
+							'<center><img <<$set_imgh>> src="images/shared/sex/cum/vagcreampie/after1.jpg"></center>'
+							'You climb off of <<$npc_firstname[$boy]>>, flopping down beside him and let yourself sink into the softness of the bed. His cum slowly oozes from your pussy.'
+						end
+					elseif $booty_call['last_cum'] = 'condom':
+						if $booty_call['position'] = 'miss':
+							'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and flops down beside you. You breathe slowly, letting yourself sink into the bed, feeling your your pussy continue to leak as <<$npc_firstname[$boy]>> pulls off the used condom and tosses it aside.'
+						elseif $booty_call['position'] = 'doggy':
+							'<center><video autoplay loop src="images/shared/sex/after/doggy_after1.mp4"></video></center>'
+							'<<$npc_firstname[$boy]>> climbs off of you and you roll over to face him, thighs slick with your own juices and head swimming with post-fuck endorphins, while he pulls off the used condom and tosses it aside.'
+						elseif $booty_call['position'] = 'cowgirl':
+							'<center><video autoplay loop src="images/shared/sex/after/cowgirl_after1.mp4"></video></center>'
+							'You climb off of <<$npc_firstname[$boy]>>, flopping down beside him and let yourself sink into the softness of the bed, sighing with satisfaction as you feel post-fuck juices continue to leak from your pussy and <<$npc_firstname[$boy]>> pulls off the used condom and tosses it aside.'
+						end
 					end
 					
 					*nl
@@ -417,7 +455,7 @@ if $ARGS[0] = 'take_a_break':
 			end
 		elseif $booty_call['last_cum'] = 'condom':
 			'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-			if booty_call['cock_remove'] = 1:
+			if booty_call['cock_inserted'] = 0:
 				'You flop down onto the bed, breathing hard as your body slowly unwinds, relaxing as you let yourself sink into the bed. <<$npc_firstname[$boy]>> removes the condom from his cock, tossing it aside before laying down beside you.'
 				*nl
 				if booty_call['speed'] <= 2:
@@ -539,7 +577,7 @@ if $ARGS[0] = 'birth_control_take':
 			act'Take it shyly':
 				cla & *clr
 				$npc_apt_bedroom[$boy]
-				if booty_call['cock_remove'] = 0:
+				if booty_call['cock_inserted'] = 1:
 					'You somehow manage to grab hold of your purse without extricating yourself from <<$npc_firstname[$boy]>> and pop a birth control pill from the packaging.'
 					*nl
 					'"This is what the pill is for after all," you blush, shyly placing it between your lips, feeling your pussy squeeze his cock as you swallow.'
@@ -572,7 +610,7 @@ if $ARGS[0] = 'birth_control_take':
 			
 			act'Take it sexily':
 				cla & *nl
-				if booty_call['cock_remove'] = 0:
+				if booty_call['cock_inserted'] = 1:
 					'You somehow manage to grab hold of your purse without extricating yourself from <<$npc_firstname[$boy]>> and pop a birth control pill from the packaging.'
 					*nl
 					if booty_call['risky_creampie'] = 1:
@@ -619,20 +657,30 @@ if $ARGS[0] = 'he_end_break':
 	booty_call['position_rand'] = rand(1,5)
 	cla & *clr
 	$npc_apt_bedroom[$boy]
-	if booty_call['position_rand'] = 1 or $npc_fav_pos[$boy] = 'missionary':
+	if booty_call['position_rand'] = 1 or $npc_fav_pos[$boy] = 'missionary' or (stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0 and booty_call['position_rand'] <= 3):
 		!! missionary
 		'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you. You realize what''s about to happen just before he jumps on top of you, eliciting...'
 		act'... giggles':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as he forces your legs open and plunges his cock into your pussy.'
-			act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as he forces your legs open and lines his cock up with your pussy.'
+			if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+				act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+				act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+			else
+				act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			end
 		end
 		act'... a yelp of surprise':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/miss3.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from your lips as he forces your legs open and plunges his cock into your pussy.'
-			act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from your lips as he forces your legs open and lines his cock up with your pussy.'
+			if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
+				act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
+				act'Let him take your virginity':gs'booty_call_virgin', 'start3'
+			else
+				act'Get fucked':gs'booty_call_miss', 'miss_goto'
+			end
 		end
 	elseif booty_call['position_rand'] = 2 or $npc_fav_pos[$boy] = 'doggy':
 		!! doggy
@@ -640,12 +688,12 @@ if $ARGS[0] = 'he_end_break':
 		act'... giggles':
 			cla & *clr
 			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
-			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass before plunging his cock into your pussy.'
+			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting uncontrollable giggles from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass, lining his cock up with your pussy.'
 			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
 		act'... a yelp of surprise':
 			cla & *clr
-			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/dog1.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/shared/sex/foreplay/doggy1.jpg"></center>'
 			'After a few minutes, you glance over at <<$npc_firstname[$boy]>> and find him hungrily staring at you with a raging erection. You realize what''s about to happen just before he jumps on top of you, eliciting a yelp of surprise from from your lips as flips you onto your stomach, pulls you up by the hips, and slaps your ass before plunging his cock into your pussy.'
 			act'Get fucked':gs'booty_call_doggy', 'doggy_goto'
 		end
@@ -670,49 +718,59 @@ end
 
 if $ARGS[0] = 'keep_going':
 	act'Keep going?':
-		if booty_call['cum_count'] >= npc_sexdrive[$boy]:
+		if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum']:
 			gs 'booty_call_after', 'fucked_out'
 		elseif $booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl':
-			if booty_call['cock_remove'] = 1:
+			
+			minut += rand(1,2)
+			if booty_call['cock_inserted'] = 1 and $booty_call['last_cum'] = 'creampie':
+				cla & *nl
+				'"Wanna keep going?" you ask, flexing your pussy around his cock. It twitches inside in response, feeling a little stiffer than before, causing you to grin. "That feels like a yes."'
+			else
 				cla & *clr
-				minut += rand(1,2)
 				'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
-				'"Ready to keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
-				'"Yeah, gimme a minute to get hard again."'
-				gs'booty_call_sex', 'reset'
-				act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-				act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-				act'Sex':cla & gs'booty_call_sex', 'position_choose' & gs 'booty_call_condoms', 'condoms'
-			else
-				cla & *nl
-				$booty_call['reset_pos'] = $booty_call['position']
-				minut += rand(1,2)
-				'"Think you can keep going?" you ask, flexing your pussy around his cock. You grin when you feel it twitch in response, seeming a little stiffer inside you than before. "That feels like a yes."'
-				gs'booty_call_sex', 'reset'
-				act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-				act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-				act'Change position':
-					cla
-					booty_call['change_pos'] = 1
-					gs 'booty_call_sex', 'position_change'
-				end
-				gs'booty_call_sex', 'keep_fucking_act'
+				'"Wanna keep going?" you ask, looking over at <<$npc_firstname[$boy]>>.'
+				'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock.'
+				!!act'Sex':cla & gs'booty_call_sex', 'position_choose' & gs 'booty_call_condoms', 'condoms'
 			end
+			gs'booty_call_sex', 'reset'
+			gs'booty_call_sex', 'sex_menu'
 		else
 			cla & *clr
 			minut += rand(1,2)
 			'<center><video autoplay loop src="images/shared/sex/misc/wait.mp4"></video></center>'
-			'"Ready to keep going?" you ask eagerly.'
+			'"Wanna keep going?" you ask eagerly.'
 			if $booty_call['cum_choice'] ! '':
-				'"Yeah, gimme a minute to get hard again."'
+				'"Yeah, gimme a minute to get hard again," he grunts back, working himself with his hand to force some stiffness back into his cock.'
 			else
-				'"Definitely. What do you have in mind?"'
+				'"What do you have in mind?" <<$npc_firstname[$boy]>> grins back.'
 			end
 			
 			gs'booty_call_sex', 'reset'
-			act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-			act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-			act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+			gs'booty_call_sex', 'sex_menu'
+			!!act'Sex':cla & gs'booty_call_sex', 'position_choose' & gs 'booty_call_condoms', 'condoms'
+		end
+	end
+end
+
+if $ARGS[0] = 'sex_menu':
+	act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
+	act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
+	gs'booty_call_sex', 'sex_start'
+end
+
+if $ARGS[0] = 'keep_fucking':
+	
+end
+
+if $ARGS[0] = 'keep_fucking_act':
+	if booty_call['cock_inserted'] = 1 and ($booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl'):
+		act'Keep fucking':
+			$booty_call['reset_pos'] = $booty_call['position']
+			cla
+			gs 'booty_call_sex', 'reset'
+			gs 'booty_call_condoms', 'condoms'
+			gt 'booty_call_<<$booty_call[''reset_pos'']>>', $booty_call['pos_speed']
 		end
 	end
 end
@@ -726,10 +784,10 @@ if $ARGS[0] = 'ciga_break':
 				gs 'drugs', 'smoke'
 				if npc_smoker[$boy] > 0:
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
-					if booty_call['cock_remove'] = 1:
+					if booty_call['cock_inserted'] = 0:
 						'You reach down and pull out your pack of cigarettes, placing one in your mouth and tossing the pack back into your purse. <<$npc_firstname[$boy]>> takes the opportunity to light up as well while you take your first drag.'
 					else
-						booty_call['cock_remove'] = 1
+						booty_call['cock_inserted'] = 0
 						if $booty_call['last_cum'] = 'creampie':
 							'You finally pull apart, immediately feeling <<$npc_firstname[$boy]>>''s cum spill from inside you as his cock vacates your pussy before reaching down for your cigarettes, placing one in your mouth and tossing the pack back into your purse. <<$npc_firstname[$boy]>> takes the opportunity to light up as well while you take your first drag.'
 						elseif $booty_call['last_cum'] = 'condom':
@@ -759,10 +817,10 @@ if $ARGS[0] = 'ciga_break':
 					siga_bum = 1
 					gs 'drugs', 'smoke'
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/bed_smoke3.jpg"></center>'
-					if booty_call['cock_remove'] = 1:
+					if booty_call['cock_inserted'] = 0:
 						'"Got any smokes?" you ask. <<$npc_firstname[$boy]>> nods and fishes out a pack, proffering the first one to you and igniting it for you. He pulls out one for himself and lights up as well while you take your first drag.'
 					else
-						booty_call['cock_remove'] = 1
+						booty_call['cock_inserted'] = 0
 						if $booty_call['last_cum'] = 'creampie':
 							'"Got any smokes?" you ask, feeling the cum spill from your pussy as you finally let <<$npc_firstname[$boy]>>''s cock slip from your pussy before sitting up. <<$npc_firstname[$boy]>> nods and fishes out a pack, proffering the first one to you and igniting it for you. He pulls out one for himself and lights up as well while you take your first drag.'
 						else
@@ -773,14 +831,14 @@ if $ARGS[0] = 'ciga_break':
 					'Smoke fills your lungs and you hold it there, savoring it, before exhaling slowly. As the smoke blows past your lips, it''s like all your stress goes with it and you sigh happily, and the two of you continue to puff away until there''s but the charred butts left.'
 				else
 					'<center><img <<$set_imgh>> src="images/shared/sex/after/annoyed1.jpg"></center>'
-					if booty_call['cock_remove'] = 1:
+					if booty_call['cock_inserted'] = 0:
 						'"Got any smokes?" you ask but <<$npc_firstname[$boy]>> just shakes his head.'
 					elseif $booty_call['last_cum'] = 'creampie':
 						'"Got any smokes?" you ask, feeling the cum spill from your pussy as you finally let <<$npc_firstname[$boy]>>''s cock slip from your pussy before sitting up. Unfortunately, he just shakes his head.'
 					else
 						'"Got any smokes?" you ask as you pull apart, finally letting <<$npc_firstname[$boy]>>''s cock slip from your pussy before sitting up. Unfortunately, he just shakes his head.'
 					end
-					booty_call['cock_remove'] = 1
+					booty_call['cock_inserted'] = 0
 					if npc_smoker[$boy] > 0:
 						'"Fresh out," he shrugs.'
 					else
@@ -797,9 +855,9 @@ end
 if $ARGS[0] = 'harden_hand':
 	if $booty_call['last_cum'] ! '':
 		act'Try to get him hard again (hand)':
-			booty_call['cock_remove'] = 1
+			booty_call['cock_inserted'] = 0
 			cla & *clr
-			if booty_call['cum_count'] >= npc_sexdrive[$boy] and (booty_call['force_harden'] >= 2 or rand(1,3) = 1):
+			if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum'] and (booty_call['force_harden'] >= 2 or rand(1,3) = 1):
 				!! IMAGE HERE
 				$npc_apt_bedroom[$boy]
 				if booty_call['force_harden'] > 0:
@@ -830,17 +888,14 @@ if $ARGS[0] = 'harden_hand':
 					'"Yeah, that''s right...  Just like that little guy..."'
 				end
 				booty_call['not_done'] = 0
-				if booty_call['force_harden'] > 0:booty_call['force_harden'] = 2
-				booty_call['extra_cum'] += 1
+				if booty_call['force_harden'] > 0:
+					booty_call['force_harden'] = 2
+					booty_call['extra_cum'] += 1
+				end
 				$booty_call['foreplay'] = ''
 				gs'booty_call_sex', 'reset'
 				gs 'booty_call_start', 'handjob_dom1'
-				gs 'booty_call_start', 'foreplay_choose'
-				if booty_call['fuck_count'] > 0:
-					act'Back to sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
-				else
-					gs'booty_call_sex', 'sex_start'
-				end
+				gs'booty_call_sex', 'sex_menu'
 			end
 		end
 	end
@@ -849,16 +904,16 @@ end
 if $ARGS[0] = 'harden_mouth':
 	if $booty_call['last_cum'] ! '':
 		act'Try to get him hard again (mouth)':
-			booty_call['cock_remove'] = 1
+			booty_call['cock_inserted'] = 0
 			cla & *clr
-			if booty_call['cum_count'] >= npc_sexdrive[$boy] and (booty_call['force_harden'] >= 2 or rand(1,3) = 1):
+			if booty_call['cum_count'] >= npc_sexdrive[$boy] + booty_call['extra_cum'] and (booty_call['force_harden'] >= 2 or rand(1,3) = 1):
 				!! IMAGE HERE
 				$npc_apt_bedroom[$boy]
 				if booty_call['force_harden'] > 0:
 					'"Oh no you''re not," you growl lustfully.'
 					*nl
 				end
-				if ($booty_call['last_cum'] = 'creampie' or $booty_call['cum_choice'] = 'creampie_surprise') and booty_call['cock_remove'] ! 1:
+				if ($booty_call['last_cum'] = 'creampie' or $booty_call['cum_choice'] = 'creampie_surprise') and booty_call['cock_inserted'] = 1:
 					'You pull away, pussy trailing semen as you get down in front of <<$npc_firstname[$boy]>>. You take him in your mouth, tasting of cum and your own juices, and suck gently on its head, licking, teasing, playing with his softening cock. But try as you might, it''s like trying to play billiards with a rope. You just can''t get him hard again.'
 				elseif $booty_call['last_cum'] = 'condom':
 					'You pull away and get down in front of <<$npc_firstname[$boy]>>. You slip the condom from his cock and take him in your mouth, you suck gently on its head, licking, teasing, playing, cleaning the cum from with his softening cock. But try as you might, it''s like trying to play billiards with a rope. You just can''t get him hard agains.'
@@ -873,14 +928,14 @@ if $ARGS[0] = 'harden_mouth':
 				!! REPLACE
 				!! IMAGE HERE
 				 '<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
-				!! if ($booty_call['cum_choice'] = 'creampie' or $booty_call['cum_choice'] = 'creampie_surprise') and booty_call['cock_remove'] ! 1:
+				!! if ($booty_call['cum_choice'] = 'creampie' or $booty_call['cum_choice'] = 'creampie_surprise') and booty_call['cock_inserted'] = 1:
 				if booty_call['force_harden'] > 0:
 					'"Oh no you''re not," you growl lustfully.'
 					*nl
 				end
-				if $booty_call['last_cum'] = 'creampie' and booty_call['cock_remove'] ! 1:
+				if $booty_call['last_cum'] = 'creampie' and booty_call['cock_inserted'] = 1:
 					'You pull away, pussy trailing semen as you get down in front of <<$npc_firstname[$boy]>>. You take him in your mouth, tasting of cum and your own juices, and suck gently on its head, licking, teasing, playing, trying to keep him hard. As you do, the dick between your lips begins to stiffen up again.'
-				elseif $booty_call['last_cum'] = 'creampie' and booty_call['cock_remove'] ! 1 and booty_call['force_harden'] > 0:
+				elseif $booty_call['last_cum'] = 'creampie' and booty_call['cock_inserted'] = 1 and booty_call['force_harden'] > 0:
 					'You pull away, pussy trailing semen as you get down in front of <<$npc_firstname[$boy]>>. You take him in your mouth, tasting of cum and your own juices as you lick, tease, and play with his shaft. After a few moments of softness, <<$npc_firstname[$boy]>> groans in a way that sounds almost painful and the dick between your lips begins to stiffen up again..'
 				elseif $booty_call['last_cum'] = 'condom':
 					'You pull away and get down in front of <<$npc_firstname[$boy]>>. You slip the condom from his cock and take him in your mouth, you suck gently on its head, licking, teasing, playing, cleaning the cum from his shaft. As you do, the dick between your lips begins to stiffen up again.'
@@ -893,31 +948,34 @@ if $ARGS[0] = 'harden_mouth':
 					'"Yeah, that''s right...  Just like that little guy..." you whisper, pulling your mouth off with a pop and smiling wickedly as you continue slowly pumping him with your hand.'
 				end
 				booty_call['not_done'] = 0
-				if booty_call['force_harden'] > 0:booty_call['force_harden'] = 2
-				booty_call['extra_cum'] += 1
+				if booty_call['force_harden'] > 0:
+					booty_call['force_harden'] = 2
+					booty_call['extra_cum'] += 1
+				end
 				$booty_call['foreplay'] = ''
 				gs'booty_call_sex', 'reset'
 				act'Keep blowing him':cla & *clr & gs 'booty_call_start', 'bj_dom2'
-				gs 'booty_call_start', 'foreplay_choose'
-				if booty_call['fuck_count'] > 0:
-					act'Back to sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
-				else
-					gs'booty_call_sex', 'sex_start'
-				end
+				gs'booty_call_sex', 'sex_menu'
 			end
 		end
 	end
 end
 
 if $ARGS[0] = 'reset':
+	booty_call['bj_cum_choice'] = 0
+	booty_call['cum_choice'] = 0
 	$booty_call['cum_choice'] = ''
-	$booty_call['last_cum'] = ''
+!!	$booty_call['last_cum'] = ''
+	if booty_call['orgasm'] < orgasm and booty_call['virgin'] = 1:
+		booty_call['virgin_enjoyment'] = 0
+		booty_call['virgin_feel_good'] = 1
+	end
 	booty_call['orgasm'] = orgasm
 	booty_call['kiss'] = 0
 	booty_call['bored'] = 0
 	booty_call['he_ask'] = 0
 	$orgasm_or = ''
-	booty_call['cock_remove'] = 0
+!!	booty_call['cock_remove'] = 0
 	booty_call['not_inside'] = 0
 	booty_call['pullout_ask'] = 0
 	booty_call['creampie_exit'] = 0
@@ -928,12 +986,13 @@ if $ARGS[0] = 'reset':
 	if booty_call['came_together'] > 0:
 		booty_call['came_together'] = 0
 		booty_call['creampie_orgasm'] = 1
-		
+		booty_call['did_we_cum_together'] = 0
 	end
 	booty_call['cum_together_fake'] = 0
 	booty_call['cum_react'] = 0
 	if booty_call['mad'] = 1:booty_call['mad'] = 2
 	booty_call['boy_cum'] = 0
+	booty_call['bj_cum'] = 0
 	booty_call['consecutive_cuni_orgasm'] = 0
 !!	booty_call['reluctant_bj'] = 0
 !!	booty_call['cum_mouth'] = 0
@@ -953,8 +1012,7 @@ if $ARGS[0] = 'reset':
 	booty_call['spit'] = 0
 	booty_call['gag'] = 0
 	booty_call['react'] = 0
-	booty_call['fuck_again'] = 0
-	booty_call['must_fuck'] = 0
+	booty_call['force_initiative'] = 0
 	booty_call['smoke_break'] = 0
 	booty_call['first_break'] = 0
 	booty_call['cycle_limit'] = 0
@@ -963,6 +1021,8 @@ if $ARGS[0] = 'reset':
 	booty_call['just_cum_inside_me'] = 0
 	booty_call['take_in_stride'] = 0
 	booty_call['sex_over'] = 0
+	if booty_call['no_condom'] = 1: booty_call['condom'] = 0
+	booty_call['good_for_you'] = 0
 end
 
 if $ARGS[0] = 'pain':
@@ -1290,7 +1350,7 @@ if $ARGS[0] = 'sleep_wtf_forgive2':
 			'"Ugh." You sneer at him as you get up. "I see how it''s gonna be. Not gonna get a wink of sleep with you around. I''m leaving."'
 			*nl
 			'Quick as you can, you gather your things and get dressed and head out the door.'
-			act'Leave':gt'booty_call_after', 'exit'
+			act'Leave':gt'booty_call_leave', 'exit'
 		end
 		
 		act'Back to sleep':
@@ -1309,9 +1369,7 @@ if $ARGS[0] = 'sleep_wtf_forgive2':
 		*nl
 		'"Oh alright. Come here," you say, beckoning him towards you so you can do something about his raging hard-on.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 	
 	act'Sure':
@@ -1320,9 +1378,7 @@ if $ARGS[0] = 'sleep_wtf_forgive2':
 		$npc_apt_bedroom[$boy]
 		'"Sure," you grin, beckoning him closer so you can put his raging erection to use.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 end
 
@@ -1356,6 +1412,7 @@ end
 if $ARGS[0] = 'wakeup_sex':
 	booty_call['sleep_fuck'] = 1
 	booty_call['wake_fuck'] = 1
+	booty_call['morning_after'] = 1
 	gs'arousal', 'vaginal', rand(5,10), 'no_orgasm_msg'
 	if npc_sex_speed <= 2:
 		$booty_call['sleep_video1'] = '<center><video autoplay loop src="images/shared/sex/sleep/slow<<rand(1,2)>>.mp4"></video></center>'
@@ -1380,11 +1437,7 @@ end
 
 if $ARGS[0] = 'wakeup_sex2':
 	cla & *clr
-	if daystage = 2:
-		'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsex0.mp4"></video></center>'
-	else
-		'<center><video autoplay loop src="images/shared/sex/sleep/wake1.mp4"></video></center>'
-	end
+	'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
 	'Your eyes flutter open and find <<$npc_firstname[$boy]>> balls deep inside you, happily fucking you first thing in the morning.'
 	gs'booty_call_sex', 'wakeup_sex_options'
 end
@@ -1403,13 +1456,7 @@ if $ARGS[0] = 'wakeup_sex_options':
 	
 	act'Moan':
 		cla & *clr
-		booty_call['wakeup_fuck'] = 1
-		$booty_call['position'] = 'miss'
-		if daystage = 2:
-			'<center><video autoplay loop src="images/shared/sex/vag/miss/med1.mp4"></video></center>'
-		else
-			'<center><video autoplay loop src="images/shared/sex/sleep/wake2.mp4"></video></center>'
-		end
+		gs'booty_call_sex', 'morning_wake_fuck_code'
 		'<i>Ahh~! Aahn~!</i>'
 		*nl
 		'You moan with hoarse arousal, spreading your legs wider so <<$npc_firstname[$boy]>> can keep fucking you.'
@@ -1459,6 +1506,7 @@ if $ARGS[0] = 'wakeup_sex_options':
 end
 
 if $ARGS[0] = 'morning_wake_fuck_code':
+	booty_call['start_time'] = totminut
 	booty_call['wakeup_fuck'] = 1
 	$booty_call['position'] = 'miss'
 	if daystage = 2:
@@ -1577,30 +1625,29 @@ if $ARGS[0] = 'morning_wtf_forgive2':
 	
 	act'Oh alright':
 		booty_call['morning_fuck'] = 2
+		booty_call['start_time'] = totminut
 		cla & *clr
 		$npc_apt_bedroom[$boy]
 		'You give him a look and after a brief pause, you sigh dramatically, rolling your eyes.'
 		*nl
 		'"Oh alright. Come here," you say, beckoning him towards you so you can do something about his raging hard-on.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 	
 	act'Sure':
 		booty_call['morning_fuck'] = 2
+		booty_call['start_time'] = totminut
 		cla & *clr
 		$npc_apt_bedroom[$boy]
 		'"Sure," you grin, beckoning him closer so you can put his raging erection to use.'
 		gs'booty_call_sex', 'reset'
-		act'Let him lead':cla & gs 'booty_call_sex', 'he_choose_position'
-		act'Foreplay':cla & gs 'booty_call_start', 'foreplay_choose'
-		act'Sex':cla & gs'booty_call_sex', 'position_change' & gs 'booty_call_condoms', 'condoms'
+		gs'booty_call_sex', 'sex_menu'
 	end
 end
 
 if $ARGS[0] = 'wakeup_sex_continue':
+	booty_call['start_time'] = totminut
 	if npc_sex_speed <= 2:
 		booty_call['speed'] = 1
 		act'Fuck <<$npc_firstname[$boy]>>':gs'booty_call_miss', 'miss1.2'

locations/booty_call_shower.qsrc

@@ -94,6 +94,8 @@ end
 
 if $ARGS[0] = 'before_together1':
 	booty_call['start_shower'] = 1
+	noShampoo = 1
+	dynamic $showerdin
 	gs'arousal', 'massage',5,'no_orgasm_msg'
 	gs'stat'
 	cla & *clr
@@ -138,11 +140,15 @@ if $ARGS[0] = 'before_together2':
 				gs'arousal', 'massage',5,'no_orgasm_msg'
 				gs'stat'
 				'You turn to face <<$npc_firstname[$boy]>>.'
-				if (booty_call['condom'] > 0 and booty_call['no_condom'] ! 1 and npc_free_creampies[$boy] < 1) or booty_call['danger_day'] = 1:
+				if (booty_call['condom'] > 0 and booty_call['npc_condom_insist'] ! 1 and booty_call['creampie_allowance'] = 0 and npc_free_creampies[$boy] ! 2) or booty_call['danger_day'] = 1:
 					'"You won''t come inside me, will you?" you ask.'
 					'"Don''t worry, I won''t."'
 					*nl
 					'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
+				elseif booty_call['condom'] > 0 and booty_call['npc_condom_insist'] = 1:
+					'"Don''t worry," <<$npc_firstname[$boy]>> whispers. "I won''t come inside you."'
+					*nl
+					'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
 				else
 					'You look at <<$npc_firstname[$boy]>> and your expression tells him everything he needs to know. Without another word, he lifts your leg and pushes his cock inside you.'
 				end
@@ -324,7 +330,7 @@ if $ARGS[0] = 'before_shower_creampie_surprise':
 				'"Imbecile!" you shout again, storming out of the shower, not caring that you''re dripping wet. You make your way over to his bedroom and pick up your clothes, throwing them on.'
 				'"Wait!" <<$npc_firstname[$boy]>> protests, clumsily wrapping a towel around his waist and following you.'
 				'"I''m not waiting for shit!" you sneer. The moment the last item of clothing is over your wet skin, you stomp out the door, slamming it behind you.'
-				act'Leave':gt 'booty_call_after', 'exit'
+				act'Leave':gt 'booty_call_leave', 'exit'
 			end
 			
 			act'Forgive him (my fault)':
@@ -427,7 +433,7 @@ if $ARGS[0] = 'before_shower_creampie':
 		*nl
 		'Eventually, his orgasm fades and his cock slips from inside you and a hot dribble of liquid runs down your leg.'
 		*nl
-		if (booty_call['shower_no_condom'] > 0 or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2) or npc_know_not_bc[$boy] = 1) and npc_free_creampies[$boy] < 1:
+		if (booty_call['shower_no_condom'] > 0 or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2)) and npc_free_creampies[$boy] < 1:
 			'"I thought..." <<$npc_firstname[$boy]>> pants. "You didn''t want me... to come inside you..."'
 			act'Changed my mind':
 				cla & *clr
@@ -572,6 +578,7 @@ if $ARGS[0] = 'after_alone':
 	gs 'stat'
 	'You turn on the faucet, relaxing as the hot water pours down over your skin. After a few minutes, you turn the tap off and step out.'
 	act'Put on a towel':gt'booty_call_shower', 'after_towel_on'
+	act'Wrap it around your head':gt'booty_call_shower', 'after_towel_head'
 	act'Skip the towel':gt'booty_call_shower', 'after_towel_skip'
 end
 
@@ -585,6 +592,17 @@ if $ARGS[0] = 'after_towel_on':
 	gs'booty_call_after', 'after_sex2'
 end
 
+if $ARGS[0] = 'after_towel_head':
+	cla & *clr
+	booty_call['towel'] = 1
+	booty_call['towel_head'] = 1
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/towel_head1.jpg"></center>'
+	'You pull a towel from the cupboard and dry your body with it, only pausing to wrapping it around your hair before opening the door. Upon stepping out of the bathroom, <<$npc_firstname[$boy]>> eyes light up at the sight of your body, completely naked except for the towel turban atop your head.'
+	*nl
+	'"Thanks," you smile at him.'
+	gs'booty_call_after', 'after_sex2'
+end
+
 if $ARGS[0] = 'after_towel_borrow':
 	act'Borrow a towel':
 		cla & *nl
@@ -613,7 +631,10 @@ end
 
 if $ARGS[0] = 'after_shower_together':
 	booty_call['shower'] = 1
+	noShampoo = 1
+	dynamic $showerdin
 	cla & *clr
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shower_together.jpg"></center>'
 	'The two of you step into the shower together, hot water raining down on you, letting it wash away the sweat of your recent lovemaking.'
 	act'Continue':
@@ -714,11 +735,15 @@ if $ARGS[0] = 'after_shower_together':
 						'"Well..." Your breath hitches as he gives your nipples a light squeeze. You feel warm and wet and it''s <i>not</i> just the shower.'
 !!						if stat['think_virgin'] = 0 and booty_call['virgin'] ! 1:
 						
-						if booty_call['condom'] > 0:
-							'"You won''t cum inside me, will you?" you ask.'
+						if (booty_call['condom'] > 0 and booty_call['npc_condom_insist'] ! 1 and booty_call['creampie_allowance'] = 0 and npc_free_creampies[$boy] ! 2) or booty_call['danger_day'] = 1:
+							'"You won''t come inside me, will you?" you ask.'
 							'"Don''t worry, I won''t."'
 							*nl
 							'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
+						elseif booty_call['condom'] > 0 and booty_call['npc_condom_insist'] = 1:
+							'"Don''t worry," <<$npc_firstname[$boy]>> whispers. "I won''t come inside you."'
+							*nl
+							'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
 						else
 							'You look at <<$npc_firstname[$boy]>> and your expression tells him everything he needs to know. Without another word, he lifts your leg and pushes his cock inside you.'
 						end
@@ -744,11 +769,15 @@ if $ARGS[0] = 'after_shower_together':
 					gs'arousal', 'massage',5,'no_orgasm_msg'
 					gs'stat'
 					'You turn to face <<$npc_firstname[$boy]>>.'
-					if booty_call['condom'] > 0:
-						'"You won''t cum inside me, will you?" you ask.'
+					if (booty_call['condom'] > 0 and booty_call['npc_condom_insist'] ! 1 and booty_call['creampie_allowance'] = 0 and npc_free_creampies[$boy] ! 2) or booty_call['danger_day'] = 1:
+						'"You won''t come inside me, will you?" you ask.'
 						'"Don''t worry, I won''t."'
 						*nl
 						'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
+					elseif booty_call['condom'] > 0 and booty_call['npc_condom_insist'] = 1:
+						'"Don''t worry," <<$npc_firstname[$boy]>> whispers. "I won''t come inside you."'
+						*nl
+						'You gasp as without further warning, <<$npc_firstname[$boy]>> lifts your leg and pushes his cock inside you.'
 					else
 						'You look at him and your expression says everything he needs to know. Without another word, he lifts your leg and pushes his cock inside you.'
 					end
@@ -868,7 +897,7 @@ if $ARGS[0] = 'after_shower_creampie_surprise':
 				'"Imbecile!" you shout again, storming out of the shower, not caring that you''re dripping wet. You make your way over to his bedroom and pick up your clothes, throwing them on.'
 				'"Wait!" <<$npc_firstname[$boy]>> protests, clumsily wrapping a towel around his waist and following you.'
 				'"I''m not waiting for shit!" you sneer. The moment the last item of clothing is over your wet skin, you stomp out the door, slamming it behind you.'
-				act'Leave':gt 'booty_call_after', 'exit'
+				act'Leave':gt 'booty_call_leave', 'exit'
 			end
 			
 			act'Forgive him (my fault)':
@@ -971,7 +1000,7 @@ if $ARGS[0] = 'after_shower_creampie':
 		*nl
 		'Eventually, his orgasm fades and his cock slips from inside you and a hot dribble of liquid runs down your leg.'
 		*nl
-		if booty_call['condom'] > 0 or npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2 or npc_know_not_bc[$boy] = 1:
+		if ((booty_call['condom'] > 0 and booty_call['npc_condom_insist'] ! 1) or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2)) and booty_call['creampie_allowance'] = 0:
 			'"I thought..." <<$npc_firstname[$boy]>> pants. "You didn''t want me... to come inside you..."'
 			act'Changed my mind':
 				if npc_boyfriend_creampie_rule[$boy] > 0: npc_boyfriend_creampie_rule[$boy] = 0
@@ -1206,7 +1235,7 @@ if $ARGS[0] = 'morning_look1':
 		'"Thanks," you smile, casually walking past him and closing the door behind you.'
 		act'Take a shower':gt'booty_call_morning', 'shower2'
 	end
-	act'Join <<$npc_firstname[$boy]>> in the shower':gt'booty_call_morning', 'shower'
+	act'Join <<$npc_firstname[$boy]>> in the shower':gt'booty_call_shower', 'morning_shower_join1'
 end
 
 if $ARGS[0] = 'morning_shower_join1':
@@ -1283,8 +1312,7 @@ if $ARGS[0] = 'morning_together1':
 					'"Yeah, and now I''m done. Keep it in your pants."'
 					'"Fine, fine." He backs off, as you asked.'
 				end
-				act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
-				act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
+				gs 'booty_call_shower', 'morning_shower_together_end'
 			end
 
 			act'I don''t have time':
@@ -1299,8 +1327,7 @@ if $ARGS[0] = 'morning_together1':
 					'"Fine, fine."'
 					'He backs off as you asked.'
 				end
-				act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
-				act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
+				gs 'booty_call_shower', 'morning_shower_together_end'
 			end
 		end
 
@@ -1329,8 +1356,7 @@ if $ARGS[0] = 'morning_together1':
 								'"No," you say firmly. "I''m saving my virginity."'
 							end
 							'<<$npc_firstname[$boy]>> seems disappointed, but accepts anyways. He does continue to fondle your breasts until you finish up though.'
-							act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
-							act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
+							gs 'booty_call_shower', 'morning_shower_together_end'
 						end
 					else
 						'"Come on... We could keep going..."'
@@ -1338,8 +1364,7 @@ if $ARGS[0] = 'morning_together1':
 							cla & *nl
 							'"No thanks, I got enough earlier."'
 							'<<$npc_firstname[$boy]>> seems disappointed, but accepts anyways. He does continue to fondle your breasts until you finish up though.'
-							act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
-							act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
+							gs 'booty_call_shower', 'morning_shower_together_end'
 						end
 					end
 					act'Mutual masturbation':
@@ -1396,8 +1421,7 @@ if $ARGS[0] = 'morning_together_sex1':
 		'You stay in the shower with <<$npc_firstname[$boy]>> a while longer, allowing him to keep playing with your breasts and fondling your body, but don''t let it progress any further until the water shuts off.'
 		*nl
 		'He doesn''t seem put off by it at all.'
-		act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
-		act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
+		gs 'booty_call_shower', 'morning_shower_together_end'
 	end
 	act'Jerk him off':gt'booty_call_shower', 'morning_jerkoff1'
 	
@@ -1543,7 +1567,7 @@ if $ARGS[0] = 'morning_shower_creampie_surprise':
 				'"Imbecile!" you shout again, storming out of the shower, not caring that you''re dripping wet. You make your way over to his bedroom and pick up your clothes, throwing them on.'
 				'"Wait!" <<$npc_firstname[$boy]>> protests, clumsily wrapping a towel around his waist and following you.'
 				'"I''m not waiting for shit!" you sneer. The moment the last item of clothing is over your wet skin, you stomp out the door, slamming it behind you.'
-				act'Leave':gt 'booty_call_after', 'exit'
+				act'Leave':gt 'booty_call_leave', 'exit'
 			end
 			
 			act'Forgive him (my fault)':
@@ -1584,11 +1608,15 @@ if $ARGS[0] = 'morning_shower_creampie_surprise':
 			gs'booty_call_shower', 'morning_sex_end'
 		end
 		
-		if booty_call['condom'] > 0:
+		if booty_call['condom'] > 0 or booty_call['npc_condom_insist'] = 1:
 			act'Tease him':
 				cla & *clr
 				'<center><video autoplay loop src="images/shared/sex/shower/after1.mp4"></video></center>'
-				'"What happened to ''Don''t worry, I won''t''?" you ask, a smirk twitching at your lips as he pulls away, feeling something hot dribble down your leg.'
+				if booty_call['npc_condom_insist'] = 1:
+					'"What happened to ''Don''t worry, I won''t come inside you''?" you ask, a smirk twitching at your lips as he pulls away, feeling something hot dribble down your leg.'
+				else
+					'"What happened to ''Don''t worry, I won''t''?" you ask, a smirk twitching at your lips as he pulls away, feeling something hot dribble down your leg.'
+				end
 				'"Sorry," he blushes. "I, uhh... I overestimated myself... I guess you need another shower, huh?"'
 				gs'booty_call_shower', 'morning_sex_end'
 			end
@@ -1647,7 +1675,7 @@ if $ARGS[0] = 'morning_shower_creampie':
 		*nl
 		'Eventually, his orgasm fades and his cock slips from inside you and a hot dribble of liquid runs down your leg.'
 		*nl
-		if booty_call['condom'] > 0 or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2) or npc_know_not_bc[$boy] = 1:
+		if npc_creampie_okay[$boy] = 0 and booty_call['creampie_allowance'] = 0 and booty_call['no_creampies_today'] ! 1 and (booty_call['condom'] > 0 or (npc_boyfriend_creampie_rule[$boy] > 0 and npc_boyfriend_creampie_rule[$boy] <= 2)):
 			'"I thought..." <<$npc_firstname[$boy]>> pants. "You didn''t want me... to come inside you..."'
 			act'Changed my mind':
 				if npc_boyfriend_creampie_rule[$boy] > 0: npc_boyfriend_creampie_rule[$boy] = 0
@@ -1743,13 +1771,20 @@ if $ARGS[0] = 'morning_shower_fuck_jerkoff_end':
 	gs'booty_call_shower', 'morning_sex_end'
 end
 
-if $ARGS[0] = 'morning_sex_end':
-	booty_call['npc_morning_shower'] = 2
+if $ARGS[0] = 'morning_shower_together_end':
+	noShampoo = 1
+	dynamic $showerdin
 	act'Finish up':
 		cla
 		act'Put on a towel':gt'booty_call_shower', 'morning_towel_on'
+		act'Wrap it around your head':gt'booty_call_shower', 'morning_towel_head'
 		act'Skip the towel':gt'booty_call_shower', 'morning_towel_skip'
 	end
+end
+
+if $ARGS[0] = 'morning_sex_end':
+	booty_call['npc_morning_shower'] = 2
+	gs 'booty_call_shower', 'morning_shower_together_end'
 	if booty_call['morning_fuck'] = 0:
 		if booty_call['morning_shower_cum'] = 1:
 			act'Round 2 in the bed?':
@@ -1773,7 +1808,18 @@ if $ARGS[0] = 'morning_towel_on':
 	cla & *clr
 	booty_call['towel'] = 1
 	'<center><img <<$set_imgh>> src="images/shared/romance/lovers/misc/towel.jpg"></center>'
-	'You borrow a towel from <<$npc_firstname[$boy]>>''s cupboard and dry off with it before wrapping it around your chest and exit into the bedroom with him.'
+	'You pull a towel from the cupboard and dry off with it before wrapping it around your chest before exiting the bathroom and back into the bedroom.'
+	act'Continue':gs'booty_call_morning', 'wakeup2'
+end
+
+if $ARGS[0] = 'morning_towel_head':
+	cla & *clr
+	booty_call['towel'] = 1
+	booty_call['towel_head'] = 1
+	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/towel_head1.jpg"></center>'
+	'You pull a towel from the cupboard and dry your body with it, only pausing to wrapping it around your hair before opening the door. Upon stepping out of the bathroom, <<$npc_firstname[$boy]>> eyes light up at the sight of your body, completely naked except for the towel turban atop your head.'
+	*nl
+	'"Thanks," you smile at him.'
 	act'Continue':gs'booty_call_morning', 'wakeup2'
 end
 

locations/booty_call_start.qsrc

@@ -63,18 +63,18 @@ end
 if $ARGS[0] = 'initiate':
 	gs 'boystat', $ARGS[1]
 	
-	if booty_call_invite[$boy] = daystart and npc_last_sex[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart:
+	if (booty_call_invite[$boy] = daystart or npc_booty_call[$boy] = daystart or npc_booty_call_date[$boy] = daystart) and npc_last_booty_call[$boy] ! daystart:
 		gt 'booty_call_start', 'invited_start'
-	elseif npc_start_free_time[$boy] > hour and hour < npc_end_free_time[$boy] and npc_last_sex[$boy] ! daystart  and npc_no_booty_call[$boy] ! daystart:
+	elseif npc_start_free_time[$boy] >= hour and hour <= npc_end_free_time[$boy] and npc_last_booty_call[$boy] ! daystart and npc_no_booty_call[$boy] ! daystart:
 		gt 'booty_call_start', 'uninvited_start'
 	else
 		gs 'booty_call_start', 'neighborhood_image'
 		'You knock on <<$npc_firstname[$boy]>>''s door but there is no answer.'
 		act'Leave':gt $loc
 	end
+	
 end
 
-
 if $ARGS[0] = 'begin':
 	$location_type = 'event'
 	gs 'themes', 'indoors'
@@ -85,6 +85,7 @@ if $ARGS[0] = 'begin':
 	end
 	gs 'booty_call_stats', 'starting_stats'
 	gs 'booty_call_stats', 'npc_update'
+	npc_last_booty_call[$boy] = daystart
 end
 	
 if $ARGS[0] = 'uninvited_start':
@@ -94,14 +95,22 @@ if $ARGS[0] = 'uninvited_start':
 	act'I was in the neighborhood':
 		cla & *nl
 		'"Hey," you smile at <<$npc_firstname[$boy]>> who blinks in surprise. "I was in the neighborhood and I started thinking about you, wondering if you wanted to fool around some...?"'
-		'"You couldn''t have called first?"'
-		'You shrug.'
-		'"Wanted to surprise you. So am I coming in or what?"'
+		if npc_booty_call[$boy] = daystart:
+			'"I was just about to text you," he grins.'
+			'So am I coming in or what?" you grin back.'
+		else
+			'"You couldn''t have called first?"'
+			'You shrug.'
+			'"Wanted to surprise you. So am I coming in or what?"'
+		end
+		
 		if rand(1,10) < npc_sexdrive[$boy]:
 			if npc_humor[$boy] = 2 and npc_cum_pref[$boy] = 'creampie':
 				'"I''m the only one who''s gonna be coming inside," he says, leering at your ass as he steps aside to let you in.'
 			elseif npc_humor[$boy] = 2 and npc_cum_pref[$boy] = 'mouth':
 				'"I''m the only one who''s gonna be coming inside," he says, leering at your ass as he steps aside to let you in. "In your mouth that is."'
+			elseif npc_booty_call[$boy] = daystart:
+				'"As long as those clothes are coming off in the next 10 seconds," he says, leering at your ass as he steps aside to let you in.'
 			else
 				'"Well I won''t say no to a free fuck," he smirks, stepping aside to let you in and leering at your ass as you walk past.'
 			end
@@ -113,9 +122,9 @@ if $ARGS[0] = 'uninvited_start':
 	
 	act'Surprise!':
 		cla & *nl
-		'"Surprise!" you shout gleefully at a startled <<$npc_firstname[$boy]>>. "Just happened to be walking by and I thought I might drop in, see if you wanted to fool around?" You grin at him, bouncing your eyebrows suggestively.'
-		'"Well I won''t say no if that''s what you want," he smirks, stepping aside to let you in and leering at your ass as you walk past.'
 		if rand(1,10) < npc_sexdrive[$boy]:
+			'"Surprise!" you shout gleefully at a startled <<$npc_firstname[$boy]>>. "Just happened to be walking by and I thought I might drop in, see if you wanted to fool around?" You grin at him, bouncing your eyebrows suggestively.'
+			'"Well I won''t say no if that''s what you want," he smirks, stepping aside to let you in and leering at your ass as you walk past.'
 			act'Go to the bedroom':gt 'booty_call_start', 'undress'
 		else
 			gs 'booty_call_start', 'uninvited_deny'
@@ -124,10 +133,10 @@ if $ARGS[0] = 'uninvited_start':
 	
 	act'I need a good fuck':
 		cla & *nl
-		'<<$npc_firstname[$boy]>> stands there startled as you step forward, putting your hand on his chest.'
-		'"I need a good fuck and I need it right now," you say.'
-		'A moment passes with you staring into his eyes with a smouldering gaze before he drags you inside, slamming the door behind you.'
 		if rand(1,10) < npc_sexdrive[$boy]:
+			'<<$npc_firstname[$boy]>> stands there startled as you step forward, putting your hand on his chest.'
+			'"I need a good fuck and I need it right now," you say.'
+			'A moment passes with you staring into his eyes with a smouldering gaze before he drags you inside, slamming the door behind you.'
 			act'Go to the bedroom':gt 'booty_call_start', 'undress'
 		else
 			gs 'booty_call_start', 'uninvited_deny'
@@ -414,12 +423,12 @@ end
 if $ARGS[0] = 'generous_initiative':
 	*nl
 	!! cunnilingus or nipple play
-	if rand(0,1) = 1 or npc_pussyeater[$boy] = 1:
+	if (rand(0,1) = 1 or npc_pussyeater[$boy] = 1) and booty_call['sensitive_cuni'] ! 1:
 		!! cunnilingus
 		if booty_call['start_shower'] = 1:
 			'<<$npc_firstname[$boy]>> drags you into his bedroom, your hair still wet from the shower, and shoves you backwards onto the bed kneeling between your legs.'
 		else
-			'As soon as the last of it is gone, <<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and kneels between your legs.'
+			'<<$npc_firstname[$boy]>> shoves you backwards onto onto the bed begins laying a trail of kisses, heading down between your legs.'
 		end
 		gs 'booty_call_start', 'kuni_start'
 	else
@@ -427,7 +436,7 @@ if $ARGS[0] = 'generous_initiative':
 		if booty_call['start_shower'] = 1:
 			'<<$npc_firstname[$boy]>> drags you into his bedroom and shoves you backwards onto onto the bed, starting a trail of kisses up your wet stomach, towards your breasts.'
 		else
-			'As soon as the last of it is gone, <<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and begins leaving a new trail of kisses up your stomach, towards your breasts.'
+			'<<$npc_firstname[$boy]>> shoves you backwards onto onto the bed and begins leaving a new trail of kisses up your stomach, towards your breasts.'
 		end
 		act'Continue':gs 'booty_call_start', 'nipple_play'
 	end
@@ -600,6 +609,7 @@ if $ARGS[0] = 'kuni_start':
 				if booty_call['cuni_orgasm'] >= 3:
 					act'Too sensitive':
 						cla & *nl
+						booty_call['sensitive_cuni'] = 1
 						'"You''ve eaten me out too many times today already," you say with a wry smile. "My pussy is too sensitive to let you down there again."'
 						'"Oh. Well..." <<$npc_firstname[$boy]>> smirks back at you smugly.'
 						gs 'booty_call_start', 'cuni_alternatives'
@@ -634,9 +644,9 @@ if $ARGS[0] = 'cuni_alternatives':
 		'"That could be nice," he smiles, leaning back.'
 		gs 'booty_call_start', 'bj_dom1'
 	end
-	if stat['think_virgin'] = 1:
+	if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
 		act'You can take my virginity':gt'booty_call_virgin', 'start2'
-	else
+	elseif booty_call['fuck_count'] = 0:
 		act'We could just skip to fucking?':
 			cla & *nl
 			'"We could just get right to fucking?"'
@@ -645,6 +655,15 @@ if $ARGS[0] = 'cuni_alternatives':
 			gs 'booty_call_condoms', 'condoms'
 			gs 'booty_call_sex', 'position_change'
 		end
+	else
+		act'We could fuck again?':
+			cla & *nl
+			'"How about you just fuck me again?" you ask'
+			'"That sounds good."'
+			booty_call['position_choose'] = 1
+			gs 'booty_call_condoms', 'condoms'
+			gs 'booty_call_sex', 'position_change'
+		end
 	end
 end
 
@@ -777,7 +796,7 @@ if $ARGS[0] = 'pussy_lick_loop':
 	if booty_call['consecutive_cuni_orgasm'] = 0:
 		'But <<$npc_firstname[$boy]>> is relentless. Even as your climax winds down, he doesn''t stop, continuing to eat you out.'
 	end
-	if booty_call['cuni_orgasm'] < 5:
+	if booty_call['consecutive_cuni_orgasm'] < 4:
 		act'Come again':
 			cla & *clr
 			pcs_horny = 90
@@ -807,13 +826,14 @@ if $ARGS[0] = 'pussy_lick_loop':
 				cla & *clr
 				!! IMAGE HERE
 				'He tries to dive right back in but you put your hand on his head and push him away from your pussy.'
-				'"Wait, stop!" He looks up at you with curiousity.'
+				'"Wait, stop!" He looks up at you with curiosity.'
 				'"This isn''t the only thing I want to do today," you say.'
 				gs 'booty_call_sex', 'sex_start'
 			end
 		end
 	end
 	gs 'booty_call_start', 'cuni_too_sensitive'
+	gs 'booty_call_sex', 'sex_start'
 end
 
 if $ARGS[0] = 'cuni_too_sensitive':
@@ -853,13 +873,13 @@ if $ARGS[0] = 'nipple_play':
 	'<<$npc_firstname[$boy]>> leans forward, grabbing ahold of your breasts with his hands and uses his mouth on your nipples. He sucks them up, flicks at the tips with his tongue, sending electricity flying through them. Heat spreads through your hips and you can feel wetness pooling between your thighs.'
 	act'Continue':
 		cla & *nl
-		if rand(0,1) = 1 and kuni_no[$boy] ! 1 and (mesec = 0 or npc_pussyeater_know[$boy] = 1):
+		if rand(0,1) = 1 and kuni_no[$boy] ! 1 and (mesec = 0 or npc_pussyeater_know[$boy] = 1) and booty_call['sensitive_cuni'] ! 1:
 			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, beginning to move between your legs to eat you out.'
 			gs 'booty_call_start', 'kuni_start'
 		else
 			booty_call['position_choose'] = 1
 			'After a few minutes, <<$npc_firstname[$boy]>> pulls back from your chest and pushes you down, climbing on top of you with his rock hard cock between your legs.'
-			if stat['think_virgin'] = 1:
+			if stat['think_virgin'] = 1 and booty_call['fuck_count'] = 0:
 				act'Stop him (virgin)':gt'booty_call_virgin', 'wait'
 				act'Let him take your virginity':gs'booty_call_virgin', 'start3'
 			else
@@ -945,6 +965,7 @@ if $ARGS[0] = 'bj_sub1':
 	booty_call['bj_count'] += 1
 	gs'arousal', 'bj',rand(2,7),'no_orgasm_msg'
 	gs'stat'
+	cla & *clr
 	if booty_call['reluctant_bj'] = 1:
 		'<center><video autoplay loop src="images/shared/sex/blowjob/bj46.mp4"></video></center>'
 		'You grumble internally but get to work anyway, spending a few minutes bobbing your head up and down on his cock. You weren''t really in the mood to begin with, so you get bored quickly, but hopefully he''ll want to do something else soon.'
@@ -953,24 +974,7 @@ if $ARGS[0] = 'bj_sub1':
 		'You lean forward and take him in your mouth, gently sucking his cock and bobbing your head up and down on it. You take pride in your work, doing your best to make <<$npc_firstname[$boy]>> feel good.'
 	end
 	*nl
-	booty_call['bj_cum_choice'] = rand(1,20)
-	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_lets_fuck'
-	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	elseif booty_call['bj_cum_choice'] > 8:
-		gs 'booty_call_start', 'bj_sub_cum_mouth1'
-	elseif booty_call['bj_cum_choice'] > 6:
-		gs 'booty_call_start', 'bj_sub_cum_face1'
-	elseif booty_call['bj_cum_choice'] > 4:
-		gs 'booty_call_start', 'bj_sub_cum_tits1'
-	elseif booty_call['bj_cum_choice'] > 2  and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_cum_wait'
-	elseif booty_call['fuck_count'] > 0:
-		gs 'booty_call_start', 'bj_sub_cum_surprise'
-	else
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	end
+	gs 'booty_call_start', 'bj_cum_sort'
 end
 
 if $ARGS[0] = 'bj_sub2':
@@ -980,24 +984,7 @@ if $ARGS[0] = 'bj_sub2':
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj52.mp4"></video></center>'
 	'<<$npc_firstname[$boy]>> slowly pumps his cock in and out of your mouth, plunging it all the way down your throat where you can feel it press against your windpipe. You keep it loose while he does all the work, occasionally letting your tongue snake out for a cheekly lick, but otherwise just let <<$npc_firstname[$boy]>> keep fucking your face.'
 	*nl
-	booty_call['bj_cum_choice'] = rand(1,20)
-	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_lets_fuck'
-	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	elseif booty_call['bj_cum_choice'] > 8:
-		gs 'booty_call_start', 'bj_sub_cum_mouth1'
-	elseif booty_call['bj_cum_choice'] > 6:
-		gs 'booty_call_start', 'bj_sub_cum_face1'
-	elseif booty_call['bj_cum_choice'] > 4:
-		gs 'booty_call_start', 'bj_sub_cum_tits1'
-	elseif booty_call['bj_cum_choice'] > 2  and booty_call['not_today'] = 0:
-		gs 'booty_call_start', 'bj_sub_cum_wait'
-	elseif booty_call['fuck_count'] > 0:
-		gs 'booty_call_start', 'bj_sub_cum_surprise'
-	else
-		gs 'booty_call_start', 'bj_sub_cum_warn'
-	end
+	gs 'booty_call_start', 'bj_cum_sort'
 end
 
 if $ARGS[0] = 'bj_sub_cum_surprise':
@@ -1015,6 +1002,7 @@ if $ARGS[0] = 'bj_sub_cum_surprise':
 			booty_call['bj_cum'] = 1
 			booty_call['swallow'] = 1
 			gs 'cum_call', 'mouth_swallow', $boy, 1
+			booty_call['cum_count'] += 1
 			gs 'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
@@ -1028,6 +1016,7 @@ if $ARGS[0] = 'bj_sub_cum_surprise':
 			booty_call['bj_cum'] = 2
 			booty_call['spit'] = 1
 			gs 'cum_call', 'mouth', $boy, 1
+			booty_call['cum_count'] += 1
 			gs 'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit6.mp4"></video></center>'
@@ -1040,6 +1029,7 @@ if $ARGS[0] = 'bj_sub_cum_surprise':
 			cla & *clr
 			booty_call['bj_cum'] = 4
 			booty_call['gag'] = 1
+			booty_call['cum_count'] += 1
 			gs 'cum_call', 'mouth', $boy, 1
 			gs 'stat'
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit3.mp4"></video></center>'
@@ -1086,13 +1076,15 @@ if $ARGS[0] = 'bj_sub_cum_surprise':
 end
 
 if $ARGS[0] = 'bj_sub_cum_mouth1':
+	booty_call['he_ask_mouth'] = 1
+	$booty_call['cum_choice'] = 'mouth'
 	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
 	'"I''m gonna- <i>nngh-!</i> Can I cum in your mouth?"'
 	act'Why?':
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/blowjob/play1.mp4"></video></center>'
 		'You let his cock pop out of your mouth for a moment, giving him a quizzical look.'
-		'"And, why would I let you do that?" you ask, continuing to play with his cock with a smattering of kisses, licks, and gentle sucks.'
+		'"And, why would I let you do that?" you ask, continuing to keeping him on the edge with a smattering of kisses, licks, and gentle sucks.'
 		if npc_selfish[$boy] = 1:
 			'"Because I want you to," he responds simply, like that''s the only reason you should ever need.'
 			act'No thanks':
@@ -1115,7 +1107,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth1':
 				gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 				gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 			end
-
+			
 		else
 			if rand(0,1) = 1:
 				'"Oh. Well I just... I thought... uhh... Sorry. It''s a dumb idea isn''t it?"'
@@ -1126,8 +1118,8 @@ if $ARGS[0] = 'bj_sub_cum_mouth1':
 
 		act'Couldn''t hurt':
 			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
-			'"Well, it couldn''t hurt I suppose..." you smile, lowering your lips back down to his cock and giving a mighty suck. He blows his load moments later.'
+			'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
+			'"Well, it couldn''t hurt I suppose..." you smile and plunge your lips all the way down to the base of <<$npc_firstname[$boy]>>''s shaft. He blows his load moments later.'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 		end
@@ -1135,13 +1127,13 @@ if $ARGS[0] = 'bj_sub_cum_mouth1':
 		act'Just wondered (let him)':
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
-			'"Just wondered if you actually had a reason," you smile. With that, you give him a few sudden and furious jerks before plunging your head all the way to the base of his cock. Not even a second later, you feel him explode inside your mouth.'
+			'"Just wondered if you actually had a reason," you smile. With that, you give him a few sudden and furious jerks before plunging your head all the way to the base of <<$npc_firstname[$boy]>>''s cock. A moment later, he exploded inside your mouth.'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 			gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 		end
 
 		gs 'booty_call_start', 'bj_sub_cum_face3'
-		act'How about my tits intstead?':
+		act'How about my tits instead?':
 			cla & *nl
 			'"How about I let you cum on my tits instead?" you smile enticingly.'
 			'"That sounds like it it would be pretty hot," he says and you scooch forward, presenting your chest for him.'
@@ -1183,16 +1175,17 @@ if $ARGS[0] = 'bj_sub_cum_mouth2':
 	act'Make him come in your mouth':
 		booty_call['cum_mouth'] = 1
 		booty_call['swallow'] = 1
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'mouth_swallow', $boy, 1
 		$booty_call['cum_choice'] = 'swallow'
 		$booty_call['last_cum'] = 'mouth'
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep1.mp4"></video></center>'
-		'With a mischievous grin, you work his cock with your hand, building up his climax right to the brink. You can tell just by the expression on his face and the swelling of flesh in your hand that he''s about to blow. At that moment, you plunge your lips straight down to the base of his cock, right as he explodes inside your mouth.'
+		'With a mischievous grin, you work his cock with your hand, building up his climax right to the edge. You can tell just by the expression on his face and the swelling of flesh in your hand that he''s about to blow. At that moment, you plunge your lips straight down to the base of his cock, right as he explodes inside your mouth.'
 		gs 'booty_call_reactions', 'bj_warning_thanks'
 		gs 'booty_call_reactions', 'bj_tasty'
-		gs 'booty_call_start', 'bj_swallow_gross'
+		gs 'booty_call_reactions', 'bj_swallow_gross'
 		gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 !!		gs 'booty_call_start', 'bj_sub_cum_mouth_swallow'
 !!		gs 'booty_call_start', 'bj_sub_cum_mouth_yuck1'
@@ -1204,7 +1197,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth_spit':
 		booty_call['cum_mouth'] = 1
 		booty_call['spit'] = 1
 		booty_call['swallow'] = 0
-		$booty_call['cum_choice'] = 'mouth'
+		booty_call['cum_count'] += 1
 		$booty_call['last_cum'] = 'mouth'
 		gs 'cum_call', 'mouth', $boy, 1
 		gs 'stat'
@@ -1218,6 +1211,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth_spit':
 		if booty_call['cum_mouth_surprise'] = 1:
 			gs 'booty_call_reactions', 'bj_already'
 		end
+		gs 'booty_call_reactions', 'bj_spit_gross'
 	end
 end
 
@@ -1225,6 +1219,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth_gag':
 	act'Let him (and gag)':
 		booty_call['cum_mouth'] = 1
 		booty_call['gag'] = 1
+		booty_call['cum_count'] += 1
 		$booty_call['cum_choice'] = 'mouth'
 		$booty_call['last_cum'] = 'mouth'
 		gs 'cum_call', 'mouth', $boy, 1
@@ -1243,6 +1238,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth_swallow':
 		booty_call['cum_swallow'] += 1
 		$booty_call['last_cum'] = 'mouth'
 		booty_call['swallow'] = 1
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1258,6 +1254,7 @@ if $ARGS[0] = 'bj_sub_cum_mouth_swallow':
 		$booty_call['last_cum'] = 'mouth'
 		booty_call['swallow'] = 1
 		booty_call['react'] = 1
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1265,48 +1262,22 @@ if $ARGS[0] = 'bj_sub_cum_mouth_swallow':
 		'Thick, salty sperm sprays into your mouth and you can''t help but feel just a little bit nauseous even as you continue to suck out more cum from <<$npc_firstname[$boy]>>''s cock. But you power through regardless, and with a grimace of deep disgust, you force it down, swallowing the entire load.'
 		*nl
 		if booty_call['cum_swallow'] > 1:
-			'"Yeech!" you wince. "I''m never going to get used to that!"'
+			'"<i>Yeech</i>!" you wince. "I''m never going to get used to that!"'
 			'"But you still keep doing it anyway," <<$npc_firstname[$boy]>> smirks.'
 			'"Yeah, yeah, shut up," you say, rolling your eyes and sticking out your tongue, trying to air it out.'
 			gs 'booty_call_sex', 'sex_end'
 		else
-			'"Blech!" you shudder. "That''s awful!"'
-			if booty_call['bj_cum_choice'] > 6 and booty_call['bj_cum_choice'] <= 8:
+			'"<i>Blech</i>!" you shudder. "That''s awful!"'
+			if $booty_call['cum_choice'] = 'face':
 				'"If you hate swallowing so much, then why didn''t you just let me cum on your face like I wanted to?" <<$npc_firstname[$boy]>> asks quizzically.'
 				gs 'booty_call_reactions', 'cum_mouth_swallow_why'
-			elseif booty_call['bj_cum_choice'] > 4 and booty_call['bj_cum_choice'] <= 8:
+			elseif $booty_call['cum_choice'] = 'tits':
 				'"If you hate swallowing so much, then why didn''t you just let me cum on your tits?" <<$npc_firstname[$boy]>> asks quizzically.'
 				gs 'booty_call_reactions', 'cum_mouth_swallow_why'
 			else
 				'"Then why''d you do it?" <<$npc_firstname[$boy]>> asks, a dumbfounded look on his face.'
 				gs 'booty_call_reactions', 'cum_mouth_swallow_why'
-
-				act'Cause boys like it':
-					cla & *clr
-					$npc_apt_bedroom[$boy]
-					'"Cause boys seem to like it," you wince, airing out your tongue, trying to dissipate the taste. "I don''t want to be a shitty lay. Sometimes that means doing stuff you don''t like."'
-					'"Well it <i>was</i> pretty hot," <<$npc_firstname[$boy]>> grins at you.'
-					'"Why?!" you ask. "Why do you idiots with dicks want girls to swallow this vile stuff?"'
-					'He chuckles at you while you continue to gag for a little while longer, trying to get past your disgust.'
-					gs 'booty_call_sex', 'sex_end'
-				end
-				if booty_call['bj_cum_choice'] > 8:
-					act'Cause I like you':
-						cla & *clr
-						$npc_apt_bedroom[$boy]
-						'"Because I like you," you say, a look of betrayal on your face. "And I wanted to do something nice for you. I''m severely regretting it now. I don''t want to like you anymore, this was a mistake."'
-						'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, hoping it will somehow make the taste go away.'
-						gs 'booty_call_sex', 'sex_end'
-					end
-
-					act'Because you asked':
-						cla & *clr
-						$npc_apt_bedroom[$boy]
-						'"Because you asked me to," you say, giving him an accusatory look. "That makes this your fault. <i>Bleeechhh...</i>"'
-						'<<$npc_firstname[$boy]>> laughs wholeheartedly as you fan your mouth, hoping it will somehow make the taste go away.'
-						gs 'booty_call_sex', 'sex_end'
-					end
-				end
+				gs 'booty_call_reactions', 'bj_swallow_gross2'
 			end
 		end
 	end
@@ -1314,6 +1285,8 @@ end
 
 if $ARGS[0] = 'bj_sub_cum_face1':
 	!! asks to come on face
+	booty_call['he_ask_facial'] = 1
+	$booty_call['cum_choice'] = 'face'
 	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
 	'"<i>nngh-!</i> <<$pcs_nickname>>-! Can I come on your face? You''d look so hot."'
 	act'No way':
@@ -1326,7 +1299,7 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 
 		act'How about my mouth instead?':
 			cla & *nl
-			'"How about my mouth instead?" you smile. "Don''t you want to just pump it straight down my throat instead?"'
+			'"How about my mouth?" you smile. "Don''t you want to just pump it straight down my throat instead?"'
 			'<<$npc_firstname[$boy]>>''s face turns to a hungry expression. "Well, when you put it like that..."'
 			gs 'booty_call_start', 'bj_sub_cum_mouth2'
 		end
@@ -1335,6 +1308,7 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 	act'Let him (gross)':
 		booty_call['cum_face'] = 1
 		$booty_call['last_cum'] = 'facial'
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'face', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1345,13 +1319,14 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		'"Ugh! That''s fucking disgusting!" you whine. "I can''t believe I let you talk me into this."'
 		'"You look great though." You can''t see him with the cum gluing your eyelids shut, but you''re pretty sure he''s wearing a grin you would slap him for.'
 		!! add reactions later?
-		gs 'booty_call_after', 'wipe_face'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_face'
 	end
 
 	act'Let him (passive)':
 		booty_call['cum_face'] = 1
 		$booty_call['last_cum'] = 'facial'
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'face', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1363,8 +1338,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		'"Happy?" you ask.'
 		'"You have no idea how fucking hot you look right now."'
 		!! add reactions later?
-		gs 'booty_call_after', 'wipe_face'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_face'
 	end
 
 	act'Stick our your tongue (swallow)':
@@ -1372,6 +1347,7 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		booty_call['cum_swallow'] += 1
 		$booty_call['last_cum'] = 'face_mouth'
 		booty_call['swallow'] = 1
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'face', $boy, 1
 		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
@@ -1389,8 +1365,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 			'Gathering it to the back of your throat, you let his cum pool there for a moment before swallowing the whole thing in a mighty gulp. You look up at <<$npc_firstname[$boy]>> with cum glazed cheeks and smile at him.'
 			'"You''re so fucking hot."'
 			'"Yeah, I know," you grin back.'
-			gs 'booty_call_after', 'wipe_face'
 			gs 'booty_call_sex', 'sex_end'
+			gs 'booty_call_after', 'wipe_face'
 		end
 	end
 
@@ -1398,6 +1374,7 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		booty_call['cum_face'] = 1
 		$booty_call['last_cum'] = 'face_mouth'
 		booty_call['spit'] = 1
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'face', $boy, 1
 		gs 'cum_call', 'hair', $boy, 1
 		gs 'cum_call', 'mouth', $boy, 1
@@ -1411,8 +1388,8 @@ if $ARGS[0] = 'bj_sub_cum_face1':
 		'"Happy?" you ask.'
 		'"You have no idea how fucking hot you look right now."'
 		!! add reactions later?
-		gs 'booty_call_after', 'wipe_face'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_face'
 	end
 end
 
@@ -1423,76 +1400,31 @@ end
 
 if $ARGS[0] = 'bj_sub_cum_face3':
 	!! player choosing to do it
-	act'How about my face instead?':
-		booty_call['cum_count'] += 1
+	if booty_call['he_ask_mouth'] = 1:
+		$booty_call['act_desc'] = 'How about my face instead?'
+		$booty_call['cum_desc'] = 'How about you just come on my face instead?'
+	else
+		$booty_call['act_desc'] = 'Wanna come on my face?'
+		$booty_call['cum_desc'] = 'Wanna come on my face?'
+	end
+	act'<<$booty_call[''act_desc'']>>':
 		cla & *clr
 		$npc_apt_bedroom[$boy]
-		
-		'"How about you just cum on my face instead?" you ask pulling back. '
-		'In response, <<$npc_firstname[$boy]>> scooches forwards and grabs hold of his member, pointing at your face. You''ll take that as a yes.'
-		act'Close your eyes':
-			booty_call['cum_face'] = 1
-			$booty_call['last_cum'] = 'facial'
-			gs 'cum_call', 'face', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial0,3.mp4"></video></center>'
-			'You let him position himself over you and close your eyes. Moments later warm fluid spatters across your face and within seconds, your face is covered in <<$npc_firstname[$boy]>>''s cum. After a little bit to make sure <<$npc_firstname[$boy]>>''s finished, you crack an eye and look up at him.'
-			*nl
-			'"How do I look?" you grin.'
-			'"Fucking hot."'
-			'"I thought so." You give him a wink.'
-			!! add reactions later?
-			gs 'booty_call_after', 'wipe_face'
-			gs 'booty_call_sex', 'sex_end'
-		end
-
-		act'Stick our your tongue (swallow)':
-			booty_call['cum_face'] = 1
-			booty_call['cum_swallow'] += 1
-			$booty_call['last_cum'] = 'face_mouth'
-			gs 'cum_call', 'face', $boy, 1
-			gs 'cum_call', 'mouth_swallow', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial25.mp4"></video></center>'
-			'As <<$npc_firstname[$boy]>> works his cock in front of you, you kneel before him, opening your mouth and sticking out your tongue.'
-			*nl
-			'"Ahhhhh~!"'
-			*nl
-			'The first shot goes directly into your mouth and the next spatters across your cheek. <<$npc_firstname[$boy]>> aims carefully, trying to get just as much cum on your face as he can in your mouth, but soon he runs out of steam, shaking the last drips of his load onto the tip of your tongue.'
-			act'Gulp':
-				cla & *clr
-				'<center><video autoplay loop src="images/shared/sex/cum/facial/facial26.mp4"></video></center>'
-				'Gathering it to the back of your throat, you let his cum pool there for a moment before swallowing the whole thing in a mighty gulp. You look up at <<$npc_firstname[$boy]>> with cum glazed cheeks and smile at him.'
-				gs 'booty_call_after', 'wipe_face'
-				gs 'booty_call_sex', 'sex_end'
-				gs 'booty_call_reactions', 'swallow_react1'
-
-			end
-		end
-
-		act'Stick our your tongue (spit)':
-			booty_call['cum_face'] = 1
-			$booty_call['last_cum'] = 'face_mouth'
-			gs 'cum_call', 'face', $boy, 1
-			gs 'cum_call', 'hair', $boy, 1
-			gs 'cum_call', 'mouth', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/facial/facial29.mp4"></video></center>'
-			'As <<$npc_firstname[$boy]>> works his cock in front of you, you kneel before him, opening your mouth and sticking out your tongue. In return, he grabs you by the hair with one hand and works his cock right in front of your face with the other.'
-			*nl
-			'The first shot sprays directly across your face, spattering across your cheeks and even in your hair. A little falls inside your mouth and you spit it out as it comes, as <<$npc_firstname[$boy]>> finishes finishing himself over your face. When the cum stops flying, you crack an eye and look up at him.'
-			!! add reactions later?
-			gs 'booty_call_after', 'wipe_face'
-			gs 'booty_call_sex', 'sex_end'
-		end
+		'You pull your lips back from his cock with a pop.'
+		'"<<$booty_call[''cum_desc'']>>" you ask.'
+		'<<$npc_firstname[$boy]>> sits up, working his shaft with his hand as he points it at your face. That seems like a "yes" to you.'
+		gs'booty_call_cum', 'facial_close_eyes'
+		gs'booty_call_cum', 'facial_tongue_swallow'
+		gs'booty_call_cum', 'facial_tongue_spit'
+		gs'booty_call_cum', 'facial_brace'
+		act'Jerk him yourself':gt'booty_call_cum', 'facial_jerk_him'
 	end
 end
 
 
 if $ARGS[0] = 'bj_sub_cum_tits1':
+	booty_call['he_ask_tits'] = 1
+	$booty_call['cum_choice'] = 'tits'
 	'Within a few minutes, <<$npc_firstname[$boy]>> taps you on the head."'
 	'"I''m gonna- <i>nngh-!</i> You''d look super hot with my cum on your tits. Can I?"'
 	act'No way':
@@ -1505,6 +1437,7 @@ if $ARGS[0] = 'bj_sub_cum_tits1':
 
 	act'Jerk him over your tits':
 		booty_call['cum_tits'] = 1
+		booty_call['cum_count'] += 1
 		$booty_call['last_cum'] = 'tits'
 		gs 'cum_call', 'breasts', $boy, 1
 		gs 'stat'
@@ -1512,24 +1445,10 @@ if $ARGS[0] = 'bj_sub_cum_tits1':
 		'<center><video autoplay loop src="images/shared/sex/cum/chest/jerk1.mp4"></video></center>'
 		'You don''t say a word, removing your mouth and start working his shaft with your hand instead. Within moments, his cock erupts and warm cum sprays across your chest, leaving long strands dripping down your breasts.'
 		!! reactions?
-		gs 'booty_call_after', 'wipe_tits'
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_tits'
 	end
-	if tits > 1:
-		act'Finish him with your tits':
-			booty_call['cum_tits'] = 1
-			$booty_call['last_cum'] = 'tits'
-			gs 'cum_call', 'breasts', $boy, 1
-			gs 'cum_call', 'hands', $boy, 1
-			gs 'stat'
-			cla & *clr
-			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
-			'"I''ve got an even better idea," you grin, leaning forward and smushing your breasts together around his cock. You squeeze them together with your hands and start working his shaft. Within seconds, cum erupts from the tip of his cock, smearing it all across your still moving tits and sending it dripping down your hands.'
-			!! reactions?
-			gs 'booty_call_after', 'wipe_tits'
-			gs 'booty_call_sex', 'sex_end'
-		end
-	end
+	gs 'booty_call_cum', 'cum_tits4'
 end
 
 if $ARGS[0] = 'bj_sub_cum_tits2':
@@ -1537,32 +1456,36 @@ if $ARGS[0] = 'bj_sub_cum_tits2':
 	act'Jerk him over your tits':
 		booty_call['cum_tits'] = 1
 		$booty_call['last_cum'] = 'tits'
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'breasts', $boy, 1
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/chest/jerk1.mp4"></video></center>'
-		'"How about my tits instead?"'
+		if booty_call['he_ask_tits'] = 1:'"How about my tits instead?"'
 		'With a dirty grin, you kneel beneath him grab hold of his cock and jerking it until he comes with a groan. Cum coats your tits in thick strands, warm against your skin.'
 		!! reactions?
-		gs 'booty_call_after', 'wipe_tits'
 		gs 'booty_call_sex', 'sex_end'
+!!		gs 'booty_call_after', 'wipe_tits'
 	end
 	if tits > 1:
 		act'Finish him with your tits':
 			booty_call['cum_tits'] = 1
+			booty_call['cum_count'] += 1
 			$booty_call['last_cum'] = 'tits'
 			gs 'cum_call', 'breasts', $boy, 1
 			gs 'cum_call', 'hands', $boy, 1
 			gs 'stat'
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/cum/chest/tits1.mp4"></video></center>'
-			'"How about my tits instead?"'
+			if booty_call['he_ask_tits'] = 1:'"How about my tits instead?"'
 			'With a dirty grin, you kneel beneath him and smush his cock between your breasts. You squeeze them together as tightly as possible and work his shaft until a few moment later, he comes, spraying cum all over your tits and hands.'
 			!! reactions?
-			gs 'booty_call_after', 'wipe_tits'
 			gs 'booty_call_sex', 'sex_end'
+!!			gs 'booty_call_after', 'wipe_tits'
 		end
 	end
+	
+	gs 'booty_call_cum', 'cum_tits4'
 end
 
 if $ARGS[0] = 'bj_sub_cum_hand':
@@ -1574,9 +1497,13 @@ if $ARGS[0] = 'bj_sub_cum_hand':
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/handjob/hand0,1.mp4"></video></center>'
-		'Removing his cock from your mouth, you instead kneel in front of him and work his cock with your hand until moments later, cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
-		gs 'booty_call_after', 'wipe_hands'
+		if booty_call['bj_cum'] ! 3:
+			'Removing his cock from your mouth, you instead kneel in front of him and work his cock with your hand. Moments later cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
+		else
+			'Removing his cock from your mouth, you kneel in front of him and work his cock with your hand until cum erupts from the tip, spraying into the air and dribbling back down his shaft and through your fingers.'
+		end
 		gs 'booty_call_sex', 'sex_end'
+		gs 'booty_call_after', 'wipe_hands'
 	end
 end
 
@@ -1584,7 +1511,6 @@ end
 if $ARGS[0] = 'bj_force_cum_mouth':
 	booty_call['cum_mouth'] = 1
 	booty_call['cum_mouth_force'] = 1
-	booty_call['cum_count'] += 1
 	$booty_call['last_cum'] = 'mouth'
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/cum/mouth/swallow5.mp4"></video></center>'
@@ -1598,6 +1524,7 @@ if $ARGS[0] = 'bj_force_cum_mouth':
 	end
 	act'Gag':
 		gs 'cum_call', 'mouth', $boy, 1
+		booty_call['cum_count'] += 1
 		gs 'stat'
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/mouth/spit3.mp4"></video></center>'
@@ -1610,6 +1537,7 @@ if $ARGS[0] = 'bj_force_cum_mouth':
 	act'Swallow!':
 		booty_call['cum_swallow'] += 1
 		$booty_call['last_cum'] = 'swallow'
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1625,6 +1553,7 @@ if $ARGS[0] = 'bj_force_cum_mouth':
 	act'Swallow (take it in stride)':
 		booty_call['cum_swallow'] += 1
 		$booty_call['last_cum'] = 'swallow'
+		booty_call['cum_count'] += 1
 		gs 'cum_call', 'mouth_swallow', $boy, 1
 		gs 'stat'
 		cla & *clr
@@ -1802,6 +1731,7 @@ end
 
 if $ARGS[0] = 'bj_sub_cum_warn':
 	booty_call['bj_cum'] = 3
+	booty_call['cum_warn'] = 1
 	'After a couple minutes, he taps you on the head.'
 	'"I''m-! Almost there-!" he groans loudly.'
 	gs 'booty_call_start', 'bj_sub_cum_hand'
@@ -1815,7 +1745,7 @@ if $ARGS[0] = 'bj_sub_cum_warn':
 			booty_call['position_choose'] = 1
 			'You pull your mouth off his cock with a pop, giving him a lusty stare.'
 			if booty_call['fuck_count'] > 0:
-				'"Not yet big boy," you grin, jerking him gently. "I want you to fuck me again."'
+				'"Not yet big boy," you grin, jerking him gently. "I want to fuck again."'
 			else
 				'"Not yet big boy," you grin, jerking him gently. "I want you inside me first."'
 			end
@@ -1914,8 +1844,14 @@ if $ARGS[0] = 'bj_resume':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/blowjob/bj47.mp4"></video></center>'
 	'You go back to blowing <<$npc_firstname[$boy]>>, humming to yourself as you relax while bobbing your head up and down the length of his cock.'
+	
+end
+
+if $ARGS[0] = 'bj_cum_sort':
 	booty_call['bj_cum_choice'] = rand(1,20)
-	if booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
+	if booty_call['bj_cum_choice'] > 12 and booty_call['not_today'] = 0:
+		gs 'booty_call_start', 'bj_sub_lets_fuck'
+	elseif booty_call['bj_cum_choice'] > 10 or booty_call['bj_warning'] = 1:
 		gs 'booty_call_start', 'bj_sub_cum_warn'
 	elseif booty_call['bj_cum_choice'] > 8:
 		gs 'booty_call_start', 'bj_sub_cum_mouth1'
@@ -1961,6 +1897,7 @@ end
 
 
 if $ARGS[0] = 'foreplay_choose':
+	booty_call['fucking'] = 0
 	if $booty_call['position'] ! 'makeout':gs 'booty_call_start', 'makeout_dom1'
 
 	if $booty_call['position'] ! 'handjob' and $booty_call['position'] ! 'makeout':gs 'booty_call_start', 'handjob_dom1'
@@ -1975,7 +1912,7 @@ if $ARGS[0] = 'foreplay_choose':
 
 	act'Let him lead':
 		cla & *nl
-		if npc_caretaker[$boy] = 1 or npc_pussyeater[$boy] = 1:
+		if ((npc_caretaker[$boy] = 1 and booty_call['orgasm_count'] = 0) or npc_pussyeater[$boy] = 1) and rand(1,2) = 1:
 			gs 'booty_call_start', 'generous_initiative'
 		elseif npc_selfish[$boy] = 1:
 			gs 'booty_call_start', 'selfish_initiative'
@@ -2104,7 +2041,7 @@ if $ARGS[0] = 'hj_cum1':
 	if $booty_call['position'] = 'handjob':
 		'You feel him tense under your touch and he tries to speak.'
 		'"Hang on, wai-"'
-		'But before he can finish his sentence, you finish him instead. Thick cum erupts from his cock, wads of it flying through the air, streams of it running down your fingers. A dirty grin is plastered across your face as you continue working his cock with your hand, milking him for every drop.'
+		'But before he can finish his sentence, you squeeze harder and speed up. Thick cum erupts from his cock, wads of it flying through the air, streams of it running down your fingers. A dirty grin is plastered across your face as you continue working his cock with your hand, milking him for every drop.'
 	elseif $booty_call['position'] = 'blowjob':
 		'<<$npc_firstname[$boy]>> groans loudly and cum erupts from the tip of his cock. The thick liquid dribbles down your fingers, mixing with your saliva, making his shaft even more slippery in your hand. A dirty grin is plastered across your face the whole time as you work his cock, determined to milk him for every drop.'
 	else
@@ -2288,7 +2225,6 @@ end
 
 if $ARGS[0] = 'bj_dom_swallow1':
 !!	booty_call['cum_mouth_ask'] += 1
-	booty_call['cum_count'] += 1
 	booty_call['swallow'] = 1
 	$booty_call['cum_choice'] = 'mouth'
 	cla & *clr
@@ -2297,6 +2233,7 @@ if $ARGS[0] = 'bj_dom_swallow1':
 	gs 'booty_call_start', 'bj_sub_cum_mouth_spit'
 	act'Gulp':
 		gs'cum_call', 'mouth_swallow',$boy,1
+		booty_call['cum_count'] += 1
 		cla & *clr
 		'<center><video autoplay loop src="images/shared/sex/cum/mouth/deep2.mp4"></video></center>'
 		'Carefully, very carefully, you slowly draw your lips back up <<$npc_firstname[$boy]>>''s cock, sucking the whole time to make sure not a single drop of his cum spills around your lips. It''s really difficult to keep sucking and not choke on the cum pooling at the back of your throat. The effort makes your eyes water, but you still manage to draw all the way back up to his tip where you finally swallow his load and get your first gasp of clean air.'

locations/booty_call_stats.qsrc

@@ -10,6 +10,8 @@ if $ARGS[0] = 'starting_stats':
 	lastwornpantynumber['booty_call'] = pantywornnumber
 	$lastwornbratype['booty_call'] = $braworntype
 	lastwornbranumber['booty_call'] = brawornnumber
+	$lastwornclothingtype['booty_call'] = $clothingworntype
+	lastwornclothingnumber['booty_call'] = clothingwornnumber
 	booty_call['starting_makeup'] = pcs_makeup
 	booty_call['cum_vagina'] = cum_loc['vagina']
 	booty_call['cum_labia'] = cum_loc['labia']
@@ -88,7 +90,18 @@ if $ARGS[0] = 'save':
 	!! number of times your fuckbuddy has cum in your mouth
 	npc_mouth_cum_count[$boy] += booty_call['mouth_cum']
 	
+	!! number of times you have denied letting your fuckbuddy take your virginity
+	npc_virgin_deny[$boy] += booty_call['virgin_deny']
+	
+	!! if your fuckbuddy takes your virginity without consent
+	npc_virgin_rapist[$boy] += booty_call['virgin_rape']
+	
 	if booty_call['sleep_fuck'] > 0: npc_sleep_fuck += 1
+	
+	if hour >= 8 and hour < 14 and week < 6 and mid($start_type,1,2) = 'sg' and SchoolAtestat = 0 and kanikuli = 0 and schoolProgulDay ! daystart:
+		!!absence from school
+		npc_school_absences[$boy] = schoolprogul
+	end
 end
 
 
@@ -103,7 +116,10 @@ if $ARGS[0] = 'no_birth_control_know':
 	npc_know_bc[$boy] = 0
 end
 
-
+if $ARGS[0] = 'single_know':
+	npc_know_have_boyfriend[$boy] = 0
+	npc_know_have_girlfriend[$boy] = 0
+end
 
 if $ARGS[0] = 'sleep_check':
 	booty_call['sleep_cum_vagina'] = cum_loc['vagina']

locations/booty_call_talk.qsrc

@@ -5,17 +5,27 @@
 
 if $ARGS[0] = 'boy_accidental_creampie':
 	booty_call['accidental_creampie_convo'] = 1
-	if $booty_call['convo'] ! 'used_all_condoms': 
+!!{	if $booty_call['convo'] = 'used_all_condoms': 
 		cla & *clr
 		'<center><img <<$set_imgh>> src="images/shared/sex/after/pillow_talk1.jpg"></center>'
-	end
-	if cum_loc['vagina'] > 0:
-		'"Speaking of which..." <<$npc_firstname[$boy]>> says, looking intently at the cum slowly draining from your pussy. "Are you gonna be okay...?"'
+	end}
+	cla & *nl
+	
+	if npc_childfree[$boy] = 1 and WIP_enabled = 1:
+		if cum_loc['vagina'] > 0:
+			'"Speaking of which..." <<$npc_firstname[$boy]>> says, looking intently at the cum slowly draining from your pussy. "You''re going to get a morning after pill, right?"'
+		else
+			'"Speaking of which..." <<$npc_firstname[$boy]>> asks, looking intently at your pussy, clearly thinking about when he came inside you earlier. "You''re going to get a morning after pill, right?"'
+		end
+		gs'booty_call_talk', 'childfree_accidental_creampie1'
 	else
-		'"Speaking of which..." <<$npc_firstname[$boy]>> asks, looking intently at your pussy, clearly thinking about when he came inside you earlier. "Are you gonna be okay...?"'
+		if cum_loc['vagina'] > 0:
+			'"Speaking of which..." <<$npc_firstname[$boy]>> says, looking intently at the cum slowly draining from your pussy. "Are you gonna be okay...?"'
+		else
+			'"Speaking of which..." <<$npc_firstname[$boy]>> asks, looking intently at your pussy, clearly thinking about when he came inside you earlier. "Are you gonna be okay...?"'
+		end
+		gs'booty_call_talk', 'boy_accidental_creampie2'
 	end
-	
-	gs'booty_call_talk', 'boy_accidental_creampie2'
 end
 
 if $ARGS[0] = 'boy_accidental_creampie2':
@@ -34,6 +44,7 @@ if $ARGS[0] = 'boy_accidental_creampie2':
 			end
 		elseif stat['probably_safe_day'] = 1:
 			act'I think so':
+				cla & *nl
 				if $booty_call['convo'] = 'used_all_condoms':
 					'"I think so," you say. "It <i>should</i> be a safe day for me as long as I''m keeping track of my cycle correctly..."'
 				else
@@ -102,6 +113,65 @@ if $ARGS[0] = 'boy_accidental_creampie2':
 	end
 end
 
+if $ARGS[0] = 'childfree_accidental_creampie1':
+	if birth_control['think_safe'] = 1:
+		gs'booty_call_pillow_talk', 'on_birth_control'
+	else
+		if stat['safe_day'] = 1:
+			act'It''s a safe day':
+				cla & *nl
+				if $booty_call['convo'] = 'used_all_condoms':
+					'"It''s a safe day," you nod. "I should be okay. This time anyways," you smile teasingly.'
+				else
+					'"It''s a safe day, so I should be okay," you smile teasingly.'
+				end
+				gs'booty_call_pillow_talk', 'topics'
+			end
+		elseif stat['probably_safe_day'] = 1:
+			act'I think so':
+				cla & *nl
+				if $booty_call['convo'] = 'used_all_condoms':
+					'"I think so," you say. "It <i>should</i> be a safe day for me as long as I''m keeping track of my cycle correctly..."'
+				else
+					'"I think so," you say. "It <i>should</i> be a safe day for me as long as I''m keeping track of my cycle correctly..."'
+				end
+				gs'booty_call_pillow_talk', 'topics'
+			end
+		else
+			act'Roll the dice?':
+				cla & *nl
+				'"I''m not sure... Maybe we can just roll the dice?" you say with a hesitant smile.'
+				if npc_childfree[$boy] = 1 or npc_caretaker[$boy] = 1:
+					gs'booty_call_talk', 'morning_after_money'
+				else
+					gs'booty_call_pillow_talk', 'topics'
+				end
+			end
+			
+			act'Need plan B':
+				cla & *nl
+				'"Not really," you grimace. "I''m definitely going to need some plan B tomorrow."'
+				if npc_childfree[$boy] = 1 or npc_caretaker[$boy] = 1:
+					gs'booty_call_talk', 'morning_after_money'
+				else
+					gs'booty_call_pillow_talk', 'topics'
+				end
+			end
+			
+			act'Need plan B (safety)':
+				cla & *nl
+				'"I''ll get some plan B tomorrow just to be safe," you say.'
+				if npc_childfree[$boy] = 1 or npc_caretaker[$boy] = 1:
+					gs'booty_call_talk', 'morning_after_money'
+				else
+					gs'booty_call_pillow_talk', 'topics'
+				end
+			end
+		end
+		gs'booty_call_talk', 'pc_have_morning_after'
+	end
+end
+
 if $ARGS[0] = 'morning_after_money':
 	'<<$npc_firstname[$boy]>> looks at you for a moment before reaching down into his discarded trousers to grab his wallet, pulling 800<b>₽</b> out.'
 	'"Here," he says, offering the cash to you. "Get a morning after pill tomorrow.'
@@ -175,7 +245,11 @@ if $ARGS[0] = 'pc_have_morning_after':
 	if morning_after_pill = 0:
 		act'I''ll buy a morning after pill':
 			cla & *nl
-			'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill tomorrow. No big deal."'
+			if booty_call['sleepover'] = 0:
+				'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill tomorrow. No big deal."'
+			else
+				'"It''s okay," you murmur reassuringly. "I''ll get a morning after pill later today. No big deal."'
+			end
 			'He nods, seeming to relax a bit.'
 			gs'booty_call_pillow_talk', 'topics'
 		end
@@ -265,7 +339,7 @@ if $ARGS[0] = 'free_creampies':
 				end
 			end
 		end
-	elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and birth_control['think_safe'] = 0:
+!!{	elseif npc_free_creampies[$boy] = 1 and booty_call['safe_day'] = 0 and booty_call['probably_safe_day'] = 0 and mesec <= 0 and birth_control['think_safe'] = 0:
 		if stat['safe_day'] = 1:
 			act'It''s a safe day':
 				booty_call['safe_day'] = 1
@@ -304,7 +378,7 @@ if $ARGS[0] = 'free_creampies':
 					gs'booty_call_sex', 'sex_end'
 				end
 			end
-		end
+		end}
 	end
 end
 
@@ -692,7 +766,7 @@ if $ARGS[0] = 'cheating_end':
 		else
 			'You return his smile, the prospect of future encounters already seeping into your pants as you head out the door.'
 		end
-		act'Leave':gt'booty_call_after', 'exit'
+		act'Leave':gt'booty_call_leave', 'exit'
 	end
 	
 	act'Guilt':
@@ -702,7 +776,7 @@ if $ARGS[0] = 'cheating_end':
 		'<i>Are you just rationalizing? Making excuses? Why aren''t you just ending things?</i>'
 		*nl
 		'But you just keep smiling all the way until you close the door behind you.'
-		act'Leave':gt'booty_call_after', 'exit'
+		act'Leave':gt'booty_call_leave', 'exit'
 	end
 end
 

locations/booty_call_virgin.qsrc

@@ -2,12 +2,11 @@
 
 if $ARGS[0] = 'start1':
 	!! player initiated
-	cla & *nl
+	cla & *clr
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	$npc_apt_bedroom[$boy]
 	'With a fast beating heart, you turn to look at <<$npc_firstname[$boy]>>.'
-	'<<$npc_firstname[$boy]>>... I want you to take my virginity."'
+	'"<<$npc_firstname[$boy]>>... I want you to take my virginity."'
 	gs'booty_call_virgin', 'start_flavor'
 	gs'booty_call_virgin', 'start_options'
 end
@@ -16,7 +15,6 @@ if $ARGS[0] = 'start2':
 	!! player initiated, alternative suggestion variant
 	cla & *clr
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	$npc_apt_bedroom[$boy]
 	'"Well..." You bite your lip, heart pounding inside your chest, mulling over what you''re about to say. "What if... I let you fuck me?"'
 	gs'booty_call_virgin', 'start_flavor'
@@ -27,9 +25,8 @@ if $ARGS[0] = 'start3':
 	!! NPC initiated, player doesn''t stop them
 	cla & *nl
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	'Your breath catches in your throat as <<$npc_firstname[$boy]>> moves closer and closer. Your pussy feels like it''s on fire. You want it so badly that it <i>hurts</i>.'
-	'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have it. You can fuck me."'
+	'"Okay," you whisper, spreading your legs, gasping when his fingers find your dripping lips. "You can have it. Take my virginity."'
 	gs'booty_call_virgin', 'start_flavor'
 	gs'booty_call_virgin', 'start_options'
 end
@@ -37,7 +34,6 @@ end
 if $ARGS[0] = 'start4':
 	!! NPC initiated, they know that player wants to save it before attempting, player doesn''t stop them
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	cla & *clr
 	pcs_horny += 20
 	$npc_apt_bedroom[$boy]
@@ -50,7 +46,6 @@ end
 if $ARGS[0] = 'start5':
 	!! player initiated, player just wants to fuck
 	booty_call['virgin'] = 1
-	booty_call['fuck_count'] += 1
 	cla & *clr
 	$npc_apt_bedroom[$boy]
 	'"Enough of the foreplay," you say with a lusty growl. "It''s time to fuck."'
@@ -100,8 +95,9 @@ if $ARGS[0] = 'start_flavor':
 end
 
 if $ARGS[0] = 'start_options':
-	if booty_call['condom'] = 0 and booty_call['no_condom'] = 0:
-		gs 'booty_call_condoms', 'condoms'
+	booty_call['orgasm_count'] = orgasm
+	if booty_call['condom'] = 0 and booty_call['no_condom'] = 0 and booty_call['condom_setup'] ! 1:
+		act'Continue':cla & gs 'booty_call_condoms', 'condoms'
 	else
 		act'Let him take the lead':gt'booty_call_virgin', 'his_choice'
 
@@ -113,10 +109,67 @@ if $ARGS[0] = 'start_options':
 	end
 end
 
+if $ARGS[0] = 'start_with_condom':
+	gs 'booty_call_condoms', 'npc_condom_use_stats'
+	if npc_caregiver[$boy] = 1 or npc_generous[$boy] = 1 or (rand(1,2) = 1 and npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1):
+		'With the condom securely wrapped around <<$npc_firstname[$boy]>>''s cock, he moves back in between your legs before he stops, hesitating.'
+		gs 'booty_call_virgin', 'start_options2'
+	else
+		'With the condom securely wrapped around <<$npc_firstname[$boy]>>''s cock, he moves back in between your legs. Moments later, he takes your virginity.'
+		gs'booty_call_virgin', 'miss_virg_start'
+	end
+end
+
+if $ARGS[0] = 'start_without_condom':
+	if npc_caregiver[$boy] = 1 or npc_generous[$boy] = 1 or (rand(1,3) = 1 and npc_selfish[$boy] ! 1 and npc_abusive[$boy] ! 1):
+		'<<$npc_firstname[$boy]>> moves back in between your legs before he stops, hesitating.'
+		gs 'booty_call_virgin', 'start_options2'
+	else
+		'<<$npc_firstname[$boy]>> moves back in, lining his naked cock up with your pussy. Moments later, he takes your virginity.'
+		gs'booty_call_virgin', 'miss_virg_start'
+	end
+end
+
+if $ARGS[0] = 'start_options2':
+	booty_call['orgasm_count'] = orgasm
+	'"Did you want to decide how we do this?" he asks. "It''s <i>your</i> first time after all."'
+	act'Let him take the lead':
+		cla & *clr
+		$npc_apt_bedroom[$boy]
+		'You shake your head.'
+		*nl
+		'"You pick. I trust your experience," you smile.'
+		act'Continue':gt'booty_call_virgin', 'his_choice'
+	end
+	
+	act'Spread your legs':gt'booty_call_virgin', 'miss_virg_norm1'
+
+	act'Get on all fours':gt'booty_call_virgin', 'doggy_virg_norm1'
+
+	act'Climb on top':gt'booty_call_virgin', 'cowgirl_virg_norm1'
+end
+
 if $ARGS[0] = 'wait':
 	cla & *clr
-	$npc_apt_bedroom[$boy]
-	if rand(1,10) > npc_sexdrive[$boy]:
+	if WIP_enabled > 0 and rand(1,10) < npc_sexdrive[$boy] and npc_abusive[$boy] > 0:
+		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/3.jpg"></center>'
+		if know_virgin[$boy] = 1:
+			'"Wait!" you yelp. "Knock it off! You know I''m saving my virg-!"'
+			'Your protests cut off in a choked scream as <<$npc_firstname[$boy]>> rams his cock full force into you, stabbing it through your hymen and sending waves of agony through you. Tears well up in your eyes as you look up at <<$npc_firstname[$boy]>>, horrified at what he''s done.'
+			if booty_call['virgin_deny'] >= 10:
+				'"I''m so fucking sick of you blueballing me," he says. "So we''re gonna fuck today, whether you like it or not."'
+			elseif booty_call['virgin_deny'] > 0:
+				'"I got tired of waiting," he says.'
+			else
+				'"Congratulations on becoming a woman," he says.'
+			end
+		else
+			'"Wait!" you yelp. "I''m a-"'
+			'Your protests cut off in a choked scream as <<$npc_firstname[$boy]>> rams his cock full force into you, stabbing it through your hymen and sending waves of agony through you.'
+			'"... virgin..." you whimper helplessly, tears running down your cheeks.'
+		end
+	elseif rand(1,10) > npc_sexdrive[$boy]:
+		$npc_apt_bedroom[$boy]
 		if know_virgin[$boy] = 1:
 			'"Wait!" you yelp. "Knock it off! You know I''m saving my virginity!"'
 			'"Sorry. I got caught up in the moment. I forgot."'
@@ -128,220 +181,77 @@ if $ARGS[0] = 'wait':
 			'"A girl can have fun while saving herself for marriage."'
 			'"Well what do you want to do instead?"'
 		end
-		know_virgin[$boy] = 1
 		gs'booty_call_start', 'foreplay_choose'
 	else
+		cla & *clr
+		'<center><video autoplay loop src="images/shared/sex/vag/miss/pussyhump.mp4"></video></center>'
 		if know_virgin[$boy] = 1:
 			'"Wait!" you yelp. "Knock it off! You know I''m saving my virginity!"'
 		else
 			'"Wait!" you yelp. "I''m a virgin! You can''t!"'
 		end
 		gs'arousal', 'foreplay',-5
-		'He keeps moving anyways, running his hands up and down your body, trailing kisses along your neck.'
+		'<<$npc_firstname[$boy]>> can''t stop moving, rubbing his cock against your pussy lips.'
 		if npc_selfish[$boy] = 1:
 			'"Come on," he whispers. "I''m so fucking hard right now... Just let me fuck you already..."'
-		elseif npc_generous[$boy] = 1:
-			'"<<$pcs_nickname>>..." he whispers. "Please. I want you so bad. Can I? Can I be your first time?"'
+		elseif npc_gentle_lover[$boy] = 1 or npc_caretaker[$boy] = 1:
+			'"<<$pcs_nickname>>..." he whispers. "I want you so bad... Can I be your first time? Please?"'
 		else
 			'"Come on," he whispers. "Just lose it already. It''ll feel <i>really</i> good..."'
 		end
 		act'No way!':
+			booty_call['virgin_deny'] += 1
+			booty_call['no_sex'] = 1
 			cla & *clr
 			$npc_apt_bedroom[$boy]
-			'"No means no!" You snap your legs closed and turn your face away. "Take it for an answer already." '
+			'"No means no!" You snap your legs closed and turn your face away. "Take it for an answer already."'
 			'He pulls back with a sigh.'
 			gs'booty_call_virgin', 'change_mind'
 		end
 
 		act'Well...':
+			booty_call['orgasm'] = orgasm
 			cla & *clr
 			'<center><video autoplay loop src="images/shared/sex/vag/miss/pussyhump.mp4"></video></center>'
 			'<i>Well...</i> You moan softly under his touch. It feels <i>so good.</i> What if... you just... let him...'
 			'<<$npc_firstname[$boy]>> gently pushes your legs open. You can feel his hardon rubbing right against your clit.'
 			act'Let <<$npc_firstname[$boy]>> take your virginity':
 				cla & *nl
-				'"Okay," you smile. "Just this once."'
-				if npc_condom_conscious[$boy] = 1:
-					booty_call['condom'] = 1
-					'He smiles back at your joke and grabs a condom off his nightstand, tearing open the packaging and rolling the rubber onto his cock. You spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity'
-!!{					'He smiles back at your joke and reaches for a condom on his nightstand. '
-					act'Wait for him':
-
-					end
-
-					act'Ask him not to use the condom':
-
-					end}
+				'"Okay," you whisper. "Put it in."'
+				if npc_condom_conscious[$boy] > 0:
+					'<<$npc_firstname[$boy]>> grabs a condom off his nightstand.'
+					gs 'booty_call_condoms', 'virgin_condom1'
 				else
-					'With a wink, you spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
-				end
-				if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-					act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-				else
-					act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
+					'You spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
+					gs'booty_call_virgin', 'miss_virg_start'
 				end
 			end
+			
+			gs 'booty_call_condoms', 'virgin_condom_ask1'
+		end
+	end
+end
 
-			act'Ask him to use a condom':
-				cla & *clr
-				$npc_apt_bedroom[$boy]
-				'"Okay," you smile. "But use a condom? Please?"'
-				if npc_condom_conscious[$boy] = 1:
-					'"Of course," he says, already tearing open a package. "I''m not an idiot you know."'
-					'He rolls it onto his cock and moves back in between your legs. Moments later, he takes your virginity.'
-					if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-						act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-					else
-						act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-					end
-				else
-					if npc_no_condoms[$boy] = 1:
-						'"Nah, fuck that rubber shit. I don''t use it."'
-						act'Then we''re not fucking':
-							cla & *clr
-							$npc_apt_bedroom[$boy]
-							'"Woah! What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "If you''re not gonna use a condom, there''s no way I''m letting you fuck me!"'
-							'"Don''t be such a bitch about it! Come on! Let''s just do this!"'
-							act'Let him pressure you':
-								cla & *nl
-								'Your conscience rails against you as he pushes you down onto the bed. You want to refuse him, you <i>want</i> to tell him no, but you don''t want to fight him either. You don''t want him to see you as a bitch, even if you know you''re right.'
-								*nl
-								'With an internal sigh of resignation and not a small amount of regret, you spread your legs, and moments later, he takes your virginity.'
-								*nl
-								'<i>Without</i> a condom.'
-								if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-									act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-								else
-									act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-								end
-							end
-							gs 'willpower', 'sex', 'resist', 'medium'
-							if will_cost <= pcs_willpwr:
-								act'Stand firm (<<will_cost>> Willpower)':
-									cla & *nl
-									'"Nuh uh. If there''s no condom, there''s no sex." He pulls back with a sigh.'
-									gs'booty_call_virgin', 'change_mind'
-								end
-							else
-								act'Stand firm (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
-							end
-						end
-
-						act'Maybe it''s okay?':
-							cla & *nl
-							'<i>Well... Maybe it''s okay?</i> you rationalize. It''s your first time. If he doesn''t use condoms, maybe he knows better? You can always change your mind in the future. But it''s just once. What could go wrong?'
-							*nl
-							'You nod your head and lean back onto the bed. You spread your legs for him, and moments later, he takes your virginity.'
-							if rand(1,3) = 3 and npc_selfish[$boy] = 1:
-								act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-							else
-								act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-							end
-						end
-
-!!{						act'What the fuck?!':
-							cla & *clr
-							$npc_apt_bedroom[$boy]
-							'"What the fuck?!" you exclaim, snapping your legs closed and pulling back from him. "You don''t use condoms?"'
-							'"No! Of course I don''t!" he says. "Condoms fucking suck. Can''t feel anything with one of those on."'
-							act'I can''t do this':
-
-							end
-						end}
-					else
-						if rand(1,2) = 2:
-							'<<$npc_firstname[$boy]>> nods and gets one out, tearing open the package and rolling the little rubber sleeve onto his cock. He moves back between your legs. Moments later, he takes your virginity.'
-							if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-								act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-							else
-								act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-							end
-						else
-							'"Come on," he says. "You really want to use a condom for your first time?"'
-							act'Maybe he has a point':
-								cla & *clr
-								$npc_apt_bedroom[$boy]
-								'Once again, the heady feeling of arousal becomes irresistable. You <i>ache</i> to feel him inside you and the thought of even a thin sleeve of rubber separating your cock from your pussy suddenly feels distasteful to you. It''s your first time. You want to feel <i>everything.</i>'
-								*nl
-								'"Okay," you smile. "Just this once."'
-								'You spread your legs for him and moments later, <<$npc_firstname[$boy]>> takes your virginity.'
-								if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-									act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-								else
-									act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-								end
-							end
-
-							act'Hell yes I do (STD)':
-								cla & *nl
-								'"Uhh, <i>hell yes</i> I do," you say with a look of suspicion. "I''m not about to have sex for the first time and immediately get an STD."'
-								'"An STD? That''s what you''re afraid of? I''m clean! Obviously!"'
-								act'I don''t know that':
-									cla & *nl
-									'"I don''t know that!" you spit back. "Where''s the proof? You have a negative test on you? I''m not about to risk it just because you tell me to ''trust you.''"'
-									'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs. A moment after that, he takes your virginity.'
-									booty_call['condom'] = 1
-									if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-										act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-									else
-										act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-									end
-								end
-
-								act'Trust him':
-									cla & *clr
-									$npc_apt_bedroom[$boy]
-									'"If you say so," you sigh. He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, he takes your virginity.'
-									if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-										act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-									else
-										act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-									end
-								end
-							end
-
-							if birth_control['think_safe'] = 0:
-								act'Hell yes I do (pregnancy)':
-									cla & *nl
-									'"Uhh, <i>hell yes</i> I do," you say with an obvious expression on your face. "I''m not risking getting pregnant. <i>Especially</i> on my first time!"'
-									'"That''s what you''re worried about? Come on, I''ll pull out. I promise."'
-									act'No way!':
-										cla & *nl
-										'"No fucking way!" you say. "I''m not just gonna trust you to pull out because you say you will! Even if you really mean it, anything could happen by accident. I''m not taking any chances!"'
-										'"Fine, fine," he grumbles, rolling his eyes. You fume for a little bit, feeling like he''s totally ruined the moment while he rolls the rubber onto his cock. A little bit later, he''s back in position between your legs. A moment after that, he takes your virginity.'
-										booty_call['condom'] = 1
-										if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-											act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-										else
-											act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-										end
-									end
-
-									act'Trust him':
-										cla & *clr
-										$npc_apt_bedroom[$boy]
-										'"If you say so," you sigh. "But you <i>absolutely cannot</i> cum inside me, alright?"'
-										'He just smiles back in response. You can''t help but fume just a little bit, feeling like he''s ruined the mood somewhat. But you don''t have much time to think about that as moments later, he takes your virginity.'
-										booty_call['condom'] = 3
-										if rand(1,3) = 3 or npc_selfish[$boy] = 1:
-											act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
-										else
-											act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
-										end
-									end
-								end
-							end
-						end
-					end
-				end
-			end
+if $ARGS[0] = 'safe_day_no_condoms1':
+	if stat['safe_day'] = 1:
+		act'It <i>is</i> a safe day...':
+			booty_call['safe_day'] = 1
+			cla & *nl
+			'"I guess... it''s a safe day for me so..." you murmur, nervously opening your legs.'
+		end
+	elseif stat['probably_safe_day'] = 1:
+		act'It''s <i>probably</i> a safe day...':
+			booty_call['probably_safe_day'] = 1
+			cla & *nl
+			'"I guess... it''s a safe day for me so..." you murmur, nervously opening your legs.'
 		end
 	end
 end
 
 if $ARGS[0] = 'his_choice':
 	booty_call['his_choice_virg'] = 1
-	if rand(0,1) = 1 or npc_generous[$boy] = 1:
+	gs'booty_call_sex', 'speed_select'
+	if booty_call['speed'] < 3 or npc_generous[$boy] = 1 or npc_caretaker[$boy] = 1:
 		if $npc_fav_pos[$boy] = 'missionary':
 			gt'booty_call_virgin', 'miss_virg_norm1'
 		elseif $npc_fav_pos[$boy] = 'doggy':
@@ -357,45 +267,48 @@ if $ARGS[0] = 'his_choice':
 		elseif $npc_fav_pos[$boy] = 'doggy':
 			gt'booty_call_virgin', 'doggy_virg_hard1'
 		else
-			gt'booty_call_virgin', 'miss_virg_nhard1'
+			gt'booty_call_virgin', 'miss_virg_hard1'
 		end
 	end
 end
 
 if $ARGS[0] = 'change_mind':
+	
 	if npc_selfish[$boy] = 1:
 		if booty_call['bj_count'] = 0:
-			'"Ugh! Fine. Then at least suck me off if you''re not going to let me fuck you," he grumbles, shoving your head towards his cock.'
-			act'Blow him':gs 'booty_call_start', 'bj_sub1'
+			'"At least suck me off if you''re not going to let me fuck you," he grumbles, shoving your head towards his cock.'
+		else
+			'"At least suck me off again if you''re not going to let me fuck you," he grumbles, shoving your head towards his cock.'
+		end
+		
+		act'Blow him':cla & gs 'booty_call_start', 'bj_sub1'
 
-			act'Grumble (but still do it)':
-				cla & *nl
-				booty_call['reluctant_bj'] = 1
-				'You grumble to yourself but lean forward anyways and take his dick into your mouth.'
-				act'Suck':gt 'booty_call_start', 'bj_sub1'
-			end
+		act'Grumble (but still do it)':
+			cla & *nl
+			booty_call['reluctant_bj'] = 1
+			'You grumble to yourself but lean forward anyways and take his dick into your mouth.'
+			act'Suck':gt 'booty_call_start', 'bj_sub1'
+		end
 
-			gs 'willpower', 'bj', 'resist', 'easy'
+!!{		gs 'willpower', 'bj', 'resist', 'easy'
 
-			if will_cost <= pcs_willpwr:
-				act'Can we 69?  (<<will_cost>> Willpower)':
-					cla & *nl
-					gs 'willpower', 'pay', 'self'
-					gs 'stat'
-					'"Can we at least sixty-nine? I really need some loving down there right now."'
-					'"I can get behind that," he grins, laying back.'
-					act'Climb over him':gs 'booty_call_start', '69_sub'
-				end
-			else
-				act'Can we 69? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		if will_cost <= pcs_willpwr:
+			act'Can we 69?  (<<will_cost>> Willpower)':
+				cla & *nl
+				gs 'willpower', 'pay', 'self'
+				gs 'stat'
+				'"Can we at least sixty-nine? I really need some loving down there right now."'
+				'"I can get behind that," he grins, laying back.'
+				act'Climb over him':gs 'booty_call_start', '69_sub'
 			end
 		else
-
-		end
+			act'Can we 69? (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
+		end}
 	else
 		'"Okay, fine. What do you want to do instead then?"'
+		gs'booty_call_start', 'foreplay_choose'
 	end
-	gs'booty_call_start', 'foreplay_choose'
+	know_virgin[$boy] = 1
 end
 
 if $ARGS[0] = 'no_condom1':
@@ -432,10 +345,20 @@ if $ARGS[0] = 'no_condom2':
 
 end
 
+if $ARGS[0] = 'miss_virg_start':
+	gs'booty_call_sex', 'speed_select'
+	if booty_call['speed'] = 3 and (npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1 or npc_likes_rough[$boy] = 1) and npc_caregiver[$boy] ! 1:
+		act'Continue':gt'booty_call_virgin', 'miss_virg_hard1'
+	else
+		act'Continue':gt'booty_call_virgin', 'miss_virg_norm1'
+	end
+end
+
 if $ARGS[0] = 'miss_virg_norm1':
 	
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	gs'arousal', 'vaginal',1,'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'miss'
@@ -493,7 +416,7 @@ if $ARGS[0] = 'miss_virg_kiss':
 	else
 		'Caught up in the moment, you reach up and grab <<$npc_firstname[$boy]>>''s face, pulling it down to kiss him. Your eyes roll back in your head, feeling the thrust of his cock in your pussy and the invasion of his tongue in your mouth. You moan into his mouth and he moans back.'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 
@@ -507,6 +430,7 @@ if $ARGS[0] = 'miss_virg_norm2':
 end
 
 if $ARGS[0] = 'miss_virg_hard1':
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
 	gs'arousal', 'vaginal',1,'rough', 'no_orgasm_msg'
@@ -539,18 +463,18 @@ if $ARGS[0] = 'miss_virg_hard1':
 			gs'stat'
 			cla & *nl
 			'You decided to give him your virginity and you don''t want to be a sour puss by trying to back out now. You grit your teeth and endure, spending every second hoping it will end soon.'
-			act'Continue':gs'booty_call_cum', 'fuck_cum'
+			act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 		end
 
 		act'Can we slow down?':
 			cla & *nl
 			'"Can we-! Slow down-! A little-?" you whimper under <<$npc_firstname[$boy]>>''s relentless pounding. "This is-! A bit-! Rough-!"'
-			if (rand(1,10) >= 7 or npc_selfish[$boy] = 1 or npc_abusive = 1) and npc_generous[$boy] ! 1:
+			if (rand(1,10) >= 7 or npc_selfish[$boy] = 1 or npc_abusive[$boy] = 1) and npc_generous[$boy] ! 1:
 				$orgasm_or = 'no'
 				'"This is what sex is like," he grins. "You''ll get used to it soon, then it''ll feel really good."'
 				'He keeps fucking you roughly and you keep your teeth clenched. Despite his promises, that good feeling never comes and you spend the next few minutes in agony, waiting for it to end.'
 				!! booty_call['boy_cum'] = 2
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			else
 				booty_call['speed_change'] = 1
 				'"Oh! Sorry! I just... I thought it would make you feel good..."'
@@ -574,7 +498,7 @@ if $ARGS[0] = 'miss_virg_hard2':
 	else
 		'It''s your first time having sex, but it''s mindblowingly good. Why didn''t you do this sooner?!'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'miss_virg_hard2_2':
@@ -587,12 +511,14 @@ if $ARGS[0] = 'miss_virg_hard2_2':
 	*nl
 	'It hurts. But that makes it feel even better.'
 	*nl
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'doggy_virg_norm1':
 	!! booty_call['boy_cum'] = 2
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	booty_call['virgin'] = 1
+	$booty_call['pos_speed'] = 'doggy1'
 	gs'arousal', 'vaginal',1,'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'doggy'
@@ -626,7 +552,7 @@ if $ARGS[0] = 'doggy_virg_norm1.1':
 		act'Continue':
 			cla & *clr
 			booty_call['orgasm'] = orgasm
-			$booty_call['pos_speed'] = 'miss1'
+			$booty_call['pos_speed'] = 'doggy1'
 			gs'stat'
 			$booty_call['virgin_media'] = '<center><video autoplay loop src="images/shared/sex/vag/doggy/slow1.mp4"></video></center>'
 			$booty_call['virgin_media']
@@ -649,6 +575,7 @@ end
 if $ARGS[0] = 'doggy_virg_hard1':
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	gs'arousal', 'vaginal',rand(4,8),'rough', 'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'doggy'
@@ -679,7 +606,7 @@ if $ARGS[0] = 'doggy_virg_hard1':
 			gs'stat'
 			cla & *nl
 			'The next few minutes pass by in a torturous blur. You have no idea how much time actually passes by, only that every second of it is filled with pain, tears, and prayer that it will end after the next thrust.'
-			act'Continue':gs'booty_call_cum', 'fuck_cum'
+			act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 		end
 
 		act'Can we slow down?':
@@ -690,7 +617,7 @@ if $ARGS[0] = 'doggy_virg_hard1':
 				'"This is what sex is like," he grins. "You''ll get used to it soon, then it''ll feel really good."'
 				'He keeps fucking you roughly and you keep your teeth clenched. Despite his promises, that good feeling never comes and you spend the next few minutes in agony, waiting for it to end.'
 				!! booty_call['boy_cum'] = 2
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			else
 				booty_call['speed_change'] = 1
 				'"Oh! Sorry! I just... I thought it would make you feel good..."'
@@ -714,7 +641,7 @@ if $ARGS[0] = 'doggy_virg_hard2':
 	else
 		'It''s your first time having sex, but it''s mindblowingly good. Why didn''t you do this sooner?!'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'doggy_virg_hard2_2':
@@ -727,12 +654,13 @@ if $ARGS[0] = 'doggy_virg_hard2_2':
 	*nl
 	'It hurts. But that makes it feel even better.'
 	*nl
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'cowgirl_virg_norm1':
 	!! booty_call['boy_cum'] = 2
 	booty_call['virgin'] = 1
+	if booty_call['condom'] ! 1: booty_call['no_condom'] = 1
 	gs'arousal', 'vaginal',1,'no_orgasm_msg'
 	gs'stat'
 	$booty_call['position'] = 'cowgirl'
@@ -885,8 +813,10 @@ if $ARGS[0] = 'cowgirl_virg_hard1':
 	gs'arousal', 'vaginal',-10,'no_orgasm_msg'
 	$booty_call['pos_speed'] = 'cowgirl2'
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/med3.mp4"></video></center>'
-	'Feeling good, you pick up the pace, bouncing up and down on <<$npc_firstname[$boy]>>''s cock with giddy excitement. Going a little harder feels even better than before and without warning you begin bursting into giggles. Who knew that sex was so much fun???'
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	'Feeling good, you pick up the pace, bouncing up and down on <<$npc_firstname[$boy]>>''s cock with giddy excitement. Going a little harder feels even better than before and without warning you begin bursting into giggles.'
+	*nl
+	'Who knew that sex was so much fun?'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'cowgirl_virg_hard2':
@@ -896,7 +826,7 @@ if $ARGS[0] = 'cowgirl_virg_hard2':
 	gs'arousal', 'vaginal',-10,'no_orgasm_msg'
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/hard2.mp4"></video></center>'
 	'With no warning other than a sudden cry, you throw yourself down on <<$npc_firstname[$boy]>>''s cock with as much force as you can. The impact reverberates through you flaring both the pain and the pleasure inside of your cunt. You raise yourself up and impale yourself again and again and again until you''re riding him like a bucking stallion. Tears stream down your face and protracted groans of exertion escape from behind your teeth, clenched in a fierce grin. Your pussy hurts so much, and you never want this pain to end.'
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 end
 
 if $ARGS[0] = 'virg_continue_harder':
@@ -1131,7 +1061,7 @@ if $ARGS[0] = 'doggy_cum':
 		'<center><video autoplay loop src="images/shared/sex/vag/doggy/orgasm1.mp4"></video></center>'
 		'You orgasm in doggy style.'
 	end
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 !!	gs'booty_call_virgin', 'virgin_continue'
 end
 
@@ -1139,7 +1069,7 @@ if $ARGS[0] = 'cowgirl_cum':
 	cla & *clr
 	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/orgasm1.mp4"></video></center>'
 	'You orgasm in cowgirl.'
-	act'Continue':gs'booty_call_cum', 'fuck_cum'
+	act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 !!	gs'booty_call_virgin', 'virgin_continue'
 end
 
@@ -1313,7 +1243,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 				else
 					'You spend the next several minutes fucking joyously, wondering why you waited so long to feel this good!'
 				end
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			end
 			if $booty_call['position'] ! 'cowgirl':
 				act'"Fuck me harder"':
@@ -1354,7 +1284,7 @@ if $ARGS[0] = 'virgin_enjoyment':
 				else
 					'You spend the next several minutes fucking joyously, wondering why you waited so long to feel this good!'
 				end
-				act'Continue':gs'booty_call_cum', 'fuck_cum'
+				act'Continue':cla & gs'booty_call_cum', 'fuck_cum'
 			end
 			if $booty_call['position'] ! 'cowgirl':
 				act'"Fuck me harder"':
@@ -1495,7 +1425,7 @@ if $ARGS[0] = 'first_time_talk':
 				end
 				
 				act'Thought: Arrogant much?':
-					*nl
+					cla & *nl
 					'<i>Fuck, arrogant much?</i> you think to yourself. <i>If only his dick was as big as his head.</i>'
 					gs'booty_call_pillow_talk', 'topics'
 				end

locations/brother.qsrc

@@ -1516,10 +1516,10 @@ if $ARGS[0] = 'pregreact':
 			cla
 			'Surprised, your brother looks at your stomach, "Are you really pregnant? It... it''s not mine, is it?"'
 			*nl
-			if $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
+			if $wombthfathID = 'A34' and npc_rel['A34'] > 50:
 				act 'Yes (Happy)':gt 'brother', 'brotherknows1'
 				act 'Yes (Angry)':gt 'brother', 'brotherknows2'
-			elseif $wombthfath = '':
+			elseif arrpos('$wombpotfath', 'A34') >= 0:
 				act 'Maybe (Happy)':gt 'brother', 'brotherknows3'
 				act 'Maybe (Angry)':gt 'brother', 'brotherknows4'
 			else
@@ -1541,10 +1541,10 @@ if $ARGS[0] = 'pregreact':
 		cla
 		'Kolka looks at your stomach for moment before asking, "Wow, you''re pregnant again? Is it mine?"'
 		*nl
-		if $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
-			act 'Yes':gt 'brother', 'brotherknows6'
-		elseif $wombthfath = '':
+
+		if arrpos('$wombpotfath', 'A34') >= 0:
 			act 'Maybe':gt 'brother', 'brotherknows7'
+			if $wombthfathID = 'A34' and npc_rel['A34'] > 50: act 'Yes':gt 'brother', 'brotherknows6'
 		else
 			act 'No':gt 'brother', 'brotherknows8'
 		end
@@ -1641,7 +1641,7 @@ end
 if $ARGS[0] = 'brotherknows6':
 	npc_pregtalk['A34'] = 1
 	*nl
-	if arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherHappy = 1:
+	if arrpos('$ChildThFath','A34') >= 0 and BrotherHappy = 1:
 		cla
 		'"Yeah, you knocked me up again," you smile at him. "I think you''re doing this on purpose." You walk closer to your brother and straddle his lap. You affectionately wrap your arms around his neck and lean your face close to his, "You like knocking up your sister, don''t you? You just love that this belly shows the whole world that I let my own brother fuck me, huh?"'
 		'Kolka stares into your <<$pcs_eyecol>> eyes, his face bright red and a bulge growing in his pants.'
@@ -1684,7 +1684,7 @@ if $ARGS[0] = 'brotherknows6':
 
 			act 'Continue':minut += 10 & gt 'sitrPar'
 		end
-	elseif arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherAngry = 1:
+	elseif arrpos('$ChildThFath','A34') >= 0 and BrotherAngry = 1:
 		cla
 		'"Yeah, it''s yours. I can''t believe you got me pregnant again." You shake your head, "I don''t know why the hell I thought you''d be more careful after the first time."'
 		'"You thought I''d be more careful? It takes two, sweetheart." He chuckles, "And besides, I didn''t hear you complaining while we were fucking."'
@@ -1705,7 +1705,7 @@ if $ARGS[0] = 'brotherknows6':
 
 			act 'Continue':minut += 10 & gt 'sitrPar'
 		end
-	elseif arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherHappy = 1:
+	elseif $wombthfathID = 'A34' and BrotherHappy = 1:
 		cla
 		act 'Happy':gt 'brother', 'brotherknows1'
 		act 'Angry':gt 'brother', 'brotherknows2'
@@ -1713,7 +1713,7 @@ if $ARGS[0] = 'brotherknows6':
 		cla
 		*pl
 		'If you see this text, report it please as a bug and remember a few variables:'
-		'arrposkolka = <<arrpos(''$ChildThFath'',''Kolka'')>>'
+		'arrposkolka = <<arrpos(''$ChildThFath'',''A34'')>>'
 		'arrsizeChild = <<arrsize(''$ChildThFath'')-1>>'
 		'momKnowsKolka = <<momKnowsKolka>>'
 		'brotherBlackmail = <<brotherBlackmail>>'
@@ -1727,18 +1727,19 @@ if $ARGS[0] = 'brotherknows7':
 	cla
 	npc_pregtalk['A34'] = 1
 	*nl
-	if arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherHappy = 1:
+!! $ChildThFath gets applied in labor so it is relatively good way to check if you think you already have babies with somebody
+	if arrpos('$ChildThFath','A34') >= 0 and BrotherHappy = 1:
 		'"It could be, I''m still not sure yet. I just wanted to give you a heads up." You then add with a wink, "Honestly, I''m kind of hoping it is. I would love to be carrying another one of my brother''s children."'
 		'"I hope so, too," he states just a little too eagerly. He then quickly moves his lips to yours and you share a passionate kiss.'
 
 		act 'Continue' :gt 'sitrPar'
-	elseif arrpos('$ChildThFath','Kolka') >= 0 and arrpos('$ChildThFath','Kolka') ! arrsize('$ChildThFath')-1 and BrotherAngry = 1:
+	elseif arrpos('$ChildThFath','A34') >= 0 and BrotherAngry = 1:
 		'"I''m still not sure," you say. "But if it is, you had better take responsibility."'
 		'Your brother rolls his eyes, "Then I really hope it''s someone else''s problem."'
 		'"Fuck off! If it''s yours then I''ll make sure you take responsibility!" You then storm away, leaving Kolka to stew.'
 
 		act 'Continue' :gt 'sitrPar'
-	elseif $wombthfath ! 'Kolka' and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
+	else
 		act 'Happy':gt 'brother', 'brotherknows3'
 		act 'Angry':gt 'brother', 'brotherknows4'
 	end
@@ -1748,19 +1749,27 @@ if $ARGS[0] = 'brotherknows8':
 	cla
 	npc_pregtalk['A34'] = 1
 	*nl
-	if arrpos('$ChildThFath','Kolka') = arrsize('$ChildThFath')-1:
+	if $wombthfathID ! 'A34' and arrpos('$ChildThFath','A34') >= 0 and $wombthfathID ! 'unknown':
 		'"Not this time. It''s actually <<$wombthfath>>''s. Why, were you hoping you''d give me more children? Sorry, but this body is just too good to limit myself to one man, even if that man is my cute younger brother," you giggle.'
 		'Kolka licks his lips, "Well, you do have a great body, so I''ll concede that point."'
 		'"You know I love you, but please don''t take this as an invitation to try to get me pregnant again. I don''t know if I''m ready for more kids." Your brother nods, clearly disappointed. "Hey, you can still fuck me, you just have to be careful."'
 
 		act 'Continue' :gt 'sitrPar'
-	elseif $wombthfath ! 'Kolka' and arrpos('$ChildThFath',$wombthfath) ! arrsize('$ChildThFath')-1:
+	elseif $wombthfathID ! 'A34' and arrpos('$ChildThFath','A34') < 0 and $wombthfathID ! 'unknown':
 		'You shake your head, "No, not this time either. It''s actually <<$wombthfath>>''s."'
 		'"Oh, congratulations again, then." You still catch disappointment in his voice.'
 		'You question him, "You weren''t trying to get me pregnant, were you?"'
 		'"Wh-what? No, of course not. I''m really happy for you." You''re pretty sure he''s lying, but you''re not going to push the subject. He''s lucky he''s cute.'
 		'"Hey, you''re my brother and I''ll love you no matter what happens. But don''t try to get me pregnant after I give birth this time. I am really not ready for more children." He nods in agreement.'
 
+		act 'Continue' :gt 'sitrPar'
+	else
+	!! Somebody with writing skills should add flavor.
+		'No, it is not.'
+		if $wombthfathID = 'unknown':
+			'I actually have no idea whose this one is.'
+		end
+
 		act 'Continue' :gt 'sitrPar'
 	end
 end

locations/brother2.qsrc

@@ -631,7 +631,7 @@ if $ARGS[0] = 'nattalk':
 	'"So Kolka, did you like what you saw in the stairway?" You ask him coyly.'
 	'"I was wondering if you did that for my benefit." He says hesitantly.'
 	'"Well? Did you like it?"'
-	'"Ofcourse I did, Natasha wasn''t wearing any panties, I could see everything."'
+	'"Of course I did, Natasha wasn''t wearing any panties, I could see everything."'
 	'"She was wearing panties." You say with a grin. "I had stuffed them in her tight pussy."'
 	'"You? Wow. That''s hot."'
 	if NatbelQW['KolkaWantsNat'] = 0:
@@ -656,7 +656,7 @@ if $ARGS[0] = 'nattalk':
 				'"How would that work?"'
 				'"Just trust me. As long as you do as I tell you it''ll work out."'
 			end
-			'"Ofcourse, I promise." He says without hesitation.'
+			'"Of course, I promise." He says without hesitation.'
 			'"Good, I''ll keep you informed."'
 			act'Continue':gt'brother','start'
 		end

locations/brother_shower_sex.qsrc

@@ -323,9 +323,9 @@ end
 if $ARGS[0] = 'brother_shower_anal':
 	broshowerfuck = daystart
 	gs 'boystat','A34'
-	brotheranal += 1
 	npc_rel['A34'] += 5
 	if brotheranal = 0:
+		brotheranal += 1
 		if stat['think_virgin'] = 1:
 			gt 'brother_shower_sex','brother_shower_anal_vagv_analv'
 		else
@@ -408,8 +408,7 @@ if $ARGS[0] = 'brother_shower_anal_vagv_analv':
 end
 
 if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
-	*clr
-	cla
+	cla & *clr
 	'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 	'You chew your lip, debating with yourself internally before just spitting it out.'
 	*nl
@@ -425,8 +424,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
 	*nl
 	'While you''re not sure if you like the label ''pussy juice'', it''s the only plan you''ve got.'
 	act '"Okay, let''s do that."':
-		*clr
-		cla
+		cla & *clr
 		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal2.mp4"></center>'
 		'Moving in behind you, Kolka lines up with your pussy before thrusting in. Feeling this, you consider hitting the abort button and returning to what you''re more familiar with, but you want that new experience and still feel the need to try it.'
 		'You widen your stance and push your ass towards Kolka. He grips your hip and his cock slowly pushes at your virgin hole. As the head of Kolka''s cock enters you, he pauses and lets out an annoyed grunt.'
@@ -437,8 +435,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
 		gs 'arousal', 'vaginal', 2
 		gs 'stat'
 		act 'This is nice':
-			*clr
-			cla
+			cla & *clr
 			'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal3.mp4"></center>'
 			'You briefly think about switching back to ''normal'' shower sex, but you still want to try this and want to see it though.'  
 			'"Keep going," you say, and Kolka pushes deeper, stopping every few seconds to let you breathe before continuing.'  
@@ -446,6 +443,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
 			'"Sorry, I''ll try to stop..."' 
 			'"No, it''s not a complaint, it was just unexpected," he replies.'
 			act 'Try to relax':
+				cla & *clr
 				'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
 				'After another minute, Kolka asks "Can I start to move now?"'  
 				'You take a deep breath. "Yes, but go slow."'  
@@ -453,8 +451,7 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
 				gs 'arousal', 'anal', 2
 				gs 'stat'
 				act 'Enjoy':
-					*clr
-					cla
+					cla & *clr
 					'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/shower/showeranal6.mp4"></center>'
 					'You find yourself needing to brace yourself on the wall with your hands. You didn''t even notice, but you''ve bent forward, allowing Kolka better access as his speed increases.'
 					'You''re really getting into it now, and are surprised by how good you feel.'
@@ -464,14 +461,13 @@ if $ARGS[0] = 'brother_shower_anal_vagnv_analv':
 					gs 'cum_call', 'anal', 'A34', 1
 					gs 'stat'
 					act 'Wash yourselves':
-						gs 'arousal', 'end'
-						gs 'stat'
-						*clr
-						cla
+						cla & *clr
 						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brotherwash.jpg"></center>'
 						'As you both quickly rewash yourselves, Kolka asks "So, was it good? More importantly, will you want to do it again?"'  
 						'You''re slightly annoyed by the ''more importantly'' part, but can''t deny that you''ve enjoyed your first butt fucking.'  
 						'"It was..." you say, letting it hang for a moment before finishing with "Good. Will it happen again? I''ll think about it."'
+						gs 'arousal', 'end'
+						gs 'stat'
 						act'Finish':mirror_steam = hour & gt $loc
 					end
 				end

locations/brother_voyeur.qsrc

@@ -779,7 +779,18 @@ if $ARGS[0] = 'brother_shower_shave':
 		'"Yeah, you''re probably right. I should shave," you say looking down at yourself, frowning at the growing body hair.'
 	end
 	
-	if pcs_leghair > 3 and pcs_pubes > 3 and stanok = 1:msg'As you pick up your razor, you realize that it''s probably only sharp enough for one more use. You''ll have to decide between a <<$pc_desc[''pubes'']>> pussy or <<$pc_desc[''legs'']>> legs.'
+	if pcs_leghair > 3 and pcs_pubes > 3 and stanok = 1:
+		msg'As you pick up your razor, you realize that it''s probably only sharp enough for one more use. You''ll have to decide between a <<$pc_desc[''pubes'']>> pussy or <<$pc_desc[''legs'']>> legs.'
+	else
+		*nl
+		'You don''t have enough hair on either your legs of pussy for you to need shave.'
+		'"Sorry bro but I don''t need to shave. Give a couple of days and I can show you." You say to the now a bit disappointed Kolka but there''s not much you can do about that.'
+		if brotherfuck > 0 or brotheranal > 0 or brotherbj > 0 or brotherwash > 5:
+			'You could cheer him up with something sexual.'
+			act'Put his hand on your pussy': gs 'brother_shower_sex', 'sex_menu'
+		end
+		act'Finish showering together':gt'brother_voyeur','brother_shower_end'
+	end
 	gs'brother_voyeur','shave_both'
 	gs'brother_voyeur','shave_legs'
 	gs'brother_voyeur','shave_pussy'

locations/buklinik_event.qsrc

@@ -125,11 +125,12 @@ if $ARGS[0] = 'pos9':
 	'You get close to a makeshift camp as one of the volunteers shouts, "Why did you leave?! Come with us, we''ll take you back to the shelter."'
 	'He shouts back, "Fuck off! Why would I?! I''m fine here, I see lovely ladies jog past here every day. I won''t return unless you''ve got hot girls at that shit place."'
 	'The volunteer turns to you, "We''ve been going back and forth with this old pervert for weeks. <<$pcs_nickname>>, do you have any idea how to lure him back?"'
+	'You notice the old man''s eyes dart towards your hips and back, maybe someone could distract him with a panty flash but they''d have to be pretty horny to even consider it.'
 
 	if pcs_horny > 50 and $pantyworntype ! 'none' and PCloSkirt > 1 and pcs_inhib > 20:
-		act 'I might have an idea':gt 'buklinik_event', 'pos10'
+		act 'I have an idea':gt 'buklinik_event', 'pos10'
 	end
-	act 'I have no idea':gt 'buklinik', 'olga2'
+	act 'Let me work on this, I think I have an idea':gt 'buklinik', 'olga2'
 end
 
 if $ARGS[0] = 'pos10':

locations/camera.qsrc

@@ -236,7 +236,13 @@ if $ARGS[0] = 'mother':
 		'You show her your photos and the one you finally decided on. "Here, look, this is the one I will use for my portfolio."'
 		'She smiles. "They do look nice... I still say it''s a waste of time, though."'
 		'You roll your eyes. "I know, <<$npc_nickname[''A29'']>>," you reply as she walks back inside.'
-		act 'Put your camera away': gt 'pav_complex', 'start'
+		act 'Put your camera away':
+			if $loc = 'kuhrPar' or $loc = 'sitrPar':
+				gt 'pav_complex', 'start'
+			else
+				gt 'gaddvor'
+			end
+		end
 	end
 end
 

locations/carF.qsrc

@@ -75,14 +75,19 @@ if $ARGS[0] = 'salon':
 	'<center><img <<$set_imgh>> src="images/pc/items/accessories/car/salon<<car>>.jpg"></center>'
 	'Gasoline - <<benz>> ' + iif(benz = 1, 'liter', 'liters') + ', the fuel tank has a capacity of 40 liters.'
 
-	if teh <= 0:teh = 0 & wrek = 1
-	if teh <= 0 or wrek = 1:$teh = 'The car is in need of repairs and won''t start.'
-	if teh >= tehcar * 75 / 100 and wrek = 0:$teh = 'The car is in excellent condition.'
-	if teh < tehcar * 75 / 100 and teh >= tehcar * 50 / 100 and wrek = 0:$teh = 'While driving, you occasionally hear some troubling noises.'
-	if teh < tehcar * 50 / 100 and teh >= tehcar * 25 / 100 and wrek = 0:$teh = 'The car seems broken and barely drives.'
-	if teh < tehcar * 25 / 100 and wrek = 0:$teh = 'How this car still runs is a mystery, even to its designers.'
+	if car['current_condition'] <= 0:car['current_condition'] = 0 & wrek = 1
+	if car['current_condition'] <= 0 or wrek = 1:
+		'The car is in need of repairs and won''t start.'
+	elseif car['current_condition'] >= car['new_condition'] * 75 / 100 and wrek = 0:
+		'The car is in excellent condition.'
+	elseif car['current_condition'] >= car['new_condition'] * 50 / 100 and wrek = 0:
+		'While driving, you occasionally hear some troubling noises.'
+	elseif car['current_condition'] >= car['new_condition'] * 25 / 100 and wrek = 0:
+		'The car seems broken and barely drives.'
+	else
+		'How this car still runs is a mystery, even to its designers.'
+	end
 
-	'<<$teh>>'
 
 	if cardrive = 1:'Through the windshield, you see St. Petersburg''s residential area.'
 	if cardrive = 2:'Through the windshield, you see St. Petersburg''s city center.'
@@ -116,11 +121,11 @@ if $ARGS[0] = 'salon':
 	act 'Get out of the car':dynamic $enddrive
 
 	if benz > 0 and wrek = 0 and prava > 0:
-		if teh >= tehcar * 75 / 100:
+		if car['current_condition'] >= car['new_condition'] * 75 / 100:
 			if rand(0, 1000) = 1000:wrek = 1
-		elseif teh >= tehcar * 50 / 100:
+		elseif car['current_condition'] >= car['new_condition'] * 50 / 100:
 			if rand(0, 100) = 100:wrek = 1
-		elseif teh >= tehcar * 25 / 100:
+		elseif car['current_condition'] >= car['new_condition'] * 25 / 100:
 			if rand(0, 100) >= 80:wrek = 1
 		else
 			if rand(0, 100) >= 40:wrek = 1
@@ -154,7 +159,7 @@ if $ARGS[0] = 'salon':
 					act 'In the salon':gt 'carF', 'salon'
 				end
 			elseif alko >= 10 and rand(0, 100) >= 50:
-				teh = teh/2
+				car['current_condition'] = car['current_condition']/2
 				wrek = 1
 				'Driving drunk, you crash into a tree and wreck your car.'
 
@@ -223,12 +228,12 @@ if $ARGS[0] = 'other':
 			elseif car_town ! 1:
 				minut += 60
 				benz -= 1
-				teh -= rand(1, 3)
+				car['current_condition'] -= rand(1, 3)
 				cardrive = 18
 			else
 				minut += 10
 				benz -= 1
-				teh -= rand(1, 3)
+				car['current_condition'] -= rand(1, 3)
 				cardrive = 18
 			end
 
@@ -247,12 +252,12 @@ if $ARGS[0] = 'other':
 			elseif car_town ! 1:
 				minut += 60
 				benz -= 1
-				teh -= rand(1, 3)
+				car['current_condition'] -= rand(1, 3)
 				cardrive = 28
 			else
 				minut += 10
 				benz -= 1
-				teh -= rand(1, 3)
+				car['current_condition'] -= rand(1, 3)
 				cardrive = 28
 			end
 
@@ -272,7 +277,7 @@ if $ARGS[0] = 'other':
 				'15 minutes later, you arrive at your destination.'
 			end
 			benz -= 1
-			teh -= rand(2, 5)
+			car['current_condition'] -= rand(2, 5)
 			cardrive = 12
 
 			dynamic $enddrive
@@ -290,7 +295,7 @@ if $ARGS[0] = 'other':
 				'25 minutes later, you arrive at your destination.'
 			end
 			benz -= 1
-			teh -= rand(2, 5)
+			car['current_condition'] -= rand(2, 5)
 			cardrive = 13
 
 			dynamic $enddrive
@@ -301,7 +306,7 @@ if $ARGS[0] = 'other':
 		act 'Go to the village of Gadukino':
 			cla
 			benz = benz - 1
-			teh = teh - RAND(3,6)
+			car['current_condition'] = car['current_condition'] - RAND(3,6)
 			cardrive = 23
 
 			if car_town ! 0:
@@ -320,7 +325,7 @@ if $ARGS[0] = 'other':
 		act 'Go to the gas station on M11':
 			cla
 			benz -= 1
-			teh -= rand(1,3)
+			car['current_condition'] -= rand(1,3)
 			minut += rand(25-50)
 			if cardrive = 1 or cardrive = 2 or cardrive = 8 or cardrive = 11 or cardrive =4 or cardrive = 5  or cardrive = 10 or cardrive = 28 or cardrive = 18:
 				minut += 10
@@ -334,7 +339,7 @@ if $ARGS[0] = 'other':
 		cla
 		minut += 60
 		benz -= 4
-		teh -= rand(2, 6)
+		car['current_condition'] -= rand(2, 6)
 		pcs_mood += 20
 		'You go to the track and have fun driving around before leaving.'
 
@@ -371,7 +376,7 @@ if $ARGS[0] = 'nearby':
 	cla
 	minut += 5
 	benz -= 1
-	teh -= rand(1, 3)
+	car['current_condition'] -= rand(1, 3)
 	cardrive = ARGS[1]
 	if cardrive = 8: minut += 5
 	'5 minutes later, you arrive at your destination.'

locations/cardgame_durak.qsrc

@@ -193,7 +193,7 @@ if $ARGS[0] = 'card_game_durak_play':
 		end
 	end
 	if $cgd_clothes ! '' and $cgd_clothes['A11'] ! '' and $cgd_clothes['A10'] ! '' and $cgd_clothes['A9'] ! '':
-		if RAND(1,100) <= 60:
+		if RAND(1,100) <= 50:
 			card_game_durak_win += 1
 			pcs_horny += 5
 			pcs_mood += 5
@@ -211,7 +211,7 @@ if $ARGS[0] = 'card_game_durak_play':
 			'<img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/shulginhome/bigroom/card/card3.jpg">'
 			'You have a great set of cards in your hand, and easily win the round. <<$npc_usedname[$cgd_name_npc]>> loses, and reluctantly takes off his<<$clo_str>>.'
 			act 'Deal': gt 'cardgame_durak', 'card_game_durak_play'
-		elseif RAND(1,40) < 35:
+		elseif RAND(1,40) < 30:
 			card_game_durak_loss += 1
 			if strpos($cgd_clothes,'socks')>0:
 				$clo_str = ' socks'

locations/cikl.qsrc

@@ -858,7 +858,7 @@ if mid($start_type,1,2) = 'sg':
 				:hotcat_calc_jump
 				i += 1
 				
-				if hotcat_rating['A<<i>>'] = 0: jump 'hotcat_calc_jump'
+				if hotcat_rating['A<<i>>'] = 0 and i < 145: jump 'hotcat_calc_jump'
 				
 				switch_rand = rand(1,100)
 				

locations/city_clinic.qsrc

@@ -326,7 +326,7 @@ if $ARGS[0] = 'start':
 							money -= 4500
 							minut += 60
 							glass = 2
-							gs 'body_desc'
+							gs 'AppearanceSystem', 'UpdateBaseAppearnce'
 							gs 'stat'
 							'You buy a new, more stylish pair of glasses.'
 
@@ -339,7 +339,7 @@ if $ARGS[0] = 'start':
 							karta -= 4500
 							minut += 60
 							glass = 2
-							gs 'body_desc'
+							gs 'AppearanceSystem', 'UpdateBaseAppearnce'
 							gs 'stat'
 							'You buy a new, more stylish pair of glasses.'
 
@@ -374,7 +374,7 @@ if $ARGS[0] = 'start':
 							minut += 60
 							blizoruk = 0
 							glass = 0
-							gs 'body_desc'
+							gs 'AppearanceSystem', 'UpdateBaseAppearnce'
 							gs 'stat'
 							'You undergo laser eye surgery. Your eyesight is much better now.'
 							act 'Return to the entrance':gt 'city_clinic', 'start'

locations/city_coffee_hole.qsrc

@@ -27,8 +27,8 @@ if $args[0]= 'inner':
 	'<center><h4><font color="maroon">Cafe "Coffee Hole"</font></h4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/island/coffee_hole/inside.jpg"></center>'
 	'The cafe looks like it was once some type of industrial building, with tall ceilings, exposed pipes, ductwork and lights. The counter is in the far corner, while the middle of the room contains several tables and chairs. Along the wall opposite the counter is an area with several couches for people to sit and relax. The menu board shows a wide range of flavoured coffees, teas, espressos and pastries, among other things.'
-	if mid($start_type,1,2) = 'sg' and yearstart >= 2 and (((week = 2 or week = 4 or week = 7) and hour >= 18) or (week = 5 and hour >= 10 and hour < 16)):
-			'You see a familiar face working behind the counter, your classmate <a href="exec:gt ''city_coffee_hole'', ''anushka_work''">Anushka.</a>'
+	if yearstart >= 2 and (((week = 2 or week = 4 or week = 7) and hour >= 18) or (week = 5 and hour >= 10 and hour < 16)):
+		'You see a familiar face working behind the counter, your former classmate <a href="exec:gt ''city_coffee_hole'', ''anushka_work''">Anushka.</a>'
 	end
 	if locat['katja'] = 30 and (katjaQW['know_going_to_teaching_degree'] = 1 or mid($start_type,1,2) = 'sg'):
 		'You see your classmate <a href="exec:gt ''katja_chat'', ''coffee_hole''">Katja</a> sitting at a table with a pile of books, a cup of coffee and a plate of food.'

locations/city_house_res_misc.qsrc

@@ -25,7 +25,7 @@ if $ARGS[0] = 'fronty':
 	end
 
 	*clr & cla
-	'<center><b><font color="maroon">Living Room</font></b></center>'
+	'<center><b><font color="maroon">Your city residential house</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/house/crh_fronty.jpg"></center>'
 	'Your small two story house sits on the edge of the residential area. Despite that, your neighbors are pretty close and the sounds of the street fill the air.'
 	*nl
@@ -183,7 +183,7 @@ if $ARGS[0] = 'livroom':
 						minut += 15
 						gs'stat'
 						'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
-						act'Set the tapestry aside':gt $curloc
+						act'Set the tapestry aside':gt 'city_house_res_misc', 'livroom'
 					end
 				end
 			end
@@ -205,7 +205,7 @@ if $ARGS[0] = 'livroom':
 					gobelen += 1
 					'Your work on the tapestry is done.'
 				end
-				act'Set the tapestry aside':gt $curloc
+				act'Set the tapestry aside':gt 'city_house_res_misc', 'livroom'
 			end
 		end
 	end

locations/city_industrial.qsrc

@@ -51,7 +51,7 @@ if $ARGS[0] = '':
 	if hour >= 4 and hour <= 23:
 		act 'Walk to the Metro': minut += 5 & gt 'metro', 'start'
 	end
-	if evt_chk = '1':
+	if evt_chk = 1:
 		!! We've got an event today, check it's location:
 		gs 'emp_functions', 'disp_evt', 3
 	end

locations/city_jorahouse.qsrc

@@ -1450,7 +1450,7 @@ if $ARGS[0] = 'ev65':
 	gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
 	gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
 	gs 'stat'
-	act 'Return to dressing room':gt 'fit', 'dressing room'
+	act 'Return to dressing room':gt 'fit', 'dressing_room'
 end
 
 !!Jesus, what hueta, I cried tears of blood

locations/city_mansion_residence_2.qsrc

@@ -82,7 +82,7 @@ if $ARGS[0] = 'ylounge':
 							gs'stat'
 							'You spend 15 minutes at the embroidery frame, preparing the fabric and outlining the pattern for the tapestry.'
 
-							act'Set the tapestry aside':gt $curloc
+							act'Set the tapestry aside':gt 'city_mansion_residence_2', 'ylounge'
 						end
 					end
 				end
@@ -104,7 +104,7 @@ if $ARGS[0] = 'ylounge':
 						gobelen += 1
 						'Your work on the tapestry is done.'
 					end
-					act'Set the tapestry aside':gt $curloc
+					act'Set the tapestry aside':gt 'city_mansion_residence_2', 'ylounge'
 				end
 			end
 		end

locations/city_market.qsrc

@@ -212,7 +212,7 @@ if $ARGS[0] = 'clo':
 			end
 		end
 	i += 1
-	if i <= 20:jump 'loopmarket_outfits'
+	if i <= 40:jump 'loopmarket_outfits'
 
 	clo_i += 1
 	if clothingfilter['quality'] = 0 and clo_i <= 7:

locations/city_residential.qsrc

@@ -93,7 +93,7 @@ end
 
 act 'Walk to the central park (0:20)': minut += 20 & gt 'city_park', 'start'
 act 'Walk to the lake': minut += 40 & gt 'city_lake', 'start'
-if evt_chk = '1':
+if evt_chk = 1:
 	!! We've got an event today, check it's location:
 	gs 'emp_functions', 'disp_evt', 3
 end

locations/clothing.qsrc

@@ -222,7 +222,7 @@ if $ARGS[0] = 'view_clothing_list':
 
 	if ARRSIZE('materinstvo_dress') > 0:'<center><a href="exec:$ward_list_store = ''materinstvo'' & gt ''clothing'', ''clothing_list'', ''materinstvo''"><img src="images/locations/city/citycenter/mall/mommy.png"></a></center>'
 
-	if ARRSIZE('market_outfits') > 0:'<center><a href="exec:$ward_list_store = ''market'' & gt ''clothing'', ''clothing_list'', ''market''">Clothes from the market</a></center>'
+	if ARRSIZE('market_outfits') > 0:'<center><a href="exec:$ward_list_store = ''market'' & gt ''clothing'', ''clothing_list'', ''market''"><img src="images/pc/items/market/market.png"></a></center>'
 
 	act 'Leave': killvar '$ward_list_store' & gt $loc, $loc_arg
 	act 'Your Clothes': gt 'wardrobe', 'main'
@@ -1414,16 +1414,20 @@ if $ARGS[0] = 'view_clothing_item':
 		if CloInhibit <= 10:
 			'<font color="blue">This uniform is very conservative. Only the nerds would approve of you wearing it.</font>'
 		elseif CloSkirtShortness < 5 and CloThinness < 5 and CloBra = 0:
-			if CloQuality >= 4:
+			if CloInhibit >= 30 or CloTopCut = 4:
+				'<font color="red">This uniform, despite meeting the school uniform regulations, is too risqué. Everybody in school apart from the gopniks will think that you''re a slut but they will respect you for beating the school rules.</font>'
+			elseif CloQuality >= 4:
 				'<font color="blue">This uniform complies with the regulations and is of good quality. It would certainly help you with your standing with the cool kids and jocks.</font>'
 			else
 				'<font color="blue">This uniform complies with the school regulations on skirt length. Nobody in school would be offended by you wearing it.</font>'
 			end
 		elseif CloSkirtShortness = 5 and CloThinness < 5 and CloBra = 0:
-			if CloQuality >= 4:
+			if CloInhibit >= 25:
+				'<font color="red">This uniform slightly breaches the school uniform regulations and it is too risqué. Everybody in school apart from the gopniks will think that you''re a slut.</font>'
+			elseif CloQuality >= 4:
 				'<font color="blue">This uniform slightly breaches the school regulations on skirt length and is of good quality. Everybody apart from the nerds would approve of you wearing it.</font>'
 			else
-				'<font color="blue">This uniform slightly breaches the school regulations on skirt length. The gopnik would approve of you wearing it.</font>'
+				'<font color="blue">This uniform slightly breaches the school regulations on skirt length. The gopnik would approve of you wearing it but they will respect you for beating the school rules.</font>'
 			end
 		else
 			'<font color="red">This uniform makes a mockery of the school uniform regulations. Everybody in school apart from the gopniks will think that you''re a slut.</font>'

locations/clothing_QV.qsrc

@@ -1359,7 +1359,7 @@ if $ARGS[0] = 'change':
 					end
 				end
 			else
-				if CloThinness < 6:		
+				if CloThinness < 6 or $clothingworntype = 'salacious_outfits' or $clothingworntype = 'salacious_dress':	
 					act 'Wear this outfit':
 						cla
 						*clr		

locations/clothing_attributes.qsrc

@@ -194,7 +194,13 @@ elseif $ARGS[0] = 'nerdvana_swimsuit':
 end
 
 if $ARGS[0] ! 'allure_swimsuit' and $ARGS[0] ! 'allure_bikinis' and $ARGS[0] ! 'scandalicious_swimsuit' and $ARGS[0] ! 'scandalicious_bikinis' and $ARGS[0] ! 'danilovich_swimsuit' and $ARGS[0] ! 'nerdvana_swimsuit' and $ARGS[0] ! 'nerdvana_bikinis':
-	if CloSkirtShortness = 6:
+	if CloCoverFront = 4:
+		CloInhibit = 50
+	elseif CloCoverFront = 3 or CloCoverTop = 4:
+		CloInhibit = 45
+	elseif CloCoverFront = 2 or CloCoverTop = 3:
+		CloInhibit = 40
+	elseif CloSkirtShortness = 6 or CloCoverFront = 1 or CloCoverTop = 2:
 		CloInhibit = 35
 	elseif CloSkirtShortness = 5 or CloPantsShortness = 6:
 		if CloThinness = 6:
@@ -205,7 +211,7 @@ if $ARGS[0] ! 'allure_swimsuit' and $ARGS[0] ! 'allure_bikinis' and $ARGS[0] ! '
 	elseif CloPanties = 1 or CloPantsShortness = 5:
 		if CloThinness = 6:
 			CloInhibit = 35
-		elseif CloBra = 1:
+		elseif CloBra = 1 or CloCoverTop = 2:
 			CloInhibit = 30
 		else
 			CloInhibit = 25
@@ -213,7 +219,7 @@ if $ARGS[0] ! 'allure_swimsuit' and $ARGS[0] ! 'allure_bikinis' and $ARGS[0] ! '
 	elseif CloSkirtShortness = 4:
 		if CloThinness = 6:
 			CloInhibit = 35
-		elseif CloBra = 1:
+		elseif CloBra = 1 or CloCoverTop = 2:
 			CloInhibit = 30
 		elseif CloTopCut = 4 or CloThinness = 5:
 			CloInhibit = 25
@@ -223,7 +229,7 @@ if $ARGS[0] ! 'allure_swimsuit' and $ARGS[0] ! 'allure_bikinis' and $ARGS[0] ! '
 	elseif CloSkirtShortness = 3:
 		if CloThinness = 6:
 			CloInhibit = 35
-		elseif CloBra = 1:
+		elseif CloBra = 1 or CloCoverTop = 2:
 			CloInhibit = 30
 		elseif CloTopCut = 4 or CloThinness = 5:
 			CloInhibit = 25
@@ -235,7 +241,7 @@ if $ARGS[0] ! 'allure_swimsuit' and $ARGS[0] ! 'allure_bikinis' and $ARGS[0] ! '
 	elseif CloSkirtShortness = 2 or CloPantsShortness = 3:
 		if CloThinness = 6:
 			CloInhibit = 35
-		elseif CloBra = 1:
+		elseif CloBra = 1 or CloCoverTop = 2:
 			CloInhibit = 30
 		elseif CloTopCut = 4 or CloThinness = 5:
 			CloInhibit = 25
@@ -249,7 +255,7 @@ if $ARGS[0] ! 'allure_swimsuit' and $ARGS[0] ! 'allure_bikinis' and $ARGS[0] ! '
 	else
 		if CloThinness = 6:
 			CloInhibit = 35
-		elseif CloBra = 1:
+		elseif CloBra = 1 or CloCoverTop = 2:
 			CloInhibit = 30
 		elseif CloTopCut = 4 or CloThinness = 5:
 			CloInhibit = 25

locations/crossfit_north_box.qsrc

@@ -1,19 +1,13 @@
 # crossfit_north_box
-
-$loc = 'crossfit_north_box'
-$locM = 'crossfit_north_box'
+menu_off = 0
+gs 'shortgs', 'setloc', 'crossfit_north_box', $ARGS[0]
 $sexloc = 'crossfit_north_box'
 $location_type = 'public_indoors'
-$loc_arg = 'box'
-$locM_arg = 'box'
 $crossfit_north_image_dir = 'images/locations/city/citycenter/gym/crossfit/'
-$menu_loc = 'crossfit_north_box'
-$menu_arg = 'box'
-menu_off = 0
 
 if $ARGS[0] = 'box':
 	
-	act 'Leave': gt 'fit', 'dressing room'
+	act 'Leave': gt 'fit', 'dressing_room'
 	
 	if crossfit_random_choice < daystart OR $todays_crossfit_wod = '':
 		gs 'crossfit_north_wod', 'setup_wod'
@@ -84,7 +78,7 @@ if $ARGS[0] = 'box':
 					end
 					killvar 'current_wod_score'
 					act 'Finish and go to the changing room':
-						gt 'fit', 'dressing room'
+						gt 'fit', 'dressing_room'
 					end
 				end
 			end

locations/cum_cleanup.qsrc

@@ -255,7 +255,6 @@ elseif $ARGS[0] = '':
 	if i < arrsize('$sparrnam'):
 		tmp = arrpos('deresidue', sparrloc[i])
 		if tmp ! -1 and tmp < arrsize('deresidue'): sparrslc[i] = 0 & sparrvol[i] = 0
-		if (arrsize('toclean') = 12 or cumspclnt = 2) and pcs_breath = 1: pcs_breath = 0
 
 		tmp = arrpos('toclean', sparrloc[i])
 		if tmp ! -1 and tmp < arrsize('toclean'):

locations/danceclass.qsrc

@@ -20,7 +20,7 @@ if pcs_energy >= 10:
 		if pcs_danc < 100:'You study modern dance, which is very popular in the clubs.'
 		if pcs_danc >= 100:'The day has finally come, you''ve been working hard, and you realize that you''ve learned everything you can from this class.'
 
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	end
 
 	act 'Burlesque class (0:30)':
@@ -40,7 +40,7 @@ if pcs_energy >= 10:
 			'This class isn''t just about taking your clothes off, it''s a difficult dance style and your basics aren''t sufficent. Instead, the teacher helps you with your basic modern dance steps.'
 		end
 
-		act 'Leave':gt 'fit', 'dressing room'
+		act 'Leave':gt 'fit', 'dressing_room'
 	end
 
 	if pcs_stren >=40 or needstrength = 0:
@@ -62,7 +62,7 @@ if pcs_energy >= 10:
 				if pcs_stren < 40:'The instructor tries to be patient with you, but it is clear that you are too weak for this sort of dance.' & needstrength = 1
 			end
 
-			act 'Leave':gt 'fit', 'dressing room'
+			act 'Leave':gt 'fit', 'dressing_room'
 		end
 	else
 		act 'Modern dance class (0:30)': '<br><font color="red">You don''t have enough energy to use this action.</font>'
@@ -76,7 +76,7 @@ else
 	'You are so hungry you can''t even bring yourself to look at the activities available'
 end
 
-act 'Leave':gt 'fit', 'dressing room'
+act 'Leave':gt 'fit', 'dressing_room'
 
 
 --- danceclass ---------------------------------

locations/dateM.qsrc

@@ -18,9 +18,9 @@ if $ARGS[0] = 'start':
 	*clr & cla
 	!! generate a boy
 	if $region = 'pav':
-		gs 'npcgeneratec', 0, 'Stranger', rand(18,45), 1
+		gs 'npcgeneratec', 0, '', rand(18,45), 1
 	elseif $region = 'city':
-		gs 'npcgeneratec', 0, 'Stranger', rand(18,45), rand(3,4)
+		gs 'npcgeneratec', 0, '', rand(18,45), rand(3,4)
 	end
 	gs 'boyStat', $npclastgenerated
 	act 'Ignore him and hurry away':gt $loc, $loc_arg

locations/din_van.qsrc

@@ -1026,7 +1026,9 @@ if $ARGS[0] = 'private':
 	end
 
 	if mosolmaz > 0: 'On a shelf is a tube of ointment for chafing, which will be enough for <b><<mosolmaz>></b> applications.'
-
+	if item_moisturizer > 0: 
+		'You look at your moisturiser and think you have about <<item_moisturizer>> applications left.'
+	end
 	if tampon = 0 and sanpad = 0:
 		'<b><font color="red">You have no feminine hygiene products left.</font></b>'
 	elseif tampon = 1 and tampon['warning'] ! daystart:
@@ -1034,7 +1036,7 @@ if $ARGS[0] = 'private':
 		msg'<font color="red">You only have <b><<tampon>></b> tampon left!</font>'
 	elseif tampon = 1:
 		msg'<font color="red">You only have <b><<tampon>></b> tampon left.</font>'
-	else
+	elseif tampon > 0:
 		'You have <b><<tampon>></b> tampons.'
 	end
 	
@@ -1043,7 +1045,7 @@ if $ARGS[0] = 'private':
 		msg'<font color="red">You only have <b><<sanpad>></b> pad left!</font>'
 	elseif sanpad = 1:
 		'<font color="red">You have only <b><<sanpad>></b> pads left.</font>'
-	else
+	elseif sanpad > 0:
 		'You have <b><<sanpad>></b> pads.'
 	end
 
@@ -1768,7 +1770,6 @@ if $ARGS[0] = 'shave_options':
 		'Rectangle'
 	end
 	
-	
 	'</center></TD><TR><center>'
 	'Your razor will last for <b><<stanok>></b> more shaves.'
 	*nl

locations/emp_functions.qsrc

@@ -7,34 +7,34 @@
 !! v.01 - Initial code base
 !! v.02 - Event generator partially integrated
 !! v.03 - Job management system integrated
-!! v. 04 - Start of event generation code integration
-!!
+!! v.04 - Start of event generation code integration
+!! v.05 - Date suffix modification
 
 !! --------------------- UI Interface for Journal
 
 if $ARGS[0] = 'gen_schedule':
-	*clr & cla
+	*clr & cla 
 		if night_mode = 1 or night_mode = 2:
 		$header_theme = '#91B0B4'
 		$body_theme = '#303030'
-		$body_theme_alt	 = '#474747'
+		$body_theme_alt  = '#474747'
 		$font_theme = '#000000'
 	else
 		$header_theme = '#e27c00'
 		$body_theme = '#E0DED4'
-		$body_theme_alt	 = '#D58B32'
+		$body_theme_alt  = '#D58B32'
 		$font_theme = '#FFFFFF'
 	end
-	if	function_sw = 1:	'<center><h2>' + $npc_firstname['A<<mod_npc_id>>'] + ' ' + $npc_lastname['A<<mod_npc_id>>'] + '</h2></center>'
-	if function_sw = 2:
+	if  function_sw = 1:	'<center><h2>' + $npc_firstname['A<<mod_npc_id>>'] + ' ' + $npc_lastname['A<<mod_npc_id>>'] + '</h2></center>'
+	if function_sw = 2: 
 		gs 'journal', 'journalmenu'
 		'<center><h2>Work</h2></center>'
 	end
 	!! Enable selector if attending school or Uni by NPC group type or by character and set default to School
-	if (npc_grupTipe['A<<mod_npc_id>>']>= 1 and npc_grupTipe['A<<mod_npc_id>>']<= 5) or mod_npc_id = 34 and function_sw <= 1:
+	if (npc_grupTipe['A<<mod_npc_id>>']>= 1 and npc_grupTipe['A<<mod_npc_id>>']<= 5) or mod_npc_id = 34 and function_sw <= 1: 
 		if flag_schedule = 0: flag_schedule = 1
 		school_group = 1
-		'<center>Change to: <a href="exec: flag_schedule = 1 & gs ''emp_functions'', ''gen_schedule''">School</a> | <a href="exec: flag_schedule = 2 &	gs ''emp_functions'', ''gen_schedule''">University</a> | <a href="exec: flag_schedule = 3 &	 gs ''emp_functions'', ''gen_schedule''">Holiday</a> </center>'
+		'<center>Change to: <a href="exec: flag_schedule = 1 & gs ''emp_functions'', ''gen_schedule''">School</a> | <a href="exec: flag_schedule = 2 &  gs ''emp_functions'', ''gen_schedule''">University</a> | <a href="exec: flag_schedule = 3 &  gs ''emp_functions'', ''gen_schedule''">Holiday</a> </center>'
 	else
 		!! Set schedule to holiday / non-edu NPCs
 		flag_schedule = 3
@@ -43,11 +43,11 @@ if $ARGS[0] = 'gen_schedule':
 	!! Initiate loop variables
 
 	i_day = 1
-	mod_max_day = 7
+    mod_max_day = 7
 	i_hour = ARGS[1]
-	mod_max_hour = ARGS[1] + 8
-	header_switch = 1
-	killvar '$tablebody'
+    mod_max_hour = ARGS[1] + 8 
+    header_switch = 1
+	killvar '$tablebody'   
 	killvar '$tableheader'
 
 	!! create header, using header switch to fill in :00 or :30 automatically using mod to determine odd/even and set display hour automatically.
@@ -61,13 +61,13 @@ if $ARGS[0] = 'gen_schedule':
 		if header_switch = 1:
 			header_switch += 1
 			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<<display_hour >>', display_hour) + ':00</font></th>'
-		elseif header_switch=2:
+		elseif header_switch=2: 
 			header_switch = 1
 			$tableheader += '<th style="padding: 10px;"><font color="<<$font_theme>>">' + iif(display_hour < 10, '0<< display_hour>>', display_hour) + ':30</font></th>'
-		end
+		end		
 		i_hour += 1
 	if i_hour <=  mod_max_hour: jump 'jmp_header_create'
-	! Reset i_hour for next loop
+	! Reset i_hour for next loop	
 	killvar 'display_hour'
 	killvar 'header_switch'
 	i_hour = ARGS[1]
@@ -75,17 +75,17 @@ if $ARGS[0] = 'gen_schedule':
 	!! Close out table header
 	$tableheader += '</tr>'
 	!! Create table body, with alternating colour rows for legibility
-	:jmp_day_create
+    :jmp_day_create
 
-		!Set day
-		if i_day = 1 or i_day = 3 or i_day = 5 or i_day = 7:
-			$tablebody += '<tr><td	style="padding: 10px;" bgcolor="<<$header_theme>>"><b><font color="<<$font_theme>>">' + $week[i_day] + '</font></b></td>'
+        !Set day
+        if i_day = 1 or i_day = 3 or i_day = 5 or i_day = 7:
+			$tablebody += '<tr><td  style="padding: 10px;" bgcolor="<<$header_theme>>"><b><font color="<<$font_theme>>">' + $week[i_day] + '</font></b></td>'
 		else
 			$tablebody += '<tr bgcolor="<<$body_theme_alt>>"><td  style="padding: 10px;" bgcolor="<<$header_theme>>"><b><font color="<<$font_theme>>">' + $week[i_day] + '</font></b></td>'
 		end
 		!! fill the slots from the NPC schedule
 
-		:jmp_hour_create
+        :jmp_hour_create 
 			if i_day >= 1:
 
 				!! Create function switcher:
@@ -94,15 +94,15 @@ if $ARGS[0] = 'gen_schedule':
 				!! 3: Event Tracker
 
 				if function_sw = 1 or function_sw = 0:
-					dynamic $schedule_tracker
+					dynamic $schedule_tracker 
 				elseif function_sw = 2:
-					flag_active	 = 1
-					j_id = emp_rota_week[i_day +  '_' + i_hour]
-					if emp_rota_week[i_day +  '_' + i_hour] ! 0:
-						$transient_tb =	 '<a  href="exec:gs ''emp_functions'', ''job_info'', <<j_id>>">' + $emp_job_title[j_id] + '</a>'
-					else
-						$transient_tb  = 'Free'
-					end
+                    flag_active  = 1
+                    j_id = emp_rota_week[i_day +  '_' + i_hour]
+                    if emp_rota_week[i_day +  '_' + i_hour] ! 0:							
+                        $transient_tb =  '<a  href="exec:gs ''emp_functions'', ''job_info'', <<j_id>>">' + $emp_job_title[j_id] + '</a>'
+                    else
+                        $transient_tb  = 'Free'
+                    end
 				elseif function_sw = 3:
 				else
 					msg 'Error - Failed to create body. Please set content switch.'
@@ -114,42 +114,42 @@ if $ARGS[0] = 'gen_schedule':
 					$tablebody +=  '<td style="padding: 10px;">' + $transient_tb +'</td>'
 					flag_active = 0
 					killvar '$transient_tb'
-				end
+				end	
 			else
 				 i_day += 1
 				 jump 'jmp_day_create'
 			end
 			i_hour += 1
-			if i_hour <=  mod_max_hour: jump 'jmp_hour_create'
+            if i_hour <=  mod_max_hour: jump 'jmp_hour_create'
 			$tablebody +='</tr>'
 			i_day += 1
 			i_hour = ARGS[1]
-		if i_day <= mod_max_day: jump 'jmp_day_create'
+        if i_day <= mod_max_day: jump 'jmp_day_create'	
 	!! Create navigaton bars
 	if (mod_max_hour + 8)  <= 48:
 		set_hour = ARGS[1] + 8
-		$msg_forward = '<a	href="exec:gs ''emp_functions'', ''gen_schedule'', <<set_hour>>"><b>Forward 4 hours</b></a>'
+		$msg_forward = '<a  href="exec:gs ''emp_functions'', ''gen_schedule'', <<set_hour>>"><b>Forward 4 hours</b></a>'
 	else
 		$msg_forward = 'End of Day'
 	end
-	if (mod_max_hour  - 8) >0 :
+    if (mod_max_hour  - 8) >0 :
 		set_hour = ARGS[1] - 8
-		$msg_back = '<a	 href="exec:gs ''emp_functions'', ''gen_schedule'', <<set_hour>>"><b>Back 4 hours</b></a>'
-	else
+        $msg_back = '<a  href="exec:gs ''emp_functions'', ''gen_schedule'', <<set_hour>>"><b>Back 4 hours</b></a>'
+    else
 		$msg_back = 'Start of day'
+    end
+
+    !! Start the table constuction    
+    '<center><table border=0 cellpadding=1 bgcolor="<<$body_theme>>" width="95%" align="center"><<$tableheader>><<$tablebody>></table>'
+    '<<$msg_back>> | <<$msg_forward>>'
+    *nl
+    if  function_sw = 1:
+	'<b>Note:</b> Times are approximate, some characters will appear at quarter past or quarter to the hour.</center>' 
 	end
-
-	!! Start the table constuction
-	'<center><table border=0 cellpadding=1 bgcolor="<<$body_theme>>" width="95%" align="center"><<$tableheader>><<$tablebody>></table>'
-	'<<$msg_back>> | <<$msg_forward>>'
-	*nl
-	if	function_sw = 1:
-	'<b>Note:</b> Times are approximate, some characters will appear at quarter past or quarter to the hour.</center>'
-	end
-	if	function_sw = 2:
-		'<b>Note:</b> Times are approximate, some jobs may extend past the allotted time or have flexi-starts.</center>'
+	if  function_sw = 2:
+		'<b>Note:</b> Times are approximate, some jobs may extend past the allotted time or have flexi-starts.</center>' 
 	end
-	act 'Back':
+    act 'Back':
 		killvar 'flag_schedule'
 		killvar 'school_group'
 		killvar 'j_id'
@@ -165,7 +165,7 @@ if $ARGS[0] = 'job_info':
 	$msg_body += '<p>Location: ' + $emp_job_loc[j_id] + '</p>'
 	$msg_body += '<p>Notes: ' + $emp_job_notes[j_id]+ '</p>'
 	$msg_body += '<p>Wages: ' +emp_job_wages[j_id] + '<b>₽</b></p>'
-
+	
 	msg '<<$msg_body>>'
 end
 
@@ -191,15 +191,15 @@ if $ARGS[0] = 'disp_evt':
 		'I have this job for you do you want to acccept it?'
 		*nl
 		'Event Scheduled for: ' + transient_evt_day + $evt_suffix + ', '+ $monthName[transient_evt_month] +' '+ '20' + transient_evt_year
-		'Job: ' + $evt_job[transient_evt_type]
+		'Job: ' + $evt_job[transient_evt_type]  			
 		'Pay: ' + transient_evt_wages
 		'Time: ' + transient_evt_hour + ':' +  iif(transient_evt_minutes  >= 0 and transient_evt_minutes <= 4, '00',  '30')
 		'Duration: ' + transient_evt_duration  + iif(transient_evt_duration  = 1, ' hour',  ' hours')
 		'Location reminder: ' + $transient_mc_locat
 		'Job Details: ' + $transient_desc
-
+		
 		act 'Accept the job' : gs 'emp_functions', 'cat_evt'
-		act 'Decline the job':
+		act 'Decline the job': 
 			gs 'emp_functions',  'del_evt', 1
 			gt 'emp_functions', 'evt_init'
 		end
@@ -209,22 +209,22 @@ if $ARGS[0] = 'disp_evt':
 	if ARGS[1] = 2:	
 		if evt_event[0] ! '':			
 			killvar '$evtbody'
-			job_idx = 0
+			job_idx = 0		
 			*nl
 			:jmp_list_create
-				if evt_silent[job_idx] = 1:
-					$evtbody += '<tr><td>' +$week[evt_dow[job_idx]]+' '+ evt_day[job_idx] + $evt_suffix + ', '+ $monthName[evt_month[job_idx]] +' 20'+ evt_year[job_idx] + '</td><td>' + $evt_job[evt_event[job_idx]] + '</td>'
+				!!if evt_silent[job_idx] = 1:
+					$evtbody += '<tr><td>' +$week[evt_dow[job_idx]]+' '+ evt_day[job_idx] + $evt_suffix + ', '+ $monthName[evt_month[job_idx]] +' 20'+ evt_year[job_idx] + '</td><td>' + $evt_job[evt_event[job_idx]] + '</td>' 
 					$evtbody += '<td>' + evt_wages[job_idx] + '₽</td><td>' + evt_hour[job_idx] + ':' +  iif(evt_minutes[job_idx] >= 0 and evt_minutes[job_idx] <= 4, '00', '30') + '</td>'
 					$evtbody += '<td>' + evt_duration[job_idx] + iif(evt_duration[job_idx]  = 1, ' hour',  ' hours') + '</td><td>' + $evt_mc_locat[job_idx] + '</td>'
 					$evtbody += '<td><a  href="exec: gs ''emp_functions'',''del_evt'', 2, <<job_idx>>"><img src="images\system\icons\evt_del.png"></a></a></td></tr>'
-				end
+				!!end
 				job_idx += 1
 				if job_idx < arrsize('evt_event') : jump 'jmp_list_create'
-				if evt_silent[job_idx] = 1:
-					'<center><h2>Current Task List</h2></center>'
+				!!if evt_silent[job_idx] = 1: 
+					'<center><h2>Current Task List</h2></center>'		
 					$evtheader = '<tr><th>Date</th><th>Task</th><th>Pay</th><th>Time</th><th>Duration</th><th>Location</th><th>Cancel Job</th></tr>'
 					'<center><table width="90%" align="center" width="90%" cellspacing="5" cellpadding="5" valign="top"><tr><<$evtheader>><<$evtbody>></tr></table></center>'
-				end
+				!!end
 				killvar '$evtbody'
 				killvar '$evtheader'
 			else
@@ -233,17 +233,19 @@ if $ARGS[0] = 'disp_evt':
 	end
 
 	!! Display the location acts
-	if ARGS[1] = 3 and evt_chk = '1':
+	if ARGS[1] = 3 and evt_chk = 1:
 		act_idx = 0
 		act_tracker = 0
 		act_found = 0
-		:jmp_act_create
-			 if evt_hour[act_tracker] = hour or evt_hour[act_tracker] = (hour -1):
+		:jmp_act_create			
+			 if evt_hour[act_tracker] = hour or evt_hour[act_tracker] = (hour -1): 
 				act_found = 1
-				act_idx = act_tracker
+				act_idx = act_tracker 				
 			 end
-			 act_tracker +=1
-		if act_tracker < arrsize('evt_event') or act_found = 0: jump 'jmp_act_create'
+			 act_tracker +=1 
+		if act_found = 0:
+			if act_tracker < arrsize('evt_event'): jump 'jmp_act_create'
+		end
 		if ((evt_hour[act_idx] = hour and evt_minutes[act_idx] <= minut) or evt_hour[act_idx] = (hour - 1)) and $loc = $evt_loc[act_idx]:
 			act 'Attend your ' + $evt_job[evt_event[act_idx]] + ' event':
 				gs 'emp_functions', 'array_init'
@@ -259,43 +261,43 @@ if $ARGS[0] = 'disp_evt':
 	end
 end
 
-if $ARGS[0] = 'gen_evt':
+if $ARGS[0] = 'gen_evt':	
 	!! Get the current year - remove 2000 to get the right year for search function.
 	transient_evt_year = year - 2000
-
+	
 	!! Figure out the month for the seed and ensure it rolls over into new calendar year.
-	if month = 12:
+	if month = 12:			
 		evt_mseed = 1
 		transient_evt_year += 1
 	else
 		evt_mseed = month + 1
 	end
 
-	!! randomise the month and month + 1
-	transient_evt_month = rand(month,  evt_mseed)
+	!! randomise the month and month + 1 	
+	transient_evt_month = rand(month,  evt_mseed)      
 	:jmp_job_create
 		if transient_evt_month = month:
 			if (day + 7) > monthsend[transient_evt_month]:
 				transient_evt_month += 1
 				evt_dseed = 1
-			end
+			end	
 		else
 			evt_dseed = day + 1
-		end
-		rnd_day = rand(evt_dseed, monthsend[transient_evt_month])
-	if transient_evt_month  = month and rnd_day <= day: jump 'jmp_job_create'
-
+		end	
+		rnd_day = rand(evt_dseed, monthsend[transient_evt_month])	
+	if transient_evt_month  = month and rnd_day <= day: jump 'jmp_job_create'	
+					
 	!! Set event transients - will be deleted upon completion
 	transient_evt_hour = rand(9, 20)
-
+	
 	!! For simplicity sake make minutes on the hour or at half hour intervals, store as a single int.
 	transient_evt_minutes = rand(0, 9)
-
-	!! Set as multiples of 60
+	
+	!! Set as multiples of 60 	
 	transient_evt_duration = rand(1,8)
-
+	
 	!! logic check for when randomising event duration
-
+	
 	if transient_evt_duration + transient_evt_hour >= 22:
 		transient_evt_hour = 22 - transient_evt_duration
 	end
@@ -305,21 +307,21 @@ if $ARGS[0] = 'gen_evt':
 	srch_day_u = rnd_day + 7
 	if srch_day_u >= monthsend[transient_evt_month]:
 		srch_day_u = monthsend[transient_evt_month]
-		srch_day_l = monthsend[transient_evt_month]	 - rand(7,14)
+		srch_day_l = monthsend[transient_evt_month]  - rand(7,14)
 	else
 		srch_day_l = rnd_day
 	end
 
 	:setdayloop
 	gs 'shortgs', 'dow',  transient_evt_year, transient_evt_month,  srch_day_l
-	if result =  transient_evt_dow:
+	if result =  transient_evt_dow: 
 		transient_evt_day = srch_day_l
 	srch_day_l = 99
-	else
-	srch_day_l += 1
-	end
+	else	        
+	srch_day_l += 1					
+	end 	
 
-	if srch_day_l <= srch_day_u: jump 'setdayloop'
+	if srch_day_l <= srch_day_u: jump 'setdayloop'	
 end
 
 ! ------ Helper Functions ------
@@ -362,8 +364,8 @@ if $ARGS[0] = 'cat_evt':
 	evt_silent[] = transient_evt_silent
 	!! Event type used in Journal
 	evt_event[] = transient_evt_type
-	!! Additional ID if required
-	evt_event_sub[] = transient_evt_sub_type
+	!! Additional ID if required 
+	evt_event_sub[] = transient_evt_sub_type 
 	!! Day of Week used in Journal and content areas
 	evt_dow[] = transient_evt_dow
 	!! Event Date to check against current date & used in Journal and content areas
@@ -385,7 +387,7 @@ if $ARGS[0] = 'cat_evt':
 	!! The following are event location triggers to allow the content to appear in areas such as community centre but host their content elsewhere such as Photography shop
 	!! 	Event area triggers such as city_residential
 	$evt_loc[] = $transient_loc
-	$evt_loc_arg[] = $transient_arg
+	$evt_loc_arg[] = $transient_arg 
 	!! Content location - optional
 	$evt_trigger_exec = $transient_evt_exec
 	$evt_trigger[] = $transient_trigger
@@ -407,35 +409,35 @@ if $ARGS[0] = 'del_evt':
 		killvar 'transient_event_type'
 		killvar 'transient_evt_year'
 		killvar 'transient_evt_month'
-		killvar 'transient_evt_hour'
+		killvar 'transient_evt_hour'	
 		killvar 'transient_evt_minutes'
 		killvar 'transient_evt_duration'
 		killvar 'transient_evt_wages'
 		killvar '$transient_loc '
 		killvar '$transient_arg'
-		killvar '$transient_trigger'
+		killvar '$transient_trigger'	
 		killvar '$transient_img'
 		killvar '$transient_desc'
-		killvar 'rnd_min'
+		killvar 'rnd_min'	
 		killvar 'mseed'
-		killvar 'dseed'
+		killvar 'dseed' 
 	end
 
 	! Delete array entry
 
 	if ARGS[1] = 2:
 		!! delete event after firing or cancelled.
-		!! killvar 'arr_name', index
+		!! killvar 'arr_name', index 
 		if ARGS[2] >= 0:
 			evt_idx = ARGS[2]
 			cla
-			'You''re about to delete this job: '
-			'Delete: ' + evt_event
+			'You''re about to delete this job: ' 
+			'Delete: ' + evt_event 
 			'Index: ' + evt_idx
 			Act 'Confirm?':
 				cla
 				'Are you sure?'
-				act 'Deleting':
+				act 'Deleting': 
 					cla
 					killvar 'evt_silent', evt_idx
 					killvar 'evt_event', evt_idx
@@ -454,19 +456,19 @@ if $ARGS[0] = 'del_evt':
 					killvar '$evt_media', evt_idx
 					killvar '$evt_desc', evt_idx
 
-					act 'Return': gt 'emp_functions', 'init'
-				end
-				act 'Cancel': gt 'emp_functions', 'init'
+					act 'Return': gs 'journal_work', 'start'
+				end 	 
+				act 'Cancel': gs 'journal_work', 'start'
 			end
 		else
 			'<<evt_idx>> - Invalid record - please check your index'
 		end
-	end
+	end 
 end
 
 if $ARGS[0] = 'evt_day_suffix':
 
-	if ARGS[1] ! '':
+	if ARGS[1] ! '': 
 		query_day = ARGS[1]
 	else
 		query_day = transient_evt_day
@@ -477,13 +479,13 @@ if $ARGS[0] = 'evt_day_suffix':
 		test_day = query_day
 	end
 
-	if test_day => 4 and test_day <= 10:
+	if (test_day => 4 and test_day <= 10) or (day => 4 and day <=10):
 		$evt_suffix = 'th'
-	elseif test_day = 1 or test_day = 31:
+	elseif (test_day = 1 or test_day = 31) or (day = 1 or day = 21 or day = 31):
 		$evt_suffix = 'st'
-	elseif test_day = 2:
-		$evt_suffix = 'nd'
-	elseif test_day= 3:
+	elseif (test_day = 2) or (day = 2 or day = 22):
+		$evt_suffix = 'nd'    
+	elseif test_day= 3: 
 		$evt_suffix = 'rd'
 	else
 		$evt_suffix = 'th'
@@ -500,7 +502,7 @@ if $ARGS[0] = 'evt_day_chk':
 		evt_daily_chk = daystart
 		job_idx = 0
 		:evt_day_chk		
-			if month = evt_month and day = evt_day: evt_chk = '1'
+			if month = evt_month and day = evt_day: evt_chk = 1
 			job_idx += 1
 		if job_idx < arrsize('evt_event') : jump 'evt_day_chk'
 	end
@@ -511,15 +513,15 @@ end
 !! book role, creates a time slot for emp_rota_week in format day_hour to be used in schedule mode.
 if $ARGS[0] = 'emp_booking':
 	gs 'emp_functions', 'emp_chk_clk'
-	if emp_rota_fail  = 0:
+	if emp_rota_fail  = 0:	
 		gs 'emp_functions', 'loop_configure'
 		j_finish = emp_job_end[j_id]
 		:jmp_daily_book
 			j_idx = emp_job_start[j_id]
 			:jmp_hour_book
-				emp_rota_week[d_idx + '_' + j_idx]	= j_id
+				emp_rota_week[d_idx + '_' + j_idx]  = j_id
 				j_idx += 1
-			if j_idx <= j_finish: jump 'jmp_hour_book'
+			if j_idx <= j_finish: jump 'jmp_hour_book'	
 			d_idx += 1
 		if d_idx <= d_end: jump 'jmp_daily_book'
 		emp_job_status[j_id] = 1
@@ -543,14 +545,14 @@ if $ARGS[0] = 'emp_chk_clk':
 		j_idx = emp_job_start[j_id]
 		:jmp_job_chk
 			if emp_rota_week[d_idx + '_' + j_idx]  >  0:
-				!! booking failed
+				!! booking failed					
 				emp_rota_fail = 1
 			else
 				!! booking passed
 				emp_rota_fail = 0
-			end
+			end	
 			j_idx +=1
-		if j_idx <= j_finish and emp_rota_fail = 0: jump 'jmp_job_chk'
+		if j_idx <= j_finish and emp_rota_fail = 0: jump 'jmp_job_chk'	
 		d_idx += 1
 	if d_idx <= d_end and emp_rota_fail = 0: jump 'jmp_daily_chk'
 end
@@ -564,7 +566,7 @@ if $ARGS[0] = 'emp_terminate':
 			:jmp_hour_book
 				emp_rota_week[d_idx + '_' + j_idx] = 0
 				j_idx += 1
-			if j_idx <= j_finish: jump 'jmp_hour_book'
+			if j_idx <= j_finish: jump 'jmp_hour_book'	
 			d_idx += 1
 		if d_idx <= d_end: jump 'jmp_daily_book'
 		!! Set the termination value
@@ -576,20 +578,19 @@ if $ARGS[0] = 'emp_terminate':
 	killvar 'j_idx'
 	killvar 'j_finish'
 	killvar 'd_idx'
-	killvar 'd_end'
+	killvar 'd_end'	
 end
 
-if $ARGS[0] = 'loop_configure':
-	if	j_day= 0 or j_day = 1 or j_day = 2:
+if $ARGS[0] = 'loop_configure':	
+	if  j_day= 0 or j_day = 1 or j_day = 2:
 		d_idx = 1
 	else
 		d_idx= 6
 	end
-	if	j_day <= 1:
+	if  j_day <= 1:
 		d_end = 5
 	else
 		d_end= 7
-	end
+	end	
 end
---- emp_functions ---------------------------------
-
+--- emp_functions ---------------------------------

locations/ender.qsrc

@@ -130,7 +130,7 @@ if $ARGS[0] = 'loss':
 		Loss += 1
 		if rikudo > 10:rikudo -= 10
 		if $loc = 'pav_park' or $loc = 'city_park':
-			gt'rape_events','park_fight_rape'
+			gt'rape_events','park_rape_solo'
 		elseif $region = 'pav' or $region = 'city':
 			gt'rape_events','urban_fight_rape'
 		end
@@ -377,14 +377,14 @@ if $ARGS[0] = 'loss':
 			if temp['rape_type'] = 'gang':
 				gt'rape_events','park_gangrape_fight_loss'
 			else
-			
+				gs'rape_events','park_rape_solo'
 			end
 		else
-			if temp['rape_type'] = 'gang':
+!!			if temp['rape_type'] = 'gang':
 			
-			else
+!!			else
 				gt'rape_events','urban_fight_rape'
-			end
+!!			end
 		end
 	end
 end
@@ -812,7 +812,7 @@ if $ARGS[0] = 'surrender':
 		Loss += 1
 		if rikudo > 10:rikudo -= 10
 		if $loc = 'pav_park' or $loc = 'city_park':
-			gt'rape_events','park_fight_rape'
+			gt'rape_events','park_rape_solo'
 		elseif $region = 'pav' or $region = 'city':
 			gt'rape_events','urban_fight_rape'
 		end
@@ -1081,9 +1081,9 @@ if $ARGS[0] = 'surrender':
 			'"You''re fucking pathetic! You deserve what''s coming next for being such a fucking wimp!"'
 		elseif fightPStats['Health'] > pcs_health/2:
 			'You immediately feel blood running from your nose when Lena jabs you in the face, causing you to panic. "You win, you win! Just don''t hit me again! Please!" you plead and Lena laughs.'
-			'"Look''s like our little bunny isn''t as tough as she likes to think. Maybe she needs to learn from her mistake?" she says and the two gopniks smile at you cruelly.' 
+			'"Looks like our little bunny isn''t as tough as she likes to think. Maybe she needs to learn from her mistake?" she says and the two gopniks smile at you cruelly.' 
 		else
-			'You''re barely able to defend yourself from the dirty tactics the two gopniks employ. Dodging one of Lena''s blows causes you to stumble; they catch you, only to then throw you towards the sink. You''re winded and collpase on the floor when you hit your stomach off the edge of the sink. "I- I give up..." you whisper while trying not to throw up.'
+			'You''re barely able to defend yourself from the dirty tactics the two gopniks employ. Dodging one of Lena''s blows causes you to stumble; they catch you, only to then throw you towards the sink. You''re winded and collapse on the floor when you hit your stomach off the edge of the sink. "I- I give up..." you whisper while trying not to throw up.'
 		end
 		'Lera heads into one of the stalls as Lena pins you to the floor by pressing her knee into your back, causing you to cry out in pain. "Not so tough now, are you bitch?" she smirks.' 
 		'Lera returns a few seconds later and you loudly protest as they haul into a stall and lean you over the toilet. The smell hits you immediately - the bowl is full of urine, likely Lera''s. You know exactly what they''re going to do and grip the toilet seat firmly to stop them, but they pull you back and pin your arms behind your back before pushing you back down. They laugh loudly as they dunk your head into the foul water multiple times before holding you under and flushing. When they pull you up and finally let you go, you splutter and gasp for air.'

locations/enderKik.qsrc

@@ -53,7 +53,7 @@ if profi = 1:
 		end
 
 	! WD: Argument is 'dressing room'
-	act 'Leave the ring':gt 'fit', 'dressing room'
+	act 'Leave the ring':gt 'fit', 'dressing_room'
 	end
 
 
@@ -149,8 +149,8 @@ elseif kickbox['amateur'] = 1:
 			kickbox['amateurDraw'] += 1
 		end
 
-		! WD: Argument is 'dressing room'
-		act 'Leave the ring':gt 'fit', 'dressing room'
+		! WD: Argument is 'dressing_room'
+		act 'Leave the ring':gt 'fit', 'dressing_room'
 	end
 
 
@@ -195,8 +195,8 @@ elseif sparing = 1:
 		'You nod and she turns around and heads to the dressing room.'
 	end
 
-	! WD: Argument is 'dressing room'
-	act 'Leave the ring':gt 'fit', 'dressing room'
+	! WD: Argument is 'dressing_room'
+	act 'Leave the ring':gt 'fit', 'dressing_room'
 
 end
 

locations/exhibitionistshop.qsrc

@@ -69,10 +69,10 @@ if $ARGS[0] = 'ksenya_intro':
 	minut += 2
 	cla & *clr
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/shared/park/kseniya/kseniya7.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/park/ksenya/ksenya7.jpg"></center>'
 	'"Hello? I''m looking for Ksenya, is she around?"'
 	'The cashier nods. "Yes, follow me," she says, leading you to the back of the store.'
-	'"Miss Ksenya? You have a visitor" The cashier takes you into the break room that looks really comfortable. Large double-pane windows that look out on the back patio. She stands up and comes over to give you a hug. "Hey <<pcs_firstname>>, what can I do for you?"'
+	'"Miss Ksenya? You have a visitor" The cashier takes you into the break room that looks really comfortable. Large double-pane windows that look out on the back patio. She stands up and comes over to give you a hug. "Hey <<$pcs_firstname>>, what can I do for you?"'
 	'"I was wondering if you had school uniforms? My therapist told me that you might have some in your shop." You said.'
 	'"The one in town?" She asks.'
 	'"Yes? Do you know him?" You replied.'
@@ -81,7 +81,7 @@ if $ARGS[0] = 'ksenya_intro':
 	act 'No':
 		cla & *clr
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/shared/park/kseniya/kseniya8.jpg"></center>'
+		'<center><img <<$set_imgh>> src="images/locations/shared/park/ksenya/ksenya8.jpg"></center>'
 		'"No? Why?" you ask.'
 		'"No reason, sorry. If you ever want to hang out, just stop by the shop and we can chat." She says as she walks you back to the front of the store.'
 		act 'Continue': gt 'exhibitionistshop', 'start'
@@ -91,7 +91,7 @@ if $ARGS[0] = 'ksenya_intro':
 			gs 'willpower', 'pay', 'hard'
 			cla & *clr
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/shared/park/kseniya/kseniya8.jpg"></center>'
+			'<center><img <<$set_imgh>> src="images/locations/shared/park/ksenya/ksenya8.jpg"></center>'
 			'In response, you reply, "Yes?" I no longer like wearing underwear. "Are you referring to that?" you inquire.'
 			'"Is he doing hypnosis with you?" You nod your head. She informs you, "I think you may be in trouble if you continue seeing him."'
 			'"Nothing has happened to me that I am aware of." You assure her'
@@ -103,13 +103,13 @@ if $ARGS[0] = 'ksenya_intro':
 	end
 end
 
-if $ARGS[0] = 'ksenya_intro':
+if $ARGS[0] = 'ksenya_chat':
 	exhibitionQW['daystart'] = daystart
 	npc_rel['A263'] += 1
-	minut += 10
+	minut += 60
 	cla & *clr
 	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/locations/shared/park/kseniya/kseniya9.jpg"></center>'
+	'<center><img <<$set_imgh>> src="images/locations/shared/park/ksenya/ksenya9.jpg"></center>'
 	'You meet up with Ksenya at her shop and spend the next hour talking about random things. About flashing, clothing, and just everyday stuff.'
 	act 'Continue': gt 'exhibitionistshop', 'start'
 end
@@ -286,7 +286,7 @@ if $ARGS[0] = 'bodysuit':
 	i = 1
 
 	:loopsalacious_bodysuit
-		if salacious_bodysuit[i] = 0:*p '<a href="exec: i = <<i>> & gt ''exhibitionistshop'', ''bodysuit2''"><img src="images/pc/items/salacious/bodysuits/<<i>>.jpg" 	height="250" /></a> '
+		if salacious_bodysuits[i] = 0:*p '<a href="exec: i = <<i>> & gt ''exhibitionistshop'', ''bodysuit2''"><img src="images/pc/items/salacious/bodysuits/<<i>>.jpg" 	height="250" /></a> '
 		i += 1
 	if i <= 40:jump 'loopsalacious_bodysuit'
 end
@@ -294,11 +294,6 @@ end
 if $ARGS[0] = 'bodysuit2':
 	cla
 	menu_off = 1
-	if salacious_bodysuit[i] ! 0:
-		msg 'You already own this bodysuit.'
-		gt 'exhibitionistshop', 'bodysuit'
-	end
-
 	gt 'underwear_bodysuits', 'view_bodysuit_item', 'shop', 'salacious',i, 1000
 end
 

locations/fame.qsrc

@@ -593,9 +593,10 @@ if $ARGS[0] = 'calculate':
 
 	if dyneval('RESULT = fame[''pav_<<$ARGS[1]>>'']') < 0: dynamic 'fame[''pav_<<$ARGS[1]>>''] = 0'
 
+	if dyneval('RESULT = fame[''pav_<<$ARGS[1]>>'']') > 1200: dynamic 'fame[''pav_<<$ARGS[1]>>''] = 1200'
 
 	!!This calculates fame city.
-		if dyneval ('RESULT = fame[''city_<<$ARGS[1]>>_core'']') >= 1000:
+	if dyneval ('RESULT = fame[''city_<<$ARGS[1]>>_core'']') >= 1000:
 		dynamic 'fame[''city_<<$ARGS[1]>>''] = fame[''city_<<$ARGS[1]>>_core'']+ fame[''city_<<$ARGS[1]>>_local'']/1000'
 	else
 		dynamic 'fame[''city_<<$ARGS[1]>>''] = (1000*fame[''city_<<$ARGS[1]>>_core'']+ (1000-fame[''city_<<$ARGS[1]>>_core''])*fame[''city_<<$ARGS[1]>>_local''])/1000'
@@ -621,6 +622,7 @@ if $ARGS[0] = 'calculate':
 	
 	if dyneval('RESULT = fame[''city_<<$ARGS[1]>>'']') < 0: dynamic 'fame[''city_<<$ARGS[1]>>''] = 0'
 
+	if dyneval('RESULT = fame[''city_<<$ARGS[1]>>'']') > 1200: dynamic 'fame[''ctiy_<<$ARGS[1]>>''] = 1200'
 
 	!!This calculates fame in Old Town.
 	if dyneval ('RESULT = fame[''pushkin_<<$ARGS[1]>>_core'']') >= 1000:
@@ -649,8 +651,7 @@ if $ARGS[0] = 'calculate':
 	
 	if dyneval('RESULT = fame[''pushkin_<<$ARGS[1]>>'']') < 0: dynamic 'fame[''pushkin_<<$ARGS[1]>>''] = 0'
 
-
-
+	if dyneval('RESULT = fame[''pushkin_<<$ARGS[1]>>'']') > 1200: dynamic 'fame[''pushkin_<<$ARGS[1]>>''] = 1200'
 
 	!!This calculates fame in Gadukino.
 	if dyneval ('RESULT = fame[''village_<<$ARGS[1]>>_core'']') >= 1000:
@@ -679,6 +680,7 @@ if $ARGS[0] = 'calculate':
 
 	if dyneval('RESULT = fame[''village_<<$ARGS[1]>>'']') < 0: dynamic 'fame[''village_<<$ARGS[1]>>''] = 0'
 
+	if dyneval('RESULT = fame[''village_<<$ARGS[1]>>'']') > 1200: dynamic 'fame[''village_<<$ARGS[1]>>''] = 1200'
 
 
 	!!Next we calculate the fame in the large fame groups.

locations/father.qsrc

@@ -52,7 +52,7 @@ if hcolfatherremember ! pcs_haircol:
         $texthcol = 'So you decided to become a blonde?'
     end
     
-    'Your stepfather does a doulbe take of you as he notices your hair. "Oh <<$pcs_nickname>>, I see you dyed your hair! <<$texthcol>>" It looks good on you. He takes one last look at your new hair and goes back to watching T.V.'
+    'Your stepfather does a double take of you as he notices your hair. "Oh <<$pcs_nickname>>, I see you dyed your hair! <<$texthcol>>" It looks good on you. He takes one last look at your new hair and goes back to watching T.V.'
     hcolfatherremember = pcs_haircol
 end
 
@@ -197,78 +197,80 @@ act 'Chat':
 end
 
 if (hour > 10 and week < 6) or week >= 6:
-    act 'Ask for money':
-        *clr & cla
-        minut += 5
-        gs 'stat'
-        '<center><b><font color="maroon">Your stepfather, Vladimir Mikhailovich Scriabin</font></b></center>'
-        '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
-        'Your stepfather is sitting on the couch, watching some boring TV show. You sit down next to him.'
-        dynamic $fatherRep
-        act 'Move away':gt 'father'
-
-        if fatherPayDay = daystart:
-            'Trying your cutest face on your stepfather, you ask him for some money. He just shakes his head wearily: "No, <<$pcs_nickname>>. I''ve already given you some money today, don''t be greedy."'
-        else
-            if (npc_rel['A28'] <= 40 or (pcs_apprnc + (npc_rel['A28']/10)) <= 60) and TouchedByFather = 0:
-                'You ask your stepfather for some money, but he shakes his head in response: "I already gave my salary to your mother, go ask her."'
-            else
-                'You ask your stepfather for some money, but he shakes his head in response: "I already gave my salary to your mother, go ask her."'
-                if npc_rel['A28'] >= 40 and npc_rel['A28'] < 60 and fatherPayDay ! daystart:FatherMolest = rand(1,4)
-                if npc_rel['A28'] >= 60 and npc_rel['A28'] < 80 and fatherPayDay ! daystart:FatherMolest = rand(1,2)
-                if npc_rel['A28'] >=80 and fatherPayDay ! daystart:FatherMolest = 1
-                if FatherMolest = 1:
-                    'While you''re talking with him, you notice your stepfather is in a good mood today. Perhaps you can persuade him...'
-                    act '"Oh please?"':
-                        cla
-						menu_off = 1
-                        minut += 5
-                        gs 'stat'
-                        pcs_horny += rand(1,5)
-                        '"Oh come on, please Daddy?" you beg him, batting your eyelids and trying to look as cute as possible.'
-                        if pcs_apprnc + (npc_rel['A28']/10) >= 200:
-                            fatherLust = 1
-                        elseif pcs_apprnc + (npc_rel['A28']/10) >= 120:
-                            fatherLust = rand(1,2)
-                        elseif pcs_apprnc + (npc_rel['A28']/10) >= 60:
-                            fatherLust = rand(1,4)
-                        else
-                            fatherLust = 2
-                        end
-
-                        if fatherLust >= 2:
-                            '"Sorry <<$pcs_nickname>>, like I said, I have no money. Go ask your mother."'
-                        else
-                            money += rand(200,300)
-                            gs 'exp_gain', 'persuas', rand(0,2)
-                            fatherPayDay = daystart
-                            gs 'stat'
-                            '"Oh, alright then. Just don''t tell your mother!" he says in a tired voice, keeping his eyes on the doorway as he gives you the money. You act genuinely happy as you take the money from him, giving him a kiss on the cheek as you go.'
-                        end
-
-                        act 'Move away':gt $loc, $loc_arg
-                    end
-
-                    if npc_sex['A28']!0:
-                        act 'Blackmail him':
-                            cla
+	if SchoolAtestat = 0:
+		act 'Ask for money':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+			'<center><b><font color="maroon">Your stepfather, Vladimir Mikhailovich Scriabin</font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
+			'Your stepfather is sitting on the couch, watching some boring TV show. You sit down next to him.'
+			dynamic $fatherRep
+			act 'Move away':gt 'father'
+
+			if fatherPayDay = daystart:
+				'Trying your cutest face on your stepfather, you ask him for some money. He just shakes his head wearily: "No, <<$pcs_nickname>>. I''ve already given you some money today, don''t be greedy."'
+			else
+				if (npc_rel['A28'] <= 40 or (pcs_apprnc + (npc_rel['A28']/10)) <= 60) and TouchedByFather = 0:
+					'You ask your stepfather for some money, but he shakes his head in response: "I already gave my salary to your mother, go ask her."'
+				else
+					'You ask your stepfather for some money, but he shakes his head in response: "I already gave my salary to your mother, go ask her."'
+					if npc_rel['A28'] >= 40 and npc_rel['A28'] < 60 and fatherPayDay ! daystart:FatherMolest = rand(1,4)
+					if npc_rel['A28'] >= 60 and npc_rel['A28'] < 80 and fatherPayDay ! daystart:FatherMolest = rand(1,2)
+					if npc_rel['A28'] >=80 and fatherPayDay ! daystart:FatherMolest = 1
+					if FatherMolest = 1:
+						'While you''re talking with him, you notice your stepfather is in a good mood today. Perhaps you can persuade him...'
+						act '"Oh please?"':
+							cla
 							menu_off = 1
-                            minut += 5
-                            money += rand(300,500)
-                            fatherPayDay = daystart
-                            gs 'stat'
-                            '"Aren''t you forgetting something?" you say in a serious voice, referring to your recent intimate moments with him.'
-                            'Your stepfather is clearly embarrassed by this, and surprised at you for bringing it up. He clears his throat loudly, and the following silence makes you feel slightly uncomfortable. Nevertheless, he reaches for his wallet.'
-                            '"Here you go, you leech! You know you shouldn''t be taking advantage of me like that! Here, take your money and get out of here. Just keep your mouth shut!" You nod and pocket the money, feeling slightly worse for blackmailing him for it.'
-                            act 'Move away':gt $loc, $loc_arg
-                        end
-                    end
-                end
-
-                if FatherMolest > 1:'"<<$pcs_nickname>>, I already said no."'
-            end
-        end
-    end
+							minut += 5
+							gs 'stat'
+							pcs_horny += rand(1,5)
+							'"Oh come on, please Daddy?" you beg him, batting your eyelids and trying to look as cute as possible.'
+							if pcs_apprnc + (npc_rel['A28']/10) >= 200:
+								fatherLust = 1
+							elseif pcs_apprnc + (npc_rel['A28']/10) >= 120:
+								fatherLust = rand(1,2)
+							elseif pcs_apprnc + (npc_rel['A28']/10) >= 60:
+								fatherLust = rand(1,4)
+							else
+								fatherLust = 2
+							end
+
+							if fatherLust >= 2:
+								'"Sorry <<$pcs_nickname>>, like I said, I have no money. Go ask your mother."'
+							else
+								money += rand(200,300)
+								gs 'exp_gain', 'persuas', rand(0,2)
+								fatherPayDay = daystart
+								gs 'stat'
+								'"Oh, alright then. Just don''t tell your mother!" he says in a tired voice, keeping his eyes on the doorway as he gives you the money. You act genuinely happy as you take the money from him, giving him a kiss on the cheek as you go.'
+							end
+
+							act 'Move away':gt $loc, $loc_arg
+						end
+
+						if npc_sex['A28']!0:
+							act 'Blackmail him':
+								cla
+								menu_off = 1
+								minut += 5
+								money += rand(300,500)
+								fatherPayDay = daystart
+								gs 'stat'
+								'"Aren''t you forgetting something?" you say in a serious voice, referring to your recent intimate moments with him.'
+								'Your stepfather is clearly embarrassed by this, and surprised at you for bringing it up. He clears his throat loudly, and the following silence makes you feel slightly uncomfortable. Nevertheless, he reaches for his wallet.'
+								'"Here you go, you leech! You know you shouldn''t be taking advantage of me like that! Here, take your money and get out of here. Just keep your mouth shut!" You nod and pocket the money, feeling slightly worse for blackmailing him for it.'
+								act 'Move away':gt $loc, $loc_arg
+							end
+						end
+					end
+
+					if FatherMolest > 1:'"<<$pcs_nickname>>, I already said no."'
+				end
+			end
+		end
+	end
 
     act 'Ask about him and your mother':
         *clr & cla
@@ -294,7 +296,7 @@ if (hour > 10 and week < 6) or week >= 6:
         act 'Move away':gt 'father'
     end
 
-    if motherKnowSpravka = 1 and npc_sex['A28']=0:
+    if motherKnowSpravka = 1 and npc_sex['A28']=0 and SchoolAtestat = 0:
         cla
 		menu_off = 1
         npc_rel['A28'] = 0
@@ -311,7 +313,7 @@ if (hour > 10 and week < 6) or week >= 6:
         'Your stepfather notices the sharp smell of booze on you and looks disappointed. "<<$pcs_nickname>>, you smell like alcohol, what are you getting yourself into? You''re too young to drink that!"'
     end
 
-    if TorgVokzalTimes>0 and YouCanGar = 0:
+    if TorgVokzalTimes>0 and YouCanGar = 0 and SchoolAtestat = 0:
         act 'Ask him permission to store things in his garage':
             *clr & cla
 			menu_off = 1

locations/femcyc.qsrc

@@ -15,11 +15,12 @@
 !!
 !!------------------------------------------------------------------------------------------------------------
 !!
-!!	$ChildFath : array for names of the childs biological father
+!!	$ChildFath : array for names of the childs biological father. This should be the absolute truth, not readily available information for the characters.
 !!	$ChildFathDNA : array for the DNA of the childs father
-!!	$ChildThFath : array for the names of the childs believed father (can be different from the biological father)
+!!	$ChildThFath : array for the IDs of the childs believed father (can be different from the biological father and should be in form of ID ie. 'A34' or 'unknown' if Sveta has no idea) Do not use for pregnancy events as it is only updated when going to labor. This is probably the variable you want to work with when doing paternity tests, or if father reacts to physical traits not matching despite Sveta claiming they are the dad.
+!!		arrpos('$ChildThFath', 'A34') >= 0 can be used to test if the person 'A34' (Kolka, for example) has already had a child with you
 !!	$childtype : child type. single child, fraternal twin, identical twin ...
-!!	$cumfthname : the name of the father if sveta is sure
+!!	$cumfthname : Array of IDs of the possible fathers (conscious acts) 'unknown' if otherwise empty
 !!	$cycreport_txt : Text for the current menstruation cycle. e.g. In labour.
 !!	$d_cycreport_update : Dynamic variable to update cycle report
 !!	$d_pregmovement : Dynamic variable for kid movement
@@ -29,7 +30,10 @@
 !!	$pcs_dna : Svetas DNA
 !!	$wombDNA : sperm in womb potent enough to cause pregnancy
 !!	$wombName : the identifier of the NPC
-!!	$wombpotfath : the used name of the potential father, if sveta is not sure
+!!	$wombpotfath : the array of IDs of the potential fathers
+!!	$wombthfath : The name of the person Sveta believes to be the father of ongoing pregnancy, updated from the cycle menu decision.
+!!	$wombthfathID : The ID of the person Sveta believes to be the father of ongoing pregnancy, updated from the cycle menu decision. - Might be best variable for pregnancy events with the dad
+!!		arrpos('$wombpotfath', 'A34') >= 0  can be used to test if the person 'A34' (Kolka, for example) is in the list of potential fathers
 !!	arrmodtmp : temp array used in pregnancy progression
 !!	babyembryo : used during implant phase. if the fertegg successfully nests, babyembryo is +1. BabyEmbryo is for how many unborn babies are inside Sveta.
 !!	Babyptype : pregnancy type of unborn babies. they might be unimplanted 0, healthy 1, or Ectopic 2.
@@ -112,7 +116,6 @@
 !!	succubusflag : used for succubus story arc. If Sveta is a succubus, the sperm will be absorbed
 !!	succubxp : succubus experience
 !!	succycletmp : succubus cycle temp var. Used during sperm absorption function.
-!!	tempbabyi : temp var for baby variable removal.
 !!	tempovbonus : temp var for ovulation bonus. Fertility bonus.
 !!	temprand : used as temp var for randomizer
 !!	tempwbbonus : temp variable for womb bonus during egg implant function
@@ -139,10 +142,10 @@
 !!
 !!	sparrloc : Location of the sperm, as per cumarrdel
 !!	sparrnam : Spatter Owner
-!!	sparrppt : Spatter Potential Potency (Used to increase potency if you don't clean yourself out)
+!!	sparrppt : Spatter Potential Potency (Used to increase potency if you do not clean yourself out)
 !!	sparridt : Did you know/realize who did it?
 !!	sparrvol : Volume of the spatter. 40 is average.
-!!	sparrslc : Spread status of the spatter. High volume can spread the contaminant from it's starting place.
+!!	sparrslc : Spread status of the spatter. High volume can spread the contaminant from it is starting place.
 !!	sparrcnt : Unique identifier of the exact which time the MC has had this spatter incident occur.
 !!
 !!	Values of 'cumarrdel' as defined by the cum_arr (taken from Cum_Manage.qsrc):
@@ -545,7 +548,6 @@ if $ARGS[0] = 'cyc2':
 				$wombDNA[y] = $npc_dna[$cumarrnam[can_idx]]
 				wombAmount[y] = cumarrcpt[can_idx]
 				$wombName[y] = $cumarrnam[can_idx]
-
 			else
 				!! This DNA is in the womb, but does it belong to the same guy?
 				x = 0
@@ -567,7 +569,9 @@ if $ARGS[0] = 'cyc2':
 			if cumarrkno[can_idx] = 1 and arrpos('$wombpotfath', $cumarrnam[can_idx]) < 0:$wombpotfath[arrsize('$wombpotfath')] = $cumarrnam[can_idx]
 
 			!! If the guy is a known/possible element (PC know about the sex, it was actual sex, condom/pill was not used or condom was broken, etc.), he can be considered as father.
-			if instr('14570',str(cumarrcon[can_idx])) > 0 and cumarrdel[can_idx] = 0 and cumarrkno[can_idx] >= 0:
+			if cumarrdel[can_idx] = 0 and cumarrkno[can_idx] >= 0:
+				!! Removed 'instr('14570',str(cumarrcon[can_idx])) > 0 and ' from above if-statement
+				!! to make each conscious vaginal sex partner eligible for consideration to be the dad if pregnancy happens
 				!! If guy is recorded already, increase his cumtime, else record him for the first time.
 				if arrpos('$cumfthname', $cumarrnam[can_idx]) = -1:
 					$cumfthname[arrsize('$cumfthname')] = $cumarrnam[can_idx]
@@ -578,8 +582,8 @@ if $ARGS[0] = 'cyc2':
 			end
 
 			cum_total += cumarrcpt[can_idx]
-
-		if can_idx < can_sz:can_idx += 1 & jump 'FatherCumAnalyze'
+		can_idx += 1 
+		if can_idx < can_sz: jump 'FatherCumAnalyze'
 
 		!! setting the default believed father if there is no difficult choice or there is no choice
 		if arrsize('$cumfthname') = 2 and cumtime[0] = 0:
@@ -639,11 +643,6 @@ if $ARGS[0] = 'cyc2':
 				$kid_dna[nextbaby] = func('DNA', 'generate', $pcs_dna, $npc_dna[$cumfathlotto[lotto_idx]])
 				$ChildFath[nextbaby] = $cumfathlotto[lotto_idx]
 				$ChildFathDNA[nextbaby] = $cumfatherDNA[lotto_idx]
-				if arrsize('$wombpotfath') = 1:
-					$ChildThFath[nextbaby] = $wombpotfath[0]
-				else
-					$ChildThFath[nextbaby] = 'unknown'
-				end
 				hairkid[nextbaby] = rand(0, 3)
 				eyeskid[nextbaby] = rand(0, 3)
 				ChildConType[nextbaby] = cumarrcon[nextbaby]
@@ -785,18 +784,17 @@ if $ARGS[0] = 'cyc3':
 		:lutcycloop
 		if rej_idx < rej_sz:
 			if Babyptype[rej_idx] = 0:
-				killvar 'polkid',tempbabyi
-				killvar '$kidname',tempbabyi
-				killvar 'kidage',tempbabyi
-				killvar 'daykid',tempbabyi
-				killvar 'monthkid',tempbabyi
-				killvar 'yearkid',tempbabyi
-				killvar 'Babyptype',tempbabyi
-				killvar '$ChildFath',tempbabyi
-				killvar '$ChildThFath',tempbabyi
-				killvar 'hairkid',tempbabyi
-				killvar 'eyeskid',tempbabyi
-				killvar 'cumarrcon',tempbabyi
+				killvar 'polkid',rej_idx
+				killvar '$kidname',rej_idx
+				killvar 'kidage',rej_idx
+				killvar 'daykid',rej_idx
+				killvar 'monthkid',rej_idx
+				killvar 'yearkid',rej_idx
+				killvar 'Babyptype',rej_idx
+				killvar '$ChildFath',rej_idx
+				killvar 'hairkid',rej_idx
+				killvar 'eyeskid',rej_idx
+				killvar 'cumarrcon',rej_idx
 				FertEgg -= 1
 			end
 			rej_idx += 1
@@ -900,11 +898,19 @@ if $ARGS[0] = 'preg':
 		if lactation['active'] < 1: func('lact_lib','lact_switch')
 		$cycreport_txt = 'In labour'
 		arrmodtmp = arrsize('$ChildFath')
-		arrmodtmp -= (babyembryo+1)
+		arrmodtmp -= (babyembryo)
 		:babyfinalpreploop
 		if arrmodtmp < arrsize('$ChildFath') and daykid[arrmodtmp] = 0:
 			daykid[arrmodtmp] = 42
-			$ChildThFath[arrmodtmp] = $wombthfath
+			!! $wombthfathID is the ID of the character Sveta has chosen as believed father in the cycle menu
+			!! checking the there is a valid ID that resolves into a name, if yes then applying that ID as believed father
+			if $npc_usedname[$wombthfathID] ! '':
+				$ChildThFath[arrmodtmp] = $wombthfathID
+			else
+			!! if the ID does not resolve into a name then it is probably some legacy event father
+			!! like 'A sperm donor' or else 'unknown'. In either case it should not cause issues if all outliers are designated 'unknown'
+				$ChildThFath[arrmodtmp] = 'unknown'
+			end
 			arrmodtmp += 1
 			jump 'babyfinalpreploop'
 		end

locations/fertility.qsrc

@@ -47,30 +47,21 @@ if $ARGS[0] = 'birth_control':
 			pillcon2 -= 29000
 			if tabletkishot < 0: tabletkishot = 0
 		end
-		if shotdays = -8:
+		if shotdays < 2:
 			tabletkicheck = 0
-			shotdue = 0
-			if  birth_control['implant_status'] > 0:
-				'Your birth control shot is no longer protecting you.'
-			end
-		elseif shotdays <= 0:
-			if shotdays = 0:
-				shotdue = 7
-			else
-				shotdue -= 1
-			end
-			if  birth_control['implant_status'] > 0:
-				'The chemicals regulating your fertility cycle are wearing off, you need to get your shot in <<shotdue>> days.'
-			end
-		elseif shotdays > 1 and shotdays < 5 and birth_control['implant_status'] = 0:
+			'Your birth control shot is no longer protecting you.'
+		elseif shotdays < 10:
+			'Your birth control shot is past due for renewal. The chemicals regulating your fertility cycle are wearing off.'
+		elseif shotdays > 10 and shotdays < 14:
 			'You are due for a birth control shot soon if you do not get one, you might get pregnant.'
-		elseif shotdays = 1 and birth_control['implant_status'] = 0:
+		elseif shotdays = 10:
 			'Your birth control shot is due for renewal tomorrow.'
 		end
-
-		if shotdays > -100:shotdays -=1
-		if tabletkishot > 0:tabletkishot -= 1
 	end
+	!! dropped the decrement out of the above if-statement so that players on pill would still run out of BC shot
+	!! as in for example the case of the therapist forcing you on the pill while you already had the shot.
+	if tabletkishot > 0:tabletkishot -= 1
+	if shotdays > 0:shotdays -=1
 
 	!! birth_control['implant_status']
 	!! 0: No implant
@@ -221,13 +212,13 @@ if $ARGS[0] = 'birth_control':
 
 	if pillcon >= 40000:
 		birth_control['safe'] = 1
-	elseif placebopart = 0:
+	elseif placebopart <= 0:
 		birth_control['safe'] = 0
 	end
 	
 	if pillcon2 >= 40000:
 		birth_control['think_safe'] = 1
-	elseif placebopart = 0:
+	elseif placebopart <= 0:
 		birth_control['think_safe'] = 0
 	end
 	
@@ -482,10 +473,10 @@ if $ARGS[0] = 'cum_arrcheat':
 			$cycletemp[4] = 'improperly defined'
 		end
 		$cycletemp[5] = $npc_usedname[$ChildFath[cycletemp]]
-		if $ChildThFath[cycletemp] ! 'unknown':
+		if $npc_usedname[$ChildThFath[cycletemp]] ! '':
 			$cycletemp[7] = $npc_usedname[$ChildThFath[cycletemp]]
 		else
-			$cycletemp[7] = ''
+			$cycletemp[7] = $ChildThFath[cycletemp]
 		end
 		!'Index number: <<cycletemp>>. Name of the kid: <<$kidname[cycletemp]>>. Age of the kid: <<kidage[cycletemp]>>. Born(M/D/Y): <<monthkid[cycletemp]>> / <<daykid[cycletemp]>> / <<yearkid[cycletemp]>>. Sex: <<$cycletemp[2]>>. Pregnancy Type: <<$cycletemp[3]>>. Biological Father: <<$ChildFath[cycletemp]>>. Believed Father: <<$ChildThFath[cycletemp]>>. Child Eye Color: <<eyeskid[cycletemp]>>. Child Hair Color: <<hairkid[cycletemp]>>. Child Type: <<$childtype[cycletemp]>>. Child Contraceptive Type: <<$cycletemp[4]>>'
 		*P '<TR><TD><<cycletemp>></TD><TD><<$kidname[cycletemp]>></TD><TD><<kidage[cycletemp]>></TD><TD><<monthkid[cycletemp]>> / <<daykid[cycletemp]>> / <<yearkid[cycletemp]>></TD><TD><<$cycletemp[2]>></TD><TD><<$cycletemp[3]>></TD><TD><<$ChildFath[cycletemp]>> - <<$cycletemp[5]>></TD><TD><<$ChildThFath[cycletemp]>> - <<$cycletemp[7]>></TD><TD><<eyeskid[cycletemp]>></TD><TD><<hairkid[cycletemp]>></TD><td><<$childtype[cycletemp]>></td><TD><<$cycletemp[4]>></TD><TD><<$kid_dna[cycletemp]>></TD></TR>'

locations/fight.qsrc

@@ -192,7 +192,7 @@ if $ARGS[0] = 'applyDamage':
 			if <<$fightAppDam['TargetType']>>_shield[<<fightAppDam['TargetNumber']>>] > 0:
 				<<$fightAppDam['TargetType']>>_shield[<<fightAppDam['TargetNumber']>>] = 0
 				if $fightAppDam['TargetName'] = 'you':
-					""<<$fightAppDam['TargetName']>> losse <<fightAppDam['Shield']>> defense.""
+					""<<$fightAppDam['TargetName']>> lose <<fightAppDam['Shield']>> defense.""
 				else
 					""<<$fightAppDam['TargetName']>> losses <<fightAppDam['Shield']>> defense.""
 				end

locations/fit.qsrc

@@ -1,12 +1,8 @@
 # fit
 
-CLOSE ALL
 if $ARGS[0] = 'start':
 	*clr & cla
-	$loc = 'fit'
-	$loc_arg = 'start'
-	$menu_loc = 'fit'
-	$menu_arg = 'start'
+	gs 'shortgs', 'setloc', 'fit', $ARGS[0]
 	killvar '$locclass'
 	menu_off = 0
 	minut += 5
@@ -41,12 +37,14 @@ if $ARGS[0] = 'start':
 	act 'Leave': killvar 'epayments' & minut += 5 & gt 'city_center'
 	
 	if abonement > 0:
-		act 'Go to the dressing room': gt 'fit', 'dressing room'
+		act 'Go to the dressing room': gt 'fit', 'dressing_room'
+
 	elseif money > 100:
 		act 'Use the pool (100 <b>₽</b>)':
 			money -= 100
 			gs 'stat'
-			gt 'fit', 'dressing room'
+			gt 'fit', 'dressing_room'
+
 		end
 	end
 
@@ -80,15 +78,10 @@ if $ARGS[0] = 'start':
 
 end
 
-if $ARGS[0] = 'dressing room':
-	$locM = 'fit'
-	$locM_arg = 'dressing room'
-	$sexloc = 'fit'
-	$loc = 'fit'
-	$loc_arg = 'dressing room'
-	$menu_loc = 'fit'
-	$menu_arg = 'dressing room'
+if $ARGS[0] = 'dressing_room':
+	gs 'shortgs', 'setloc', 'fit', $ARGS[0]
 	menu_off = 0
+	$sexloc = 'fit'
 	$location_type = 'private'
 	$locclass = 'changingroom'
 	*clr & cla
@@ -114,7 +107,8 @@ if $ARGS[0] = 'dressing room':
         else
             cla
             msg'<b><font color = red>You need to get dressed.</font></b>'
-            act 'Return': gt 'fit', 'dressing room'
+            act 'Return': gt 'fit', 'dressing_room'
+
         end
     end
 
@@ -133,7 +127,8 @@ if $ARGS[0] = 'dressing room':
 			'You go into the bathroom and turn on the shower. You lather your body and wash in the shower.'
 			if deodorant_on = 1: gs 'sweat', 'remove_deo' & '<br>Your deodorant gets washed away in the shower.'
 
-			act 'Get out of the shower':gt 'fit', 'dressing room'
+			act 'Get out of the shower':gt 'fit', 'dressing_room'
+
 		end
 	else
 		'<font color="red">You''ve run out of shampoo and will have to buy some more before you can wash yourself.</font>'
@@ -181,7 +176,8 @@ if $ARGS[0] = 'dressing room':
 				begsec = 1
 				'You signed up for the track team.'
 
-				act 'Leave':gt 'fit', 'dressing room'
+				act 'Leave':gt 'fit', 'dressing_room'
+
 			end
 		elseif $clothingworntype = 'danilovich_outfits' and $shoeworntype = 'danilovich' and pcs_stam >= 40 and pcs_energy >= 20:
 			act 'Go to team practice':gt 'beg', 'start'
@@ -209,6 +205,7 @@ if $ARGS[0] = 'dressing room':
 			act 'Continue': menu_off = 0 & gt $loc, $loc_arg
 		end
 	end
+	dynamic $tampon
 end
 
 if $ARGS[0] = 'fitgirl':
@@ -216,7 +213,7 @@ if $ARGS[0] = 'fitgirl':
 	'<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/idle0.jpg"></center>'
 	'The girl notices you looking and returns the smile. She undresses and taking some toiletries goes into the shower.'
 
-	act 'Turn away':gt 'fit', 'dressing room'
+	act 'Turn away':gt 'fit', 'dressing_room'
 
 	act 'Follow her':
 		*clr & cla
@@ -229,7 +226,7 @@ if $ARGS[0] = 'fitgirl':
 		'<center><img <<$set_imgh>> src="images/characters/city/tanya/gym/shower0.jpg"></center>'
 		'There''s no one in the shower, except this girl. The girl looks around and seeing you smiles again then turns away.'
 
-		act 'Leave the shower':gt 'fit', 'dressing room'
+		act 'Leave the shower':gt 'fit', 'dressing_room'
 
 		gs 'willpower', 'misc', 'force'
 		if will_cost <= pcs_willpwr:
@@ -246,7 +243,8 @@ if $ARGS[0] = 'fitgirl':
 				if pcs_apprnc < 80:
 					'The girl pushes you off, and shouts something very rude about you and each and everyone of your relatives, you run out to the locker room.'
 
-					act 'Go':gt 'fit', 'dressing room'
+					act 'Go':gt 'fit', 'dressing_room'
+
 				elseif pcs_apprnc >= 80:
 					'The girl quickly turns around. She looks a little bit puzzled as she realizes that it was you who grabbed her. She probably expected to see a guy and isn''t sure what to do.'
 
@@ -272,7 +270,8 @@ if $ARGS[0] = 'fitgirl':
 							gs 'arousal', 'end'
 							'The girl smiles at you, but removes your hand and leaves, blowing you a kiss.'
 
-							act 'Continue':gt 'fit', 'dressing room'
+							act 'Continue':gt 'fit', 'dressing_room'
+
 						elseif pcs_apprnc >= 100:
 							cla
 							*clr
@@ -318,7 +317,8 @@ if $ARGS[0] = 'tanyaIntroduction':
 	'"Nope. You seduced me. I have never been with a girl before and I think I earned this as a memento." With these words, Tanya slips your panties in her pocket.'
 	'"My name is Tanya by the way. I live only a short distance from here with my parents. You might come over if you like. Usually I''m home in the late afternoon. We could continue were we left off." she winks at you and leaves.'
 	'<i>You can now visit Tanya at her parents home in the Downtown area once a day after 16:00.</i>'
-	act 'Back':gt 'fit', 'dressing room'
+	act 'Back':gt 'fit', 'dressing_room'
+
 end
 
 if $ARGS[0] = 'gym':
@@ -340,7 +340,7 @@ if $ARGS[0] = 'gym':
 		if hour >= 10 and hour < 12 and week = 7 and centr = 2 and ricewine < 2: 'In the hall you see <a href="exec:gt ''VolleyTrenCentr''">Guang</a>'
 	end
 
-	gs 'fit', 'exercise end'
+	gs 'fit', 'exercise_end'
 
 	if pcs_energy >= 15:
 		act 'Aerobics (Burn fat)':
@@ -357,7 +357,7 @@ if $ARGS[0] = 'gym':
 			if pcs_stam < 30:
 				*nl
 				'You are too tired to do any more exercise and will have to rest and regain some stamina.'
-				gs 'fit', 'exercise end'
+				gs 'fit', 'exercise_end'
 			else
 				act'Continue': gt 'fit', 'gym'
 			end
@@ -375,7 +375,7 @@ if $ARGS[0] = 'gym':
 			if pcs_stam < 30:
 				*nl
 				'You are too tired to do any more exercise and will have to rest and regain some stamina.'
-				gs 'fit', 'exercise end'
+				gs 'fit', 'exercise_end'
 			else
 				act'Continue': gt 'fit', 'gym'
 			end
@@ -392,7 +392,7 @@ if $ARGS[0] = 'gym':
 			if pcs_stam < 30:
 				*nl
 				'You are too tired to do any more exercise and will have to rest and regain some stamina.'
-				gs 'fit', 'exercise end'
+				gs 'fit', 'exercise_end'
 			else
 				act'Continue': gt 'fit', 'gym'
 			end
@@ -410,7 +410,7 @@ if $ARGS[0] = 'gym':
 			if pcs_stam < 30:
 				*nl
 				'You are too tired to do any more exercise and will have to rest and regain some stamina.'
-				gs 'fit', 'exercise end'
+				gs 'fit', 'exercise_end'
 			else
 				act'Continue': gt 'fit', 'gym'
 			end
@@ -428,7 +428,7 @@ if $ARGS[0] = 'gym':
 			if pcs_stam < 30:
 				*nl
 				'You are too tired to do any more exercise and will have to rest and regain some stamina.'
-				gs 'fit', 'exercise end'
+				gs 'fit', 'exercise_end'
 			else
 				act'Continue': gt 'fit', 'gym'
 			end
@@ -444,7 +444,7 @@ if $ARGS[0] = 'gym':
 	end
 end
 
-if $ARGS[0] = 'exercise end':
+if $ARGS[0] = 'exercise_end':
 	menu_off = 1
 	RESULT = rand(0, 19)
 
@@ -455,7 +455,8 @@ if $ARGS[0] = 'exercise end':
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal1.jpg"></center>'
 			'You see a nice guy on the weight machine.'
 
-			act 'Continue':gt 'fit', 'dressing room'
+			act 'Continue':gt 'fit', 'dressing_room'
+
 			act 'Flirt':
 				cla
 				*clr
@@ -483,8 +484,8 @@ if $ARGS[0] = 'exercise end':
 					*clr & cla
 					gs 'willpower', 'pay', 'self'
 					gs 'stat'
-					gt 'fit', 'dressing room'
-					
+					gt 'fit', 'dressing_room'
+
 					'Event text'
 					
 					act 'Next action': gt 'farawayistan'
@@ -512,7 +513,7 @@ if $ARGS[0] = 'exercise end':
 			cla
 			'As you finish training, a fit girl offers to play a little squash with her as she waits for her boyfriend to came.'
 
-			act 'Refuse':gt 'fit', 'dressing room'
+			act 'Refuse':gt 'fit', 'dressing_room'
 
 			act 'Agree':
 				cla
@@ -523,8 +524,7 @@ if $ARGS[0] = 'exercise end':
 				'He stands just behind you and puts one hand on your hand, guiding your racket and showing you how to strike the ball. The other hand starts stroking your hips gradually approaching your crotch.'
 				'You feel his cock resting against your back and looking at the girl, you know that she understands what is going on and that the man is her boyfriend.'
 
-				act 'Escape from these perverts':gt 'fit', 'dressing room'
-
+				act 'Escape from these perverts':gt 'fit', 'dressing_room'
 				act 'Enjoy':
 					guy += 1
 					girl += 1
@@ -541,7 +541,7 @@ if $ARGS[0] = 'exercise end':
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal6.jpg"></center>'
 			'You train near to a girl and engage in conversation, two guys obviously take you for girlfriends and try to chat you up.'
 
-			act 'Continue':gt 'fit', 'dressing room'
+			act 'Continue':gt 'fit', 'dressing_room'
 
 			act 'Flirt back':
 				cla
@@ -550,8 +550,7 @@ if $ARGS[0] = 'exercise end':
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/gym/sex/zal7.jpg"></center>'
 				'You flirt with a guy, and notice that he is getting very excited and constantly glancing behind you. Turning, you see that the girl is already on her haunches and sucking the second guy with gusto.'
 
-				act 'Leave':gt 'fit', 'dressing room'
-
+				act 'Leave':gt 'fit', 'dressing_room'
 				act 'Suck':
 					guy += 2
 					girl += 1
@@ -567,7 +566,7 @@ if $ARGS[0] = 'exercise end':
 				end
 			end
 		else
-			gt 'fit', 'dressing room'
+			gt 'fit', 'dressing_room'
 		end
 	end
 end
@@ -587,7 +586,7 @@ if $ARGS[0] = 'kickboxing':
 	'Around it there are various punching bags of different sizes and weights and a couple of coaches with practice pads.'
 	'You can try your luck in a fight here on Saturdays but safety concerns limit everyone to a maximum of 1 bout per week.'
 
-	act 'Return to dressing room': gt 'fit', 'dressing room'
+	act 'Return to dressing room': gt 'fit', 'dressing_room'
 
 	act 'Work on your jabs':
 		cla
@@ -637,7 +636,7 @@ if $ARGS[0] = 'kickboxing':
 		act 'Leave':gt 'fit', 'kickboxing'
 	end
 
-	act 'Sparing (training bout in the ring)':
+	act 'Sparring (training bout in the ring)':
 		cla
 		*clr
 		'You need to choose a partner for sparring'

locations/foto_events.qsrc

@@ -940,7 +940,7 @@ if $ARGS[0] = 'nude_persuasion':
 			'"The special bonus doesn''t hurt either," you smile back shyly.'
 			'The manager laughs showing you his clipboard. "Go to this set here and everything is already set up for you."'
 			foto_persuade = 5
-			act'Do the nude shoot':gt'foto_shoot','nude'
+			gs'foto_nude_debut', 'nude_debut_shave_start'
 		end
 	elseif foto_persuade = 1:
 		act'Yes, I''m ready':
@@ -949,7 +949,7 @@ if $ARGS[0] = 'nude_persuasion':
 			'"You know what? I think I''m ready to do it today! I''ll do the nude shoot," you say, smiling. "And I''ll take the bonus."'
 			'The manager laughs showing you his clipboard. "Go to this set here and everything is already set up for you."'
 			foto_persuade = 5
-			act'Do the nude shoot':gt'foto_shoot','nude'
+			gs'foto_nude_debut', 'nude_debut_shave_start'
 		end
 	end
 	act'Wow! Yes!':

locations/foto_nude_debut.qsrc

@@ -1,10 +1,24 @@
 # foto_nude_debut
 
+if $ARGS[0] = 'nude_debut_memory':
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
+	'Hello, if you are seeing this page it is either because you were already doing nude modelling on a save before this content was added or the game has bugged out for some reason.'
+	*nl
+	'The following scene is a memory of your full frontal debut as a model and the creator encourages you to roleplay it as your character would have been at the time of their first nude shoot.'
+	*nl
+	'Please enjoy.'
+	act'Continue':gt'foto_nude_debut', 'nude_debut_pre'
+end
+
 if $ARGS[0] = 'nude_debut_pre':
-	if pcs_leghair > 3:$temp['model_shave'] = '"And your legs too."'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 	'"You want to do a nude shoot? This would be your first one, won''t it?" the manager asks.'
 	'"Yes," you nod back.'
+	gs'foto_nude_debut', 'nude_debut_shave_start'
+end
+
+if $ARGS[0] = 'nude_debut_shave_start':
+	if pcs_leghair > 3:$temp['model_shave'] = '"And your legs too."'
 	if modelfoto['nude_shave_no'] = 1:
 		if pcs_pubes <= 3:
 			modelfoto['nude_shave_yes'] = 1
@@ -22,19 +36,28 @@ if $ARGS[0] = 'nude_debut_pre':
 		if pcs_pubes > 3:
 			gs'foto_nude_debut', 'nude_debut_shave_options'
 			if pcs_pubes < 10:
-				'"You''ll have to shave that stubble off," he says, eyeing the fuzzy patch between your legs. <<$temp[''model_shave'']>>'
+				if foto_persuade = 5:
+					'"Just one thing. You need to shave that stubble off," he says, eyeing the fuzzy patch between your legs. <<$temp[''model_shave'']>>'
+				else
+					'"You''ll have to shave that stubble off," he says, eyeing the fuzzy patch between your legs. <<$temp[''model_shave'']>>'
+				end
 				act'But I''m growing it out':
 					cla & *nl
 					'"But I''m growing it out," you protest.'
-					'"Start again tomorrow," he shrugs. "It''s your debut. Stubble looks bad. Besides, we have a policy here that all model''s nude debut has to be cleanshaven. Even if I wanted to, it''s not up to me. If you don''t like it, do something else."'
+					'"Start again tomorrow," he shrugs. "It''s your debut. All models must be clean shaven for their nude debut. Even if I wanted to give you a pass, it''s not up to me. Besides, stubble looks bad."'
 					gs'foto_nude_debut', 'nude_debut_shave_options'
 				end
 			elseif pcs_pubes > 3:
-				'"You''ll have to shave," he says, eyeing your pubic hair. <<$temp[''model_shave'']>>'
+				if foto_persuade = 5:
+					'"Just one thing. You need to shave that off first," he says, eyeing your pubic hair. <<$temp[''model_shave'']>>'
+				else
+					'"You need to shave that off first," he says, eyeing your pubic hair. <<$temp[''model_shave'']>>'
+				end
+				
 				act'But I like it this way':
 					cla & *nl
 					'"But I like it this way," you protest.'
-					'"Sorry," he shrugs. "It''s your debut. We have a policy here that all model''s nude debut has to be cleanshaven. Even if I wanted to, it''s not up to me. You can start growing it out again tomorrow."'
+					'"Policy," he shrugs. "It''s your debut. All models must be clean shaven for their nude debut. Even if I wanted to give you a pass, it''s not up to me. You can start growing it out again tomorrow."'
 					gs'foto_nude_debut', 'nude_debut_shave_options'
 				end
 			end
@@ -294,6 +317,7 @@ if $ARGS[0] = 'sick_debut':
 	'A wave of dizziness passes through your head. Your legs feel like jelly, barely keeping you upright. The lights flash again and you suddenly want to throw up.'
 	*nl
 	'Time passes in a miserable blur, barely aware of your surroundings while taking stiff poses, trying with all your might to keep from ruining the shoot by vomitting all over the set. By the time the photographer calls an end to the shoot, you''re on the verge of tears, having wanted it to be over and hour ago.'
+	gs'foto_nude_debut', 'debut_after1'
 end
 
 if $ARGS[0] = 'aroused_debut':
@@ -321,6 +345,7 @@ if $ARGS[0] = 'aroused_debut':
 	end
 	*nl
 	'Time passes in a furious blur, barely aware of your surroundings while taking poses, trying with all your might not to openly pant in heat. Several pauses have to be taken just to wipe you down, the overflowing arousal of your dripping snatch won''t stop running down your thighs. The intervals between each wipe gets shorter after each one until the shoot is called to an end.'
+	gs'foto_nude_debut', 'debut_after1'
 end
 
 if $ARGS[0] = 'happy_debut':
@@ -761,6 +786,7 @@ if $ARGS[0] = 'debut_ending':
 	modelfoto['nip'] += 1
 	modelfoto['pussy'] += 1
 	modelfoto['fullnude'] += 1
+	modelfoto['nude_debut'] = 1
 	cla & *clr
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/foto.jpg"></center>'
 	'All the pictures taken, the staff begin striking the set and a manager comes out with your pay.'

locations/foto_shoot.qsrc

@@ -435,7 +435,11 @@ if $ARGS[0] = 'nude_shoot':
 	
 	act 'Full nude':
 		$modelfoto['shoot_type'] = 'full_nude'
-		if modelfoto['fullnude'] = 0:gt'foto_nude_debut', 'nude_debut_pre'
+		if modelfoto['fullnude'] = 0:
+			gt'foto_nude_debut', 'nude_debut_pre'
+		elseif modelfoto['fullnude'] > 0 and $modelfoto['first_nude_pre'] = '':
+			gt'foto_nude_debut', 'nude_debut_memory'
+		end
 		*clr & cla
 		if pcs_inhib < 60:
 			if modelfoto['fullnude'] > 0:

locations/gadfield.qsrc

@@ -327,7 +327,7 @@ end
 !MiraLoc = 5 (Mira with gop)
 !---------------------------------------------
 
-if grandpaQW['chore_herd_cattle'] = 1 and npc_rel['A60'] >= 15 and mira = 0 and sunWeather = 1 and hour >= 10 and temp = 1 and Mira_no = 0 and(npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
+if grandpaQW['chore_herd_cattle'] = 1 and npc_rel['A60'] >= 15 and mira = 0 and sunWeather = 1 and hour >= 10 and temp = 1 and Mira_no = 0 and(npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1) and npc_known['A60'] = 1:
 	*clr & cla
 	menu_off = 1
 	'<center><img <<$set_imgh>> src="images/characters/gadukino/mira/mira2.jpg"></center>'

locations/gadforest.qsrc

@@ -107,7 +107,7 @@ if $ARGS[0] = 'forest_edge':
 		if forestpicnic = 0 and $clothingworntype ! 'nude' and clothesAtLocation = 0 and month >= 4 and month <= 10 and hour >= 8 and hour <= 20 and miranudetalk = 1 and miratalkday ! daystart: gt 'gadforest_event', 'mira_nude_event'
 	! Events without Mira
 	else
-		if metmira = 1 and MiraLoc ! 3 and hour >= 8 and hour <= 10:
+		if npc_known['A60'] = 1 and MiraLoc ! 3 and hour >= 8 and hour <= 10:
 			mirarand = rand(1,10)
 			if mirarand >= 6: MiraLoc = 3 & gt 'gadforest_event', 'mira_morning_walk'
 		end

locations/gadukino.qsrc

@@ -107,7 +107,7 @@ if $ARGS[0] = '':
 				if svidanie[2] = 1:'<b><a href="exec:lover_number = 2 & gt ''lover_meet'', ''start''"><<$loverdesc[2]>></a> is waiting in the street.</b>'
 			end
 		end
-		if npc_rel['A60'] > 0 and metmira = 1:
+		if npc_rel['A60'] > 0 and npc_known['A60'] = 1:
 			'Just down the road from your grandparents'' house is <a href="exec:minut += 5 & gt ''miroslavahome'', ''start''">Mira''s house</a>.'
 			act 'Go to Mira''s house': minut += 5 & gt 'miroslavahome', 'start'
 		end
@@ -302,14 +302,14 @@ end
 
 if $ARGS[0] = 'mira_events':
 	! never met mira before
-	if npc_rel['A60'] = 0 and npc_QW['A60'] = 0:
+	if npc_known['A60'] = 0:
 		*clr & cla
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/miroslava.jpg"></center>'
 		'Walking around the village, you notice a young girl your age. Unfortunately, you do not recognize her from the last time you were in the village. She is pulling on a rope attached to the collar of a small calf. The calf grunts with displeasure, shakes her head and refuses to move further.'
 		act 'Walk away': gt 'gadukino'
 		act 'Help her':
 			*clr & cla
-			metmira = 1
+			npc_known['A60'] = 1
 			npc_rel['A60'] += 10
 			minut += 15
 			gs 'stat'

locations/gdktoilet_mens.qsrc

@@ -166,7 +166,7 @@ if $ARGS[0] = 'mens_entrance_events':
 		gs 'stat'
 		'<center><b><font color="maroon">Community Center - Men''s Restroom</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/mens/bathroom_mens.jpg"></center>'
-		'You look inside the men''s restroom and hear a couple having sex in one of the stalls. You wonder who''s inside and then decide to leave. While you turn away you hear them stop and the stall slams open moments later hearing giggling from some women. While you''re outside you see Ivan and Vicky leave the men''s restroom and walk out into the crowd.'
+		'You look inside the men''s restroom and hear a couple having sex in one of the stalls. You wonder who''s inside and then decide to leave. While you turn away you hear them stop and the stall slams open moments later hearing giggling from some women. While you''re outside you see Vanya and Vicky leave the men''s restroom and walk out into the crowd.'
 		gs 'arousal', 'voyeur_sex', 10
 		gs 'arousal', 'end'
 		gs 'stat'

locations/gossips.qsrc

@@ -91,7 +91,7 @@ if $ARGS[0] = 'complex':
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/girls_gossip.jpg"></center>'
 			'Three girls are sitting on one of the benches that dot the courtyard.'
 			*nl
-			'You can''t help but notice them looking in your direction. They start whispering and giggling to each other, followed by pointed looks in your direction. "Don''t you have a cock to go and suck somewhere, slut?" They all start giggling againa as you just sigh and continue on. It seems people are talking about your growing reputation. You should be more discreet if you want them to stop talking about you.'
+			'You can''t help but notice them looking in your direction. They start whispering and giggling to each other, followed by pointed looks in your direction. "Don''t you have a cock to go and suck somewhere, slut?" They all start giggling again as you just sigh and continue on. It seems people are talking about your growing reputation. You should be more discreet if you want them to stop talking about you.'
 		elseif fame['pav_slut'] < 200:
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/events/girls_gossip.jpg"></center>'
 			'Three girls are sitting on one of the benches that dot the courtyard. You overhear their conversation as you walk past.'