# frot
if $ARGS[0] = 'a':
cla
*clr
svol = rand(30,50)
spot = 500*rand(16,24)
gs 'stat'
'
> src="images/locations/city/shared/metro/sex/grop/frot.jpg">'
'You feel something solid against your ass, stirring you realize that rising up between your buttocks a penis comes to rest.'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frot1.jpg">'
'The guy standing behind you, with no regard for other passengers, grabs your butt with his hand and presses his member harder against your ass.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frot2.jpg">'
'You feel like the man behind you has got his penis out and begun to rub it on your ass, clinging on to you and squeezing your buttocks with his hands.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
pcs_horny += 10
frot += 1
gs 'cum_call', 'pantyrear', 'stranger on the metro', 0, 0, spot, svol
sub += 3
dynamic '<<$clothingworntype>>H[<>] -= 1'
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotc1.jpg">'
'The man jerks back and you feel something warm and viscous flow over you. The guy finished you on your ass, then moved away to another section.'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
end
if $ARGS[0] = 'b':
cla
*clr
svol = rand(30,50)
spot = 500*rand(16,24)
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frot.jpg">'
'You feel something solid against your ass, stirring you realize that rising up between your buttocks a penis comes to rest.'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frot1.jpg">'
'The guy standing behind you, with no regard for other passengers, grabs your butt with his hand and presses his member harder against your ass.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frota1.jpg">'
'The man lifts your skirt and starts to caress your bare buttocks with his strong hands.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
pcs_horny += 10
sub += 1
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frota2.jpg">'
'The man lowers your panties and slides his hand between your naked buttocks to caress your wet pussy.'
gs 'arousal', 'vaginal_finger', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
frot += 1
gs 'cum_call', 'clothesgroin', 'stranger on the metro', 0, 0, spot, svol
dynamic '<<$clothingworntype>>H[<>] -= 1'
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frot3.jpg">'
'The man pull your panties down to your knees, then letting your skirt fall back into place takes your hand in his. He forces his dick into your hand.'
'You cup the hot and hard cock and begin stroking it. After a couple of minutes you feel the man cumming on your skirt.'
gs 'arousal', 'hj', 5, 'sub'
gs 'stat'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
end
end
if $ARGS[0] = 'c':
cla
*clr
svol = rand(30,50)
spot = 500*rand(16,24)
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp.jpg">'
'You feel a man standing behind you start poking his hand down the back of your pants.'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp1.jpg">'
'You enjoy the nice sensation of the stranger caressing your ass under your pants, when suddenly you see he has pulled out a small pair of scissors and is trying to reach your bra strap.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
gs 'bras', 'dispose'
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp2.jpg">'
'The man cut the straps of your bra and removes it from you. Freed from your bra, he now fondles your breasts.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Enjoy':
cla
*clr
gs 'arousal', 'foreplay', 5, 'sub'
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp3.jpg">'
if PCloSkirt = 0:
'You are bent forward and the man begins to caress your ass, you feel his hands clutching your pants trying to tear them.'
else
'You are bent forward and the man begins to caress your ass, you feel his hands start to lift your skirt.'
end
act 'Move away':gt 'frot', 'fin'
act 'Allow him':
cla
*clr
pcs_horny += 10
clr
gs 'stat'
pcs_horny += 10
sub += 2
dynamic '<<$clothingworntype>>H[<>] -= 5'
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp4.jpg">'
if PCloSkirt = 0:
'The man rips your pants between your legs, thereby exposing your wet pussy.'
elseif $pantyworntype = 'none':
'The man raises your skirt and you feel his hard cock brushing against your pussy lips.'
else
'The man rips aside your panties, thereby exposing your wet pussy.'
end
if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
act 'Submit':
cla
*clr
'> src="images/locations/city/shared/metro/sex/grop/frotp5.jpg">'
if stat['vaginal'] = 0:
'The idea of letting some stranger take your virginity makes you feel like a dirty slut, but also excites you more than you care to admit.'
end
'You widen your stance as much as possible in the crowded car and push back against him as he thrusts into your sweaty pussy.'
if pcs_horny >= 100:
pcs_mood += 15
pcs_willpwr += 15
$orgasm_or = 'custom'
$orgasm_txt = 'The wild excitement of sex with a stranger in a public place is too much and you start to cum almost immediately as he enters you.'
else
$orgasm_or = 'custom'
$orgasm_txt = 'You are overwhelmed by the wild excitement of sex with a stranger in a public place.'
end
guy += 1
pcs_vag += 1
cumprecheck = 1
gs 'cum_call', '', 'stranger on the metro', 0, 0, spot, svol
gs 'arousal', 'vaginal', 5, 'sub'
gs 'stat'
if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
act 'Further':
cla
*clr
sub += 3
pcs_horny += 10
frot += 1
gs 'cum_call', '', 'stranger on the metro', 0, 0, spot, svol
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp6.jpg">'
'The stranger does not pull out of your pussy, your juices flow and he finishes inside you. You feel like a strong jet of sperm filled your uterus.'
gs 'cuminsidereact', 'some guy whose face you haven''t even seen'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
end
end
end
end
if $ARGS[0] = 'd':
cla
*clr
svol = rand(30,50)
spot = 500*rand(16,24)
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp.jpg">'
'You feel a man standing behind you start poking his hand down the back of your pants.'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotd.jpg">'
'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, he takes your hand and makes you hold his penis in your hand.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Stroke his cock':
cla
*clr
gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
frot += 1
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg">'
'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
gs 'arousal', 'hj', 5, 'sub'
gs 'stat'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
if $ARGS[0] = 'e':
cla
*clr
svol = rand(30,50)
spot = 500*rand(16,24)
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotp.jpg">'
'You feel a man standing behind you start poking his hand down the back of your pants.'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frote.jpg">'
'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, you feel his hand reach between your legs and start to masturbate your pussy from behind.'
gs 'arousal', 'vaginal_finger', 5, 'sub'
gs 'stat'
if pcs_horny >= 90:
pcs_mood += 15
pcs_willpwr += 15
$orgasm_or = 'custom'
$orgasm_txt = 'You can''t take any more and you explode in a powerful orgasm. Your legs give way.'
act 'Squat':
cla
*clr
pcs_horny += 10
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frote1.jpg">'
'You can no longer stand and squat. The man moves to your side, pulls out his member and taking you head in his hand, turns your face to meet it.'
if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
act 'Suck it':
cla
*clr
guy += 1
frot += 1
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frote2.jpg">'
'The man taunts you by bringing his cock to your lips, then moving back. Soon, timing it just right, you catch his purple head between your lips.'
'You obediently suck his hard cock. You are sitting on your haunches in the middle of a crowded subway car and sucking a stranger dick.'
gs 'arousal', 'bj', 5, 'sub'
gs 'stat'
if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
act 'Continue to suck':
cla
*clr
pcs_horny += 10
gs 'cum_call', 'face', 'stranger on the metro', 0, 0, spot, svol
facial += 1
sub += 3
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frote3.jpg">'
'The man pulls his cock out of your mouth and ends against your lips, hot cum splatters on your lips chin.'
if pcs_dom > 0:act 'Move away':gt 'frot', 'fin'
act 'Sit on the floor':
cla
*clr
pcs_horny += 10 + sub
gs 'cum_call', 'mouth', 'stranger on the metro', 0, 0, spot, svol
swallow += 1
sub += 3
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frote4.jpg">'
'Male fingers collect the sperm from your face and they push into your mouth, and you dutifully lick them and swallow the sperm.'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
end
exit
else
'You are very nervous the thought crosses your mind to masturbate his penis.'
act 'Stroke his cock':
cla
*clr
gs 'cum_call', 'butt', 'stranger from the metro', 0, 0, spot, svol
frot += 1
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg">'
'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
gs 'arousal', 'hj', 5, 'sub'
gs 'stat'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
end
if $ARGS[0] = 'd1':
cla
*clr
svol = rand(30,50)
spot = 500*rand(16,24)
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotd2.jpg">'
'You feel a man standing behind you playing with your skirt.'
act 'Move away':gt 'frot', 'fin'
act 'Disregard':
cla
*clr
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotd.jpg">'
'The man pulls your pants off you leaving you with a bare ass in a crowded subway car, he takes your hand and makes you take his penis in your hand.'
gs 'arousal', 'foreplay', 5, 'sub'
gs 'stat'
act 'Move away':gt 'frot', 'fin'
act 'Stroke his cock':
cla
*clr
gs 'cum_call', 'butt', 'stranger on the metro', 0, 0, spot, svol
frot += 1
clr
gs 'stat'
'> src="images/locations/city/shared/metro/sex/grop/frotd1.jpg">'
'You caress his dick and rub it on your bare skin, you rub it more vigorously as it stiffens and sperm splashes onto your bare ass. After the man was satisfied, he pulls your pants over your sperm covered ass, pats you on the bum and disappears.'
gs 'arousal', 'hj', 5, 'sub'
gs 'stat'
act 'Get out of the car':gt 'frot', 'fin2'
end
end
end
if $ARGS[0] = 'fin':
cla
'You barely manage to escape to another place, away from the horny idiot. After a while you get to your station.'
gs 'arousal', 'end'
gs 'stat'
act 'Get out of the car':gt 'metro', 'start'
end
if $ARGS[0] = 'fin2':
gt 'metro', 'start'
end
--- frot ---------------------------------