|
@@ -45,7 +45,7 @@ end
|
|
|
if $ARGS[0] = 'ending':
|
|
|
!! gs 'booty_call_stats', 'save'
|
|
|
gs 'arousal', 'end'
|
|
|
- gs'booty_call_after', 'dress'
|
|
|
+ if $clothingworntype = 'nude': gs'booty_call_after', '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
|
|
@@ -54,8 +54,12 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'dress':
|
|
|
if $clothingworntype = 'nude': gs 'clothing', 'wear_last_worn'
|
|
|
- if $pantyworntype = 'none': gs 'panties', 'wear', $lastwornpantytype['booty_call'], lastwornpantynumber['booty_call']
|
|
|
- if $braworntype = 'none': gs 'bras', 'wear', $lastwornbratype['booty_call'], lastwornbranumber['booty_call']
|
|
|
+ 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
|
|
|
|
|
@@ -300,7 +304,7 @@ if $ARGS[0] = 'tap_out':
|
|
|
booty_call['sore_pussy'] = 1
|
|
|
cla & *clr
|
|
|
$npc_apt_bedroom[$boy]
|
|
|
- if booty_call['cock_remove'] = 1:
|
|
|
+ if booty_call['cock_inserted'] = 0:
|
|
|
'"I need to tap out," you pant breathlessly. "You''re just too big for me... I can''t keep going..."'
|
|
|
else
|
|
|
'"I need to tap out," you pant breathlessly, wincing at the pain of the large cock still filling you up. "You''re just too big for me... I can''t keep going..."'
|
|
@@ -356,13 +360,13 @@ if $ARGS[0] = 'fucked_out':
|
|
|
$npc_apt_bedroom[$boy]
|
|
|
if booty_call['fuck_again'] = 1:
|
|
|
'"Wanna keep going?" you eagerly ask <<$npc_firstname[$boy]>>.'
|
|
|
- elseif booty_call['cock_remove'] = 0:
|
|
|
+ elseif booty_call['cock_inserted'] = 1:
|
|
|
'"Wanna keep going?" you eagerly ask, flexing your pussy around <<$npc_firstname[$boy]>>''s cock.'
|
|
|
else
|
|
|
'"Wanna keep going?" you eagerly ask <<$npc_firstname[$boy]>>.'
|
|
|
end
|
|
|
'"I don''t think I can..." he groans.'
|
|
|
- if booty_call['cock_remove'] = 1:
|
|
|
+ if booty_call['cock_inserted'] = 0:
|
|
|
'You look down and see <<$npc_firstname[$boy]>>''s cock already going limp, rapidly deflating right before your eyes.'
|
|
|
else
|
|
|
'You realize with a start that <<$npc_firstname[$boy]>> is getting <i>softer</i>, not harder, inside you.'
|
|
@@ -371,7 +375,7 @@ if $ARGS[0] = 'fucked_out':
|
|
|
act'Ugh':
|
|
|
cla & *clr
|
|
|
$booty_call['end_comment'] = '"Ugh..." you groan with a roll of your eyes.'
|
|
|
- if booty_call['cock_remove'] = 1:
|
|
|
+ if booty_call['cock_inserted'] = 0:
|
|
|
$npc_apt_bedroom[$boy]
|
|
|
$booty_call['end_comment']
|
|
|
gs'booty_call_after', 'after_sex1'
|
|
@@ -384,7 +388,7 @@ if $ARGS[0] = 'fucked_out':
|
|
|
act'Sigh':
|
|
|
cla & *clr
|
|
|
$booty_call['end_comment'] = 'You sigh in disappointment.'
|
|
|
- if booty_call['cock_remove'] = 1:
|
|
|
+ if booty_call['cock_inserted'] = 0:
|
|
|
$npc_apt_bedroom[$boy]
|
|
|
$booty_call['end_comment']
|
|
|
gs'booty_call_after', 'after_sex1'
|
|
@@ -401,7 +405,7 @@ if $ARGS[0] = 'fucked_out':
|
|
|
else
|
|
|
$booty_call['end_comment'] = '"Oops," you giggle. "Guess that''s my fault."'
|
|
|
end
|
|
|
- if booty_call['cock_remove'] = 1:
|
|
|
+ if booty_call['cock_inserted'] = 0:
|
|
|
$npc_apt_bedroom[$boy]
|
|
|
$booty_call['end_comment']
|
|
|
gs'booty_call_after', 'after_sex1'
|
|
@@ -892,7 +896,7 @@ if $ARGS[0] = 'cum_clean':
|
|
|
act'Never mind': cla & gs 'booty_call_sex', 'sex_end'
|
|
|
|
|
|
act'Ask him if he has any wipes':
|
|
|
- booty_call['cock_remove'] = 1
|
|
|
+ booty_call['cock_inserted'] = 0
|
|
|
gs 'cum_cleanup', 'cleanloc'
|
|
|
gs'stat'
|
|
|
cla & *clr
|
|
@@ -928,7 +932,7 @@ if $ARGS[0] = 'cum_clean':
|
|
|
act'Use your wipes':
|
|
|
gs 'cum_cleanup', 'cleanloc'
|
|
|
gs'stat'
|
|
|
- booty_call['cock_remove'] = 1
|
|
|
+ booty_call['cock_inserted'] = 0
|
|
|
cla & *clr
|
|
|
'<center><b><font color="maroon"><<$npc_firstname[$boy]>>''s Bedroom</font></b></center>'
|
|
|
$npc_apt_bedroom[$boy]
|
|
@@ -945,7 +949,7 @@ if $ARGS[0] = 'cum_clean':
|
|
|
|
|
|
if cumloc[13] > 0:
|
|
|
act'Lick your fingers clean':
|
|
|
- booty_call['cock_remove'] = 1
|
|
|
+ booty_call['cock_inserted'] = 0
|
|
|
gs'stat'
|
|
|
gs 'cum_cleanup', 'cleanloc'
|
|
|
stat['swallow'] += 1
|
|
@@ -1018,7 +1022,7 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'after_sex1':
|
|
|
booty_call['sex_over'] = 1
|
|
|
- if booty_call['cock_remove'] = 0 and ($booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl'):
|
|
|
+ if booty_call['cock_inserted'] = 1 and ($booty_call['position'] = 'miss' or $booty_call['position'] = 'doggy' or $booty_call['position'] = 'cowgirl'):
|
|
|
act'Pull apart':
|
|
|
cla & *clr
|
|
|
gs'booty_call_after', 'pull_apart'
|
|
@@ -1057,7 +1061,7 @@ if $ARGS[0] = 'after_sex1':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'pull_apart':
|
|
|
- booty_call['cock_remove'] = 1
|
|
|
+ booty_call['cock_inserted'] = 0
|
|
|
if $booty_call['cum_choice'] = 'creampie':
|
|
|
if $booty_call['position'] = 'miss':
|
|
|
'<center><video autoplay loop src="images/shared/sex/after/miss_after1.mp4"></video></center>'
|
|
@@ -1743,8 +1747,12 @@ if $ARGS[0] = 'dressing_image':
|
|
|
'<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'] = 'slipping 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 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:
|
|
@@ -1766,6 +1774,7 @@ end
|
|
|
|
|
|
if $ARGS[0] = 'dressing1':
|
|
|
cla & *clr
|
|
|
+!! gs'booty_call_after', 'dress'
|
|
|
gs'booty_call_after', 'dress_loop'
|
|
|
gs'booty_call_after', 'dressing_image'
|
|
|
|
|
@@ -1776,16 +1785,19 @@ if $ARGS[0] = 'dressing1':
|
|
|
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_after', 'dress'
|
|
|
+
|
|
|
gs'booty_call_after', 'dressing2'
|
|
|
else
|
|
|
gs'booty_call_after', 'dress_start_desc'
|
|
|
if booty_call['angry_after'] = 1 or booty_call['annoyed'] > 0:
|
|
|
- '"I have to go," you say flatly, <<$booty_call[''dress_describe'']>> without looking at <<$npc_firstname[$boy]>>.'
|
|
|
+ '"I have to go," you say flatly, reaching down for your clothes without looking at <<$npc_firstname[$boy]>>.'
|
|
|
gs'booty_call_after', '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_after', 'dress_loop'
|
|
|
'"Guess I''ll go then," you sigh, <<$booty_call[''dress_describe'']>>.'
|
|
|
gs'booty_call_after', 'dressing2'
|
|
|
+ gs 'booty_call_after', '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_after', 'not_leaving'
|
|
@@ -1815,7 +1827,8 @@ if $ARGS[0] = 'dressing2':
|
|
|
act'Finish getting dressed':
|
|
|
gs'booty_call_after', 'dress_loop'
|
|
|
cla & *clr
|
|
|
- $npc_apt_bedroom[$boy]
|
|
|
+!! $npc_apt_bedroom[$boy]
|
|
|
+ gs'booty_call_after', 'dressing_image'
|
|
|
'You finish <<$booty_call[''dress_describe'']>>.'
|
|
|
gs'booty_call_after', 'after_sex_dressed'
|
|
|
end
|
|
@@ -1839,8 +1852,8 @@ end
|
|
|
if $ARGS[0] = 'leaving_soon':
|
|
|
act'Yeah':
|
|
|
booty_call['leaving'] = 1
|
|
|
-
|
|
|
cla & *clr
|
|
|
+ gs'booty_call_after', 'dress_loop'
|
|
|
gs'booty_call_after', 'dressing_image'
|
|
|
gs'booty_call_after', 'dress_start_desc'
|
|
|
'"You heading out?" <<$npc_firstname[$boy]>> asks.'
|
|
@@ -1867,6 +1880,7 @@ if $ARGS[0] = 'going_disco':
|
|
|
if $region = 'pav':
|
|
|
act'Going to the disco':
|
|
|
cla & *clr
|
|
|
+ gs'booty_call_after', 'dress_loop'
|
|
|
gs'booty_call_after', 'dressing_image'
|
|
|
gs'booty_call_after', 'dress_start_desc'
|
|
|
'"You heading out?" <<$npc_firstname[$boy]>> asks.'
|
|
@@ -1883,6 +1897,7 @@ if $ARGS[0] = 'going_disco':
|
|
|
else
|
|
|
act'Going to the club':
|
|
|
cla & *clr
|
|
|
+ gs'booty_call_after', 'dress_loop'
|
|
|
gs'booty_call_after', 'dressing_image'
|
|
|
gs'booty_call_after', 'dress_start_desc'
|
|
|
'"You heading out?" <<$npc_firstname[$boy]>> asks.'
|
|
@@ -1905,6 +1920,7 @@ if $ARGS[0] = 'mom_late':
|
|
|
act'Mom will kill me':
|
|
|
booty_call['mom_kill'] = 1
|
|
|
cla & *clr
|
|
|
+ gs'booty_call_after', 'dress_loop'
|
|
|
gs'booty_call_after', 'dressing_image'
|
|
|
gs'booty_call_after', 'dress_start_desc'
|
|
|
'"You heading out?" <<$npc_firstname[$boy]>> asks.'
|
|
@@ -2126,7 +2142,7 @@ if $ARGS[0] = 'panty_gift2':
|
|
|
act'To remember my virginity':
|
|
|
cla & *clr
|
|
|
gs'booty_call_after', 'dressing_image'
|
|
|
- '"To remember my virginity," you smile, <<$booty_call[''dress_describe'']>>. "And commemorate the moment you made me into a woman."'
|
|
|
+ '"To remember my virginity," you smile, <<$booty_call[''dress_describe'']>>. "And that you made me a woman."'
|
|
|
if npc_girlfriend[$boy] = 1:
|
|
|
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.'
|
|
@@ -2206,41 +2222,72 @@ if $ARGS[0] = 'dress_image':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'dress_loop':
|
|
|
- $booty_call['dress_describe'] = ''
|
|
|
- if $clothingworntype = 'nude':
|
|
|
- if $lastwornpantytype['booty_call'] ! 'none':
|
|
|
- $booty_call['dress_describe'] += 'pulling your panties up your legs'
|
|
|
- if $lastwornbratype['booty_call'] ! 'none' or $clothingworntype = 'nude': $booty_call['dress_describe'] += ' and '
|
|
|
- end
|
|
|
+ :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'
|
|
|
-
|
|
|
- if $lastwornbratype['booty_call'] ! 'none':
|
|
|
- $booty_call['dress_describe'] += 'fastening your bra around your chest'
|
|
|
- if $clothingworntype = 'nude': $booty_call['dress_describe'] += ' then '
|
|
|
- end
|
|
|
+ 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'
|
|
|
-
|
|
|
- gs'clothing', 'wear', $lastwornclothingtype['booty_call'], lastwornclothingnumber['booty_call']
|
|
|
- if CloDress = 1:
|
|
|
- $booty_call['dress_describe'] += 'pulling your dress over your shoulders'
|
|
|
- elseif CloSkirtShortness > 0:
|
|
|
- $booty_call['dress_describe'] = 'slipping your skirt up your legs'
|
|
|
- $booty_call['dress_describe'] += ' and pulling your top over your breasts'
|
|
|
+ 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
|
|
|
- $booty_call['dress_describe'] += 'tugging your pants over your hips'
|
|
|
- $booty_call['dress_describe'] += ' and pulling your top over your breasts'
|
|
|
+ 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'] = 'slipping 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
|
|
|
- else
|
|
|
+ elseif booty_call['dress_end'] = 1:
|
|
|
if CloDress = 1:
|
|
|
- $booty_call['dress_describe'] += 'checking your dress'
|
|
|
+ $booty_call['dress_describe'] = 'checking your dress'
|
|
|
elseif CloSkirtShortness > 0:
|
|
|
- $booty_call['dress_describe'] += 'smoothing your skirt'
|
|
|
+ $booty_call['dress_describe'] = 'smoothing your skirt'
|
|
|
else
|
|
|
- $booty_call['dress_describe'] += 'checking your clothes'
|
|
|
+ $booty_call['dress_describe'] = 'checking your clothes'
|
|
|
end
|
|
|
end
|
|
|
gs'stat'
|
|
@@ -2289,7 +2336,7 @@ if $ARGS[0] = 'after_sex_dressed':
|
|
|
end
|
|
|
|
|
|
if $ARGS[0] = 'leaving_dialogue':
|
|
|
- '"I gotta get going," you say'
|
|
|
+ '"I gotta get going," you say.'
|
|
|
'"Okay, see you later."'
|
|
|
act'"Bye"':
|
|
|
$booty_call['leave_dialogue'] = 'Bye'
|
|
@@ -2513,7 +2560,8 @@ if $ARGS[0] = 'dress_talk':
|
|
|
act'Finish getting dressed':
|
|
|
gs'booty_call_after', 'dress_loop'
|
|
|
cla & *clr
|
|
|
- $npc_apt_bedroom[$boy]
|
|
|
+!! $npc_apt_bedroom[$boy]
|
|
|
+ gs'booty_call_after', 'dressing_image'
|
|
|
'You finish <<$booty_call[''dress_describe'']>>'
|
|
|
gs'booty_call_after', 'after_sex_dressed'
|
|
|
end
|