glife/locations/abductionCustomer.qsrc

# abductionCustomer

if $ARGS[0] = 'abdCustomerGate':
	menu_off = 1
	'Your master approaches you. "Hello, slave."'
	'"I have a customer here who came to rent you for a while. Do whatever he asks of you."'
	buyout = 0
	act 'Yes, Master':gt 'abductionCustomer', 'abdCustomerGo'
end

if $ARGS[0] = 'abdCustomerGateBuyout':
	menu_off = 1
	'Your master approaches you. "Hello, slave."'
	'"I have a customer here that came to rent you for a while. Do whatever he asks of you."'
	buyout = 1
	act 'Yes, Master':gt 'abductionCustomer', 'abdCustomerGo'
end

if $ARGS[0] = 'abdCustomerGo':
	menu_off = 1
	minut += 5
	gs 'stat'
	i = rand(1,3)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/ledonfour<<i>>.mp4"></video></center>'
	'Your master removes your regular chain and attaches a leash to your collar.'
	'You are led up the stairs into the house above your cellar.'
	'When you enter the hall, your master orders you on your knees. "Crawl on your hands and legs like the bitch you are!"'
	if pcs_vag = 0:
		'You are led to the room where your customer awaits. Your leash is handed to him.'
	else
		'You are led to the room where your customer awaits. Your leash is handed to him, and your master leaves. The room''s only door closes behind him, leaving you alone with your customer.'
	end
	act 'Continue':gt 'abductionCustomer', 'abdCustomer'
end

if $ARGS[0] = 'abdCustomer':
	minut += 5
	gs 'stat'

	! customer character type
	! -1=kind, 3-4=normal, 5+=sadistic
	charTypeRand = 3

	! customer body type
	! -1=skinny, 3-4=regular, 5-6=muscular, 7+=fat
	bodyTypeRand = 3

	! customer height type
	! -1=small, 3-4=regular, 5+=tall
	heightTypeRand = 3

	! customer age
	customerAge = rand(15, 90)

	! customer race, racial modifiers
	raceRand = rand(0, 2)
	if RaceRand = 0:
		$raceType = 'white'
		dickChance = 30
		charTypeRand += rand(-3,2)
		bodyTypeRand += rand(-2,8)
		heightTypeRand += rand(-1,6)
	elseif RaceRand = 1:
		$raceType = 'black'
		dickChance = 40
		charTypeRand += rand(0,2)
		bodyTypeRand += rand(0,6)
		heightTypeRand += rand(0,6)
	elseif RaceRand = 2:
		$raceType = 'asian'
		dickChance = 20
		charTypeRand += rand(-2,2)
		bodyTypeRand += rand(-6,2)
		heightTypeRand += rand(-4,1)
	end

	if pcs_vag = 0:
		dick = 28
	elseif buyout = 1:
		dick = 24
	else
		dickRand = rand(1,100)
		if dickRand <= dickChance:
			dick = rand(15, 40)
		elseif dickRand <= (dickChance * 2):
			dick = rand(10, 24)
		else
			dick = rand(5, 14)
		end
	end

	vagDMG = (dick - pcs_vag) * 2
	assDMG = (dick - pcs_ass) * 2
	throatDMG = (dick - pcs_throat) * 2

	! customer dick size
	if dick >= 30:
		$dick_girth = 'monstrous'
		cumVol = rand(4,5)
	elseif dick >= 25:
		$dick_girth = 'huge'
		cumVol += 1
		cumVol = rand(3,5)
	elseif dick >= 20:
		$dick_girth = 'very big'
		cumVol = rand(2,5)
	elseif dick >= 15:
		$dick_girth = 'big'
		cumVol = rand(2,4)
	elseif dick >= 10:
		$dick_girth = 'regular'
		cumVol -= 1
		cumVol = rand(1,4)
	else
		$dick_girth = 'tiny'
		cumVol -= 2
		cumVol = rand(1,3)
	end

	! customer cum volume
	if cumVol <= 1:
		$cumType = 'neglectable'
	elseif cumVol = 2:
		$cumType = 'little'
	elseif cumVol = 3:
		$cumType = 'normal'
	elseif cumVol = 4:
		$cumType = 'significant'
	elseif cumVol >= 5:
		$cumType = 'horse like'
	end

	if charTypeRand <= 1:
		$charType = 'kind'
	elseif charTypeRand >= 2 and charTypeRand <= 4:
		$charType = 'neutral'
	elseif charTypeRand >= 5:
		$charType = 'sadistic'
	end

	if bodyTypeRand <= 1:
		$bodyType = 'skinny'
	elseif bodyTypeRand >= 2 and bodyTypeRand <= 4:
		$bodyType = 'slim'
	elseif bodyTypeRand >= 5 and bodyTypeRand <= 6:
		$bodyType = 'muscular'
	elseif bodyTypeRand >= 7:
		$bodyType = 'fat'
	end

	if heightTypeRand <= 1:
		$heightType = 'small'
	elseif heightTypeRand >= 2 and heightTypeRand <= 4:
		$heightType = 'average'
	elseif heightTypeRand >= 5:
		$heightType = 'tall'
	end

	if customerAge <= 18:
		$ageType = 'very young'
	elseif customerAge > 18 and customerAge <= 30:
		$ageType = 'young'
	elseif customerAge > 30 and customerAge <= 45:
		$ageType = 'middle aged'
	elseif customerAge > 45 and customerAge <= 60:
		$ageType = 'elderly'
	elseif customerAge > 60 and customerAge <= 80:
		$ageType = 'old'
	elseif customerAge > 80:
		$ageType = 'very old'
	end

	if buyout = 1:
		$bName = 'Leonid'
		$bSurname = 'Nosov'
		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorekneel1.jpg"></center>'
		'As you are led to the room as usual, you see the man standing opposite of you.'
		'Right away, you can see that he is just another bastard coming here to use your body.'
		'Your master leaves you in the center of the room, kneeling with the leash attached to your collar.'
		'As the door closes behind him, the customer slowly turns so you can finally see his face.'
		act 'Look at his face':gt 'abductionCustomer', 'abdCustomer-buyout1'
	else
		'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
		'The customer is a <<$heightType>> <<$bodyType>> <<$raceType>>.'
		'Kneeling in front of him, you look up and see the <<$charType>> look in his eyes.'
		'You then look down and see his crotch directly in front of you. It''s obvious that he has something <<$dick_girth>> in his pants.'
	end

	if pcs_vag = 0:
		'Your master speaks to the customer. "So this is her. You can be sure she''s a virgin as her hymen is intact."'
		'"I believe you. She''s not the first virgin slut that you''ve delivered to me, is she?"'
		'"No, she definitely is not! How many has it been so far? Four, five?"'
		'"In your establishment, I have paid for six virgins in total. This one is the seventh.'
		if age < 17:
			'"Good number. Good slut, too. She''s only <<age>> years old, so her pussy will be especially tight."'
			'"That''s how I like it."'
		else
			'"Good number. She''s a good slut, too."'
			'"We shall see."'
		end
		act 'Sob and wait':gt 'abductionCustomer', 'abdCustomer-virgin1'
	else
		if buyout = 0:
			'He is clearly expecting you to start pleasuring him. You decide to:'
			act 'Show him your body':gt 'abductionCustomer', 'abdCustomer-show'
			act 'Unzip his pants':gt 'abductionCustomer', 'abdCustomer-unzip'
		end
	end
end

!! Scene is too long and has two images playing at the same time. Can this be split into smaller chunks please?
if $ARGS[0] = 'abdCustomer-buyout1':
	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/leonid/leonid.jpg"></center>'
	'As you look up at his face, a chill runs down your spine - you know him!'
	'You remember this man from one of the parent-school conferences. It''s Dimka''s dad, <<$bName>>!'
	'He recognizes you too. "Oh... what the? Who do we have here? Aren''t you that missing girl, <<$pcs_firstname>> <<$pcs_lastname>>?'
	*nl
	'With a trembling voice, only a few words leave your mouth. "Th... that''s me mister <<$bSurname>>..."'
	'"You do realize that the police have already given up searching for you. As if they made any effort though..."'
	'"I-I don''t even know how long I''ve been here. The only thing I remember is being a plaything for these perverts..."'
	'There is a short period of silence, but despite the unexpected situation, you keep kneeling with your back straight and breasts jutting forward, as you have been trained to do.'

	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorekneel2.jpg"></center>'
	'The look on <<$bName>>''s face then changes from surprised to something else.'
	'He approaches you and gently caresses your face. "Plaything, you say? And do you like it?"'
	'Surprised by such a question, you consider how to reply:'

	gs 'willpower', 'misc', 'self', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Admit you like to be dominated, but this is too much (<<will_cost>> Willpower)':
			gs 'willpower', 'misc', 'self', 'hard'
			gs 'willpower', 'pay', 'self'
			gs 'stat'

			gt 'abductionCustomer', 'abdCustomer-buyout2'
		end
	else
		act 'Admit you like to be dominated, but this is too much (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Say you hate it':gt 'abductionCustomer', 'abdCustomer-buyout3'
end
if $ARGS[0] = 'abdCustomer-buyout2':
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorekneelmaster.mp4"></video></center>'
	'"What a nice submissive slut you have become. What would your mother say about this?"'
	'"I''d rather you didn''t let her know how I ended up..." you meekly reply.'
	'"This establishment really gets the job done. I must commend the owner."'
	*nl
	'He leaves the room and you can hear the echo of a discussion between him and your master.'
	'After a while, <<$bName>> returns. "Let''s go <<$pcs_firstname>>." He grabs your leash and leads you outside the room into the hallway.'
	'"B-but... where are you taking me? I''ve never been in this part of the house before."'
	'"You still don''t understand, do you slut? I own you now. I''ve just bought you and you are now my property. You are... my slave."'
	'You''re still naked and collared as he leads you outside to his car. You are forced to get into the trunk.'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyoutLeave'
end
if $ARGS[0] = 'abdCustomer-buyout3':
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreleonid1.mp4"></video></center>'
	'"In that case, let''s have some fun before we get straight to business."'
	'He slaps your face so hard that you lose your balance and fall face first onto the floor.'
	'You are taken by surprise by the blow - you thought you were finally about to be saved from all of this.'
	'However, <<$bName>> seems to be as perverted as all the other men that have used you previously.'
	'Stepping above you as you helplessly lie on the floor, he opens his zipper to pull out his dick.'
	'You can clearly see his <<dick>> cm long <<$dick_girth>> dick swing above you in the air.'
	act 'Suck on it':gt 'abductionCustomer', 'abdCustomer-suckTip'
	gs 'willpower', 'bj', 'resist'
	if will_cost <= pcs_willpwr:
		act 'Do nothing (<<will_cost>> Willpower)':
			gs 'willpower', 'bj', 'resist'
			gs 'willpower', 'pay', 'resist'
			gs 'stat'

			gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
		end
	else
		act 'Do nothing (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
end
if $ARGS[0] = 'abdCustomer-buyout4':
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefuckanalroughleonid2.jpg"></center>'
	'You are left lying on the floor with <<$bName>>''s cum still flowing out of your gaping asshole.'
	'You can hear the echo of his and your master''s voices discussing something you can''t make out.'
	'A few minutes later, <<$bName>> comes back into the room. "I really like you <<$pcs_firstname>>."'
	*nl
	'He grabs your leash and leads you outside the room into the hallway.'
	'"B-but... where are you taking me? I''ve never been in this part of the house before."'
	'"You still don''t understand, do you slut? I own you now. I''ve just bought you and you are now my property. You are... my slave."'
	'You''re still naked and collared as he leads you outside to his car. You are forced to get into the trunk.'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyoutLeave'
end
if $ARGS[0] = 'abdCustomer-buyoutLeave':
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/garage.jpg"></center>'
	'Stuffed inside the trunk, you can only hear the sound of the engine and the pavement below as he drives you somewhere unknown.'
	'After an unknown amount of time, the engine shuts off, leaving only silence.'
	'<<$bName>> opens the trunk. Your eyes blink to adjust to the dimly lit area, and you realize that you''re in an underground parking garage.'
	'You climb out, still naked and collared like a dog. It seems he doesn''t care about your feelings at all.'
	'He takes your leash and leads you on all fours up the stairs. You exit through the stairwell door into a room that appears to be an office.'
	act 'Continue':gt 'leonid', 'firstTime'
end

if $ARGS[0] = 'abdCustomer-virgin1':
	minut += 10
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin1.mp4"></video></center>'
	'Your master leaves, and your body starts to shiver.'
	'"Don''t worry slut. This will only hurt a lot!" the customer laughs. He is clearly enjoying himself.'
	'You quickly back up into the far corner of the room in a futile attempt to get as far away from him as you can.'
	'He walks up to you and grabs you by the hair. He drags you as a pained, terrified scream emits from your throat to something that looks like a bench in the center of the room.'
	'He forcefully yanks your hair to make you climb onto the bench like structure. He punches you in the stomach, and you collapse. He then flips you over onto your back and binds your arms above your head with handcuffs. He follows with putting your legs into stirrups, with legcuffs to hold you in place. You realize that this gives him unlimited access to your virgin pussy.'
	'Your head is bound so that you have an unobstructed view on your own pussy. This is to ensure that you watch as he tears you apart.'
	gs 'stat'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin2'
end
if $ARGS[0] = 'abdCustomer-virgin2':
	minut += 2
	pcs_mood = 5
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin2.mp4"></video></center>'
	'He starts to slowly undress, his back turned to you to enhance your terror. You hear a loud clink as his pants, holding a belt, hit the concrete floor. He slowly turns around to face you, and you can finally see his naked body. His cock sways for a moment before stopping in front of your face.'
	'"With renewed terror, you start to cry at the sight of his <<dick>> cm thick <<$dick_girth>> cock."'
	gs 'stat'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin3'
end
if $ARGS[0] = 'abdCustomer-virgin3':
	minut += 10
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin3.jpg"></center>'
	'He starts to jerk his cock while looking at your eyes, then to your bound and helpless nude body. The sight slowly makes his cock hard.'
	'You can tell he relishes looking at you in your despair.'
	gs 'stat'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-virgin4'
end
if $ARGS[0] = 'abdCustomer-virgin4':
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin4.jpg"></center>'
	'He finally reaches for you and brings the tip of his dick to the entrance of your virgin pussy.'
	'He covers his <<$dick_girth>> member in a thick layer of lube and starts to slowly press against the opening of your pussy.'
	'With his hands, he spreads your pussy lips apart to help ease the entry for his member.'
	'"Now behold girl. You are about to become a woman!" he exclaims.'
	'He pushes it in with a single long thrust that almost hits the bottom of your virgin cunt.'
	'Pain rips through your body, spreading like a fire as a trickle of blood runs down the shaft of his cock.'
	pcs_vag += 1
	stat['vaginal'] += 1
	pain['vaginal'] += 20
	gs 'stat'
	gs 'arousal', 'vaginal', 5, 'sub', 'maso', 'humiliation', 'rough', 'bound'
	act 'Cry':gt 'abductionCustomer', 'abdCustomer-virgin5'
end
if $ARGS[0] = 'abdCustomer-virgin5':
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin5.mp4"></video></center>'
	'He pulls his cock back out and shows it to you, enjoying the expression you make seeing your blood coating it.'
	'He then slams his cock back into you. The pain you feel is renewed while he grunts in pleasure.'
	'He feels accomplishment in his handiwork and sneers at you as he brutally thrusts into your pussy over and over again. He often hits your cervix with his <<dick>> cm long thick <<$dick_girth>> dick.'
	pain['vaginal'] += 10
	pain['cervix'] += 10
	pain['tummy'] += 10
	gs 'stat'
	gs 'arousal', 'vaginal', 30, 'sub', 'maso', 'humiliation', 'rough', 'bound'
	act 'Cry':gt 'abductionCustomer', 'abdCustomer-virgin6'
end
if $ARGS[0] = 'abdCustomer-virgin6':
	minut += 5
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin6.mp4"></video></center>'
	'"And now you will receive your first load of cum, whore. You will become the breeder you were always supposed to be!"'
	'As renewed tears stream down your cheeks, he spurts his <<$cumType>> amount of sperm <<dick>> cm deep inside your pussy. You can feel it hit your cervix, and you shudder at the thought of getting pregnant from this monster.'
	cumnostd = 1
	gs 'cum_call', 'pussy', 'deflowering pervert'
	gs 'stat'
	act 'Cry more':gt 'abductionCustomer', 'abdCustomer-virgin7'
end
if $ARGS[0] = 'abdCustomer-virgin7':
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin7.jpg"></center>'
	'He rests with his dick deep inside you for a while. He is enjoying the sight of your cries and the despair of your situation.'
	'"As his <<$dick_girth>> member becomes flaccid, it slides free of your abused pussy. He reaches out of sight and brings into view a dildo that looks almost exactly like his own dick. You think that it has probably been modeled from it."'
	'"The cum that I just gave you is not meant to just drip out of you. You will receive another gift from me, one that will keep my present inside you."'
	*nl
	'He proceeds to lift your ass in the air so the cum doesn''t flow out, then brutally shoves the dildo all the way inside you. The dildo is pushed so deep into you that only its brightly coloured base peeks out of your abused hole.'
	'He then takes some pieces of duct tape and wraps them over your pussy to cover your lips and keep the dildo firmly stuck inside.'
	'He uncuffs you from the bench, but pulls your arms behind your back. This is probably to keep you from removing his ''gift''.'
	'"Now run along and enjoy my gifts even more, slut!" he laughs before leaving.'
	pain['vaginal'] += 10
	pain['cervix'] += 10
	pain['belly'] += 20
	gs 'stat'
	gs 'arousal', 'vaginal_dildo', 10, 'sub', 'maso', 'humiliation', 'rough', 'bound'
	act 'Struggle to remove the dildo':gt 'abductionCustomer', 'abdCustomer-virgin8'
end
if $ARGS[0] = 'abdCustomer-virgin8':
	minut += 10
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin8.jpg"></center>'
	'Your master comes in and finds you struggling on the ground. You are trying to shake the <<$dick_girth>> dildo out of you.'
	'"Stop it girl. You''ll just make it worse."'
	'He grabs your leash and leads you back down to your cell.'
	'As you follow your master, the plugged <<$dick_girth>> dildo moves inside you, causing you further unpleasant sensations and pain.'
	'Finally, you are back at your bed.'
	gs 'stat'
	act 'Lie down':gt 'abductionCustomer', 'abdCustomer-virgin9'
end
if $ARGS[0] = 'abdCustomer-virgin9':
	gs 'sleep_simple', 'forced', 480

	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorevirgin9.jpg"></center>'
	'Your hands still bound, you are thrown on your bed and are once again chained to the wall.'
	'Your master leaves and you are left lying on the bed, your pussy still plugged by the <<dick>> cm long <<$dick_girth>> dildo.'

	act 'Try to rest':gt 'abductionCustomer', 'abdCustomer-virgin10'
end
if $ARGS[0] = 'abdCustomer-virgin10':
	minut += 15
	pcs_mood = 5
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorevirgin10.mp4"></video></center>'
	'The sound of your master coming downstairs wakes you up. You must have fallen asleep from the exhaustion.'
	'"Kneel and get that ass in the air, slut."'
	*nl
	'You''re so desperate that you don''t even think about not doing what he orders you. You just stick your ass as high as possible.'
	'It points so he has good access to both your ass and your ruthlessly plugged, deflowered pussy.'
	'Your master kneels down to remove the duct tape with a single pull. You yelp in pain from the tiny pubic hairs that get ripped out with the tape. He puts his fingers inside you to grab the stuck dildo.'
	*nl
	'He slowly removes it. Remnants of your blood and the customer''s sperm are smeared all over it.'
	'Your now empty pussy gives you a rush of relief as the cool air flows in to fill the void.'
	'Your master unties you and adjusts your chain. As he leaves, he stops and grins at you. "Be glad that you can only be deflowered once, you silly girl."'
	gs 'stat'
	act 'Continue':gt 'abduction', 'abdRoom'
end


if $ARGS[0] = 'abdCustomer-unzip':
	minut += 2
	gs 'stat'
	'You reach towards his crotch and slowly start to unzip his trousers.'
	'Pressing your face underneath his crotch, you pull down his pants and a <<$dick_girth>> member falls out. It lands directly on your face with a loud slap.'
	if dick > 15 and dick < 25:
		*nl
		'<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip1.mp4"></video></center>'
		'You admire his <<$dick_girth>> cock.'
	elseif dick >= 25:
		*nl
		'<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip2.mp4"></video></center>'
		'You stare at his <<$dick_girth>> cock in horror. You imagine what terrible things it will do to your tender body.'
	elseif dick < 15 and pcs_throat > dick:
		*nl
		'<center><video autoplay loop src="images/locations/shared/abduction/sex/unzip3.mp4"></video></center>'
		'You look at his <<$dick_girth>> cock in relief, thinking that it''s nothing you can''t handle.'
	end

	if pcs_throat < dick:
		'It''s obvious that his <<$dick_girth>> dick is above your skill level and you know you can''t safely swallow it whole.'
		act 'Suck the tip':gt 'abductionCustomer', 'abdCustomer-suckTip'
		gs 'willpower', 'bj', 'self'
		if will_cost <= pcs_willpwr:
			act 'Force yourself on his cock (<<will_cost>> Willpower)':
				gs 'willpower', 'bj', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'

				gt 'abductionCustomer', 'abdCustomer-suckForceself'
			end
		else
			act 'Force yourself on his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	else
		'Even though his dick is <<$dick_girth>>, you know you could take it all the way to the base.'
		act 'Suck the tip':gt 'abductionCustomer', 'abdCustomer-suckTip'
		gs 'willpower', 'bj', 'self'
		if will_cost <= pcs_willpwr:
			act 'Deepthroat his cock (<<will_cost>> Willpower)':
				gs 'willpower', 'bj', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'

				gt 'abductionCustomer', 'abdCustomer-suckDeep'
			end
		else
			act 'Deepthroat his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'abdCustomer-show':
	minut += 10
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoretease<<i>>.mp4"></video></center>'
	'You decide to tease the customer by jiggling and squeezing your breasts.'
	'After a few minutes, it''s obvious that he wants something more.'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-unzip'
end

if $ARGS[0] = 'abdCustomer-suckTip':
	gs 'arousal', 'bj', 15, 'sub'
	gs 'stat'
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobtip<<i>>.mp4"></video></center>'
	'You try your best to suck the head of his <<dick>> cm sized <<$dick_girth>> dick.'
	if pcs_throat < dick:
		'It''s obvious that his <<$dick_girth>> dick is above your skill level and you know you can''t safely swallow it whole.'
	else
		'Even though his dick is <<$dick_girth>>, you know you could take it all the way to the base.'
	end

	if $charType = 'sadistic':
		if buyout = 1:
			'<<$bName>> is starting to get annoyed. He''s obviously not happy that all you can do is suck the tip of his cock.'
		else
			'Your customer is starting to get annoyed. He''s obviously not happy that all you can do is suck the tip of his cock.'
		end
		'Suddenly, without any warning, he takes a step back, which pulls his <<$dick_girth>> member out of your mouth.'
		'With an angry look in his eyes, he slaps your face very hard, which knocks you to the cold floor. He then jumps on top of you and ties you up with some rope.'
		'"Even here, one must train the slaves himself!" he shouts at you. He forces his <<$dick_girth>> dick all the way down your throat.'
		'With your hands tied, you''re unable to resist. All you can do is struggle to avoid suffocating as best you can.'
		act 'Endure':gt 'abductionCustomer', 'abdCustomer-suckForced'
	elseif $charType = 'neutral':
		'Your customer seems displeased by your performance. You''re starting to worry about what he''ll do if you don''t satisfy him well enough...'
		forceChance = rand(1, 100)
		if forceChance <= 70:
			act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-suckForced'
		else
			act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
		end
		if pcs_throat < dick:
			gs 'willpower', 'bj', 'self'
			if will_cost <= pcs_willpwr:
				act 'Force yourself on his cock (<<will_cost>> Willpower)':
					gs 'willpower', 'bj', 'self'
					gs 'willpower', 'pay', 'self'
					gs 'stat'

					gt 'abductionCustomer', 'abdCustomer-suckForceself'
				end
			else
				act 'Force yourself on his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		else
			gs 'willpower', 'bj', 'self'
			if will_cost <= pcs_willpwr:
				act 'Deepthroat his cock (<<will_cost>> Willpower)':
					gs 'willpower', 'bj', 'self'
					gs 'willpower', 'pay', 'self'
					gs 'stat'

					gt 'abductionCustomer', 'abdCustomer-suckDeep'
				end
			else
				act 'Deepthroat his cock (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
			end
		end
	elseif $charType = 'kind':
		'Your customer seems pleased with your skill, so you continue to tease the tip of his <<$dick_girth>> cock. You look at him with as much sensual abandon as you can muster under the present conditions.'
		act 'Continue sucking the tip':gt 'abductionCustomer', 'abdCustomer-fuck'
	end
end

if $ARGS[0] = 'abdCustomer-suckForceself':
	pcs_throat += 1
	pain['throat'] += throatDMG
	gs 'stat'
	i = rand(1,3)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobselfforced<<i>>.mp4"></video></center>'
	'Despite knowing you will probably hurt yourself, you force yourself on his <<dick>> cm long cock all the way down to the base.'
	'You start gagging, and saliva freely flows from your stuffed mouth. Your customer seems more content now.'
	gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuck'
end

if $ARGS[0] = 'abdCustomer-suckForced':
	pain['throat'] += throatDMG * 2
	pcs_throat += 2
	gs 'arousal', 'bj', 15, 'sub', 'rough', 'deepthroat', 'humiliation'
	gs 'stat'
	endPunishment = 1
	i = rand(1,6)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjobforced<<i>>.mp4"></video></center>'
	if buyout = 1:
		'<<$bName>> growls and suddenly pulls his cock out of your mouth.'
	else
		'Your customer growls and suddenly pulls his cock out of your mouth.'
	end
	'"What kind of slave are you when you can''t swallow my dick?"'
	'He ties you up and forces his cock down your throat. He shows little to no concern for your wellbeing.'
	'You start to gag as he keeps pushing his member deep inside you, leaving you on the brink of passing out.'
	vagOrAss = rand (0,1)
	if buyout = 1:
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
	else
		if vagOrAss = 0:
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
		else
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
		end
	end
end

if $ARGS[0] = 'abdCustomer-suckDeep':
	pcs_throat += 1
	gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
	gs 'stat'
	i = rand(1,6)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhoreblowjob<<i>>.mp4"></video></center>'
	'You swallow his <<$dick_girth>> cock all the way down to his balls.'
	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuck'
end

if $ARGS[0] = 'abdCustomer-fuck':
	minut += 2
	pcs_throat += 1
	gs 'stat'
	endPunishment = 0
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorecockremoved.jpg"></center>'
	'It seems the customer is done with fucking your mouth as he removes his dick and steps back. He looks at you with a <<$charType>> appetite in his eyes.'
	if $charType = 'sadistic':
		'"What should I do to you next, bitch?"'
	else
		'"So how do you want it next, slut?"'
	end
	'You''re not entirely sure if he means that as a rhetorical question or not.'

	if $charType = 'sadistic':
		*nl
		'You want to answer him, but the moment you open your mouth to talk he slaps your face very hard. This knocks you to the cold floor and tears erupt from your eyes in response.'
		'"You thought I was actually interested in your opinion...<i>slave</i>?" he questions, laughing. "A bitch like you has no right to an opinion!"'
		'You''re unable to do anything except whimper like a small child. He ties you up, and you know that it''s going to get even worse now.'
		vagOrAss = rand (0,1)
		if vagOrAss = 0:
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
		else
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
		end
	else
		'You decide to:'
		act 'Be quiet':gt 'abductionCustomer', 'abdCustomer-decide'
		gs 'willpower', 'sex', 'self'
		if will_cost <= pcs_willpwr:
			act 'Beg him to be kind (<<will_cost>> Willpower)':
				gs 'willpower', 'sex', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'

				gt 'abductionCustomer', 'abdCustomer-beg'
			end
		else
			act 'Beg him to be kind (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'abdCustomer-decide':
	minut += 2
	gs 'stat'
	!!sexRand = rand(1, 2) I believe this isn''t used anywhere so I commented it out.
	vagOrAss = rand (0, 1)
	if vagOrAss = 1:
		if $charType = 'sadistic':
			'"I''ll fuck your cunt raw, bitch!"'
		 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
		else
			'"Let''s take your tender pussy!"'
		 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
		end
	else
		if $charType = 'sadistic':
			'"I''ll fuck you deep in your ass, bitch!"'
		 	act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
		else
			'"I want to see how tight your ass is."'
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
		end
	end
end

if $ARGS[0] = 'abdCustomer-beg':
	vagOrAss = rand (1, 2)
	minut += 2
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorebeg1.jpg"></center>'
	'Please be gentle to me, sir! I''m so sore... Please!'
	if dick >= 15:'"I''m scared of your dick, sir!"'
	*nl
	bekindChance = rand(1, 100)
	endPunishment = 0
	if $charType = 'neutral' or $charType = 'kind':
		'"Alright girl, you''re lucky that I''m feeling generous today."'
		if vagOrAss = 1:
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
		elseif vagOrAss = 2:
			act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
		end
	else
		endPunishment = 1
		'"A slave has no right to ask what will happen to it!"'
		hardChance = rand(1, 100)
		'"I''ll fuck you however I want, so shut up bitch!"'
		if hardChance <= 50:
			if vagOrAss = 0:
				act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckRough'
			else
				act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalRough'
			end
		else
			if vagOrAss = 0:
				act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckNormal'
			else
				act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnal'
			end
		end
	end
end

if $ARGS[0] = 'abdCustomer-fuckAnal':
	pcs_ass += 1
	gs 'stat'
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanal<<i>>.mp4"></video></center>'
	'The customer puts some lubricant on his <<$dick_girth>> cock and penetrates your ass.'
	'He doesn''t care much about your feelings, but he''s also not exactly hurting you on purpose.'
	*nl
	if dick > pcs_ass:
		pain['asshole'] += assDMG
		pain['tummy'] += assDMG
		gs 'arousal', 'anal', 30, 'sub', 'rough'
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
	else
		'You have no problems accommodating his <<$dick_girth>> member.'
		gs 'arousal', 'anal', 30, 'sub'
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-cumGate'
	end

end

if $ARGS[0] = 'abdCustomer-fuckAnalRough':
	pcs_ass += 2
	gs 'arousal', 'anal', 30, 'sub', 'rough', 'bound'
	gs 'stat'
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanalrough<<i>>.mp4"></video></center>'
	if buyout = 1:
		'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/slavewhorefuckanalroughleonid1.jpg"></center>'
		'<<$bName>> takes you by your leash and positions your body as if it''s just meat to be used.'
	else
		'The man takes you by your leash and positions your body as if it''s just meat to be used.'
	end
	'What comes next is an excruciatingly rough ass fucking that clearly shows he has no regard for all the pain you have to endure.'
	*nl
	if assDMG <= 0 :
		'Fortunately, his <<$dick_girth>> dick is not enough to cause you much pain. No more than usual, anyway.'
		if buyout = 1:
			act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
		else
			if $charType = 'sadistic':
				act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
			else
				act 'Continue':gt 'abductionCustomer', 'abdCustomer-cumGate'
			end
		end
	elseif assDMG <= 2:
		'His <<$dick_girth>> dick is too big for you and you suffer a lot of stretching pain as it slams against your intestinal walls.'
		pain['asshole'] += assDMG
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
	else
		'His <<$dick_girth>> dick is insanely big for you.'
		'The tip of his cock repeatedly hits your intestinal walls and stretches your anus wide.'
		pain['asshole'] += assDMG
		pain['tummy'] += assDMG
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckAnalDeep'
	end
end

if $ARGS[0] = 'abdCustomer-fuckAnalDeep':
	minut += 15
	pcs_ass += 1
	gs 'stat'
	i = rand(1, 1)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckanaldeep<<i>>.mp4"></video></center>'
	'His member is <<$dick_girth>> and your ass is unable to accommodate it.'
	if $charType = 'sadistic':
		*nl
		'He doesn''t care, even though he''s obviously aware, and fucks you furiously hard.'
		'"How do like my <<$dick_girth>> cock inside you bitch? Is it deep enough for you, or should I push a bit more?"'
		'He''s obviously enjoying this a lot.'
		*nl
	end
	'With every thrust of his dick deep inside your intestines, you feel as if it''s your very stomach being poked by it.'
	*nl
	if buyout = 1:
		'After about a half an hour of deep anal banging, <<$bName>> is about to cum.'
	else
		'After about a half an hour of deep anal banging, the man is about to cum.'
	end

	if (endPunishment = 1 or $charType = 'sadistic') and buyout = 0:
		'"I''m going to feed you my cum now, you unruly anal slut!"'
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
	elseif buyout = 1:
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
	else
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
	end
end

if $ARGS[0] = 'abdCustomer-fuckNormal':
	pcs_vag += 1
	gs 'stat'
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefucknormal<<i>>.mp4"></video></center>'
	'The customer penetrates your pussy and fucks you.'
	if vagDMG <= 0:
		'He''s not gentle, but it isn''t very rough either.'
		'You have no problems accommodating his <<$dick_girth>> dick. You almost seem to enjoy it.'
		gs 'arousal', 'vaginal', 30, 'sub'
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
	elseif vagDMG <= 2:
		'His <<$dick_girth>> dick is too big for you, and you suffer a lot of stretching pain as it slams against your vaginal walls.'
		pain['vaginal'] += vagDMG
		gs 'arousal', 'vaginal', 30, 'sub', 'rough'
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
	else
		'His <<$dick_girth>> dick is insanely big for you.'
		'The tip of his cock even penetrates your cervix, or at least it seems like it to you. The pain is almost unbearable!'
		pain['vaginal'] += vagDMG
		pain['cervix'] += vagDMG
		gs 'arousal', 'vaginal', 30, 'sub', 'rough'
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
	end
end

if $ARGS[0] = 'abdCustomer-fuckRough':
	pcs_vag += 2
	gs 'stat'
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckrough<<i>>.mp4"></video></center>'
	'The man takes you by your leash and positions your body as if it''s just meat to be used.'
	'What comes next is an excruciatingly rough fuck that clearly shows he has no regard for all the pain you have to endure.'
	if vagDMG <= 0:
		'Fortunately, his <<$dick_girth>> dick is not enough to cause you much pain. No more than usual, anyway.'
		gs 'arousal', 'vaginal', 30, 'sub', 'bound'
		if $charType = 'sadistic':
			act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
		else
			act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
		end
	elseif vagDMG <= 2:
		'His <<$dick_girth>> dick is too big for you, and you suffer a lot of stretching pain as it slams against your vaginal walls.'
		pain['vaginal'] += vagDMG
		gs 'arousal', 'vaginal', 30, 'sub', 'bound', 'rough'
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
	else
		'His <<$dick_girth>> dick is insanely big for you.'
		'The tip of his cock even penetrates your cervix, or at least it seems like it to you. The pain is almost unbearable!'
		'He notices this too, realizing it''s why you''re groaning so loudly. Enjoying your suffering, he pushes his dick even deeper inside, and you squeal like a pig.'
		pain['vaginal'] += vagDMG * 2
		pain['cervix'] += vagDMG * 2
		gs 'arousal', 'vaginal', 30, 'sub', 'bound', 'rough'
		gs 'stat'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-fuckDeep'
	end
end

if $ARGS[0] = 'abdCustomer-fuckDeep':
	minut += 15
	pcs_ass += 1
	gs 'stat'
	i = rand(1, 5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorefuckdeep<<i>>.mp4"></video></center>'
	'His member is <<$dick_girth>> and your vagina is unable to accommodate it.'
	if $charType = 'sadistic':
		*nl
		'He doesn''t care about that, even though he is obviously aware of it, and fucks you furiously hard.'
		'"How do like my <<$dick_girth>> cock inside you bitch? Is it deep enough for you, or should I push a bit more? Do you feel me entering your cervix?"'
		'He''s obviously enjoying this a lot.'
		*nl
	end
	'With every thrust of his dick deep inside your vagina, you feel as if it''s your very cervix being penetrated.'
	'After about half an hour of deep vaginal banging, the man is about to cum.'

	if endPunishment = 1 or $charType = 'sadistic':
		'"I''m going to feed you my cum now, you unruly fuck slave!"'
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
	else
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumGate'
	end
end

if $ARGS[0] = 'abdCustomer-cumGate':
	if endPunishment = 1:
		'"I''m going to feed you my cum now, you unruly slave!"'
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
	elseif buyout = 1:
		'"You''re going to be filled with my seed for the first time, so be sure to cherish the memory of this moment!"'
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cumAss'
	else
		'"So where do you want it, bitch?"'
		act 'Be silent':gt 'abductionCustomer', 'abdCustomer-cum'
		act 'On your face':gt 'abductionCustomer', 'abdCustomer-cumFace'

		gs 'willpower', 'cum_inside', 'self'
		if will_cost <= pcs_willpwr:
			act 'Inside your pussy (<<will_cost>> Willpower)':
				gs 'willpower', 'cum_inside', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'

				gt 'abductionCustomer', 'abdCustomer-cumPussy'
			end
		else
			act 'Inside your pussy (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end

		gs 'willpower', 'cum_inside_anal', 'self'
		if will_cost <= pcs_willpwr:
			act 'Inside your ass (<<will_cost>> Willpower)':
				gs 'willpower', 'cum_inside_anal', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'

				gt 'abductionCustomer', 'abdCustomer-cumAss'
			end
		else
			act 'Inside your ass (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end

		gs 'willpower', 'swallow', 'self'
		if will_cost <= pcs_willpwr:
			act 'In your mouth (<<will_cost>> Willpower)':
				gs 'willpower', 'swallow', 'self'
				gs 'willpower', 'pay', 'self'
				gs 'stat'

				gt 'abductionCustomer', 'abdCustomer-cumMouth'
			end
		else
			act 'In your mouth (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
		end
	end
end

if $ARGS[0] = 'abdCustomer-cum':
	cumRand = rand(1,100)
	if cumRand > 75 and cumRand <= 100:
		'He decides to cum inside your pussy.'
		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumPussy'
	elseif cumRand > 50 and cumRand <= 75:
		'He decides to cum inside your ass.'
		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumAss'
	elseif cumRand > 25 and cumRand <= 50:
		'He decides to cum in your mouth.'
		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumMouth'
	else
		'He decides to cum on your face.'
		act 'Endure it':gt 'abductionCustomer', 'abdCustomer-cumFace'
	end
end

if $ARGS[0] = 'abdCustomer-cumPussy':
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumpussy<<i>>.mp4"></video></center>'
	if vagDMG > 0:
		'As he pumps his cum into your vagina, you feel the tip of his <<$dick_girth>> cock at your cervix and even inside it.'
		'His cum penetrates through the cervix directly into your womb, which causes a warm, yet painful sensation to flow through you.'
		pain['cervix'] += vagDMG
		gs 'stat'
	end
	*nl
	if cumVol = 3:
		'With his <<$dick_girth>> dick buried inside your pussy, the customer pumps his cum inside you.'
		'When he pulls out, some of it drips out of you.'
	elseif cumVol = 4:
		'With his <<$dick_girth>> dick buried deep inside your pussy, his tip touches your cervix as he pumps your pussy full of his cum.'
		'As he pulls his cock out, a large amount of the cum forcefully squirts out of you.'
	elseif cumVol >= 5:
		'With his <<$dick_girth>> dick buried very deep inside your pussy, his tip pushes against your cervix and even slides inside a little.'
		'As he pumps his cum inside you, a lot of it shoots directly into your womb. It feels painful, but the warm sensation is nothing like what you''ve felt before.'
		'When he pulls his cock out, his cum squirts out of your pussy.'
		pain['cervix'] += 20
		pain['tummy'] += 40
	else
		'The customer cums inside you. When he pulls his cock out, his cum slowly drips out of your pussy.'
	end

	pcs_vag += 1
	stat['vaginal'] += 1
	cumnostd = 1
	gs 'cum_call', 'pussy', 'customer', 0, 0, spot, svol
	gs 'stat'

	act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
end

if $ARGS[0] = 'abdCustomer-cumAss':
	i = rand(1,5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumass<<i>>.mp4"></video></center>'
	if assDMG > 0:
		'You can feel his <<$dick_girth>> cock slamming against your intestinal wall as he cums inside your ass.'
		'His cum fills you, and feels as if it''s flowed right up to your stomach.'
		pain['asshole'] += assDMG
		gs 'stat'
	end

	if cumVol = 3:
		'His <<$dick_girth>> member is buried in your intestines.'
		if buyout = 1:
			'As <<$bName>> shoots his load, you can feel the warmth spreading inside you...'
		else
			'As he shoots his load, you can feel the warmth spreading inside you...'
		end
		'He pulls out and his cum slowly drips from your gaping hole.'
	elseif cumVol = 4:
		'His <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, sometimes even hitting your intestinal walls.'
		if buyout = 1:
			'As <<$bName>> shoots his load, you can feel a warmth spread inside you...'
		else
			'As he shoots his load, you can feel a warmth spread inside you...'
		end
		'He pulls out and his cum squirts out of your gaping hole.'
	elseif cumVol >= 5:
		if buyout = 1:
			'<<$bName>>''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each thrust forcefully hitting your intestinal walls.'
		else
			'The customer''s <<$dick_girth>> member is buried <<dick>> centimeters deep inside your intestines, with each thrust forcefully hitting your intestinal walls.'
		end
		'You feel an increasing amount of pressure and stretching pain as he pumps your intestines full of cum.'
		*nl
		'When he pulls his cock out, cum squirts out of your ravaged anus.'
		pain['tummy'] += 20
		gs 'stat'
	else
		if buyout = 1:
			'<<$bName>> cums inside you. When he pulls his cock out, his cum slowly leaks out of your gaping anus.'
		else
			'The customer cums inside you. When he pulls his cock out, his cum slowly leaks out of your gaping anus.'
		end
	end

	if buyout = 1:
		gs 'npcgeneratec', 0, $bName, rand(18,34)
		gs 'boyStat', $npclastgenerated
	else
		gs 'npcgeneratec', 0, 'customer', rand(18,34)
		gs 'boyStat', $npclastgenerated
	end
	pcs_ass += 1
	cumnostd = 1
	gs 'cum_call', 'anus', $boy, 0
	stat['anal'] += 1
	gs 'stat'
	if buyout = 1:
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-buyout4'
	else
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
	end
end

if $ARGS[0] = 'abdCustomer-cumMouth':
	i = rand(1, 5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecummouth<<i>>.mp4"></video></center>'
	if throatDMG > 0:
		'Your aching throat is penetrated again as he buries his <<$dick_girth>> cock to the hilt inside you.'
		'When he shoots his load, you feel his member painfully stretching your already sore throat.'
		pain['throat'] += throatDMG
		gs 'stat'
	end

	if cumVol = 3:
		'His cum fills your throat.'
	elseif cumVol = 4:
		'His cum fills your throat and trickles down into your stomach.'
		'You feel very full and bloated.'
		pcs_energy += 50
		pcs_hydra += 40
	elseif cumVol => 5:
		'You''re being pumped full of cum like a slut. He completely fills your stomach and throat.'
		'You probably won''t need another meal today...'
		pcs_energy += 100
		pcs_hydra += 90
	else
		'The customer shoots his cum into your mouth and down your throat.'
	end

	mouth += 1
	cumnostd = 1
	gs 'cum_call', 'mouth', 'customer'
	stat['throat'] += 1
	gs 'stat'

	act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
end

if $ARGS[0] = 'abdCustomer-cumFace':
	i = rand(1, 5)
	'<center><video autoplay loop src="images/locations/shared/abduction/sex/slavewhorecumface<<i>>.mp4"></video></center>'
	'He takes his <<$dick_girth>> dick and points it towards your face.'
	if cumVol = 3:
		'A <<$cumType>> amount of cum lands all over your face.'
	elseif cumVol = 4:
		'A <<$cumType>> amount of cum lands all over your face. Some even lands in your hair.'
	elseif cumVol => 5:
		'A <<$cumType>> amount of cum lands all over your face and hair.'
		'There''s so much that you have a solid layer covering your face.'
	else
		'A <<$cumType>> amount of cum is splattered across your face and in your mouth.'
	end

	'The customer seems content and looks at you in satisfaction.'

	mouth += 1
	cumnostd = 1
	gs 'cum_call', 'face', 'customer'
	stat['mouth'] += 1
	gs 'stat'

	act 'Continue':gt 'abductionCustomer', 'abdCustomer-end'
end

if $ARGS[0] = 'abdCustomer-end':
	if endPunishment = 1:
		'The customer goes to the bathroom before calling for your master.'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-endPunishment'
	elseif buyout = 1:
		'<<$bName>> leaves you lying on the ground, his cum still dripping out of your ass, and calls for your master.'
		act 'Continue':gt 'abductionCustomer', 'abdCustomer-endPunishment'
	else
		'The customer goes to the bathroom, and you are immediately taken back to the basement.'
		act 'Go back':gt 'abduction', 'abdRoom'
	end
end

if $ARGS[0] = 'abdCustomer-endPunishment':
	'<center><img <<$set_imgh>> src="images/locations/shared/abduction/sex/kneelingslave1.jpg"></center>'
	iif(buyout = 1, $bName, 'The customer') + ' tells your master how unruly you were and that further training should be applied to you before he leaves.'
	'Kneeling, you look up at your master only to see his grim face. You can tell something bad will happen.'
	act 'Back to the basement':gt 'abduction', 'abdFailedCustomer'
end

--- abductionCustomer ---------------------------------