glife/locations/stallion.qsrc

# stallion

CLOSE ALL
gs 'stat'
gs 'boyStat', 'A117'
sexpartkno = 1
spafinloc = 0
sexcontra = 0
protect = 0
dick = 14
silavag = 2

if $ARGS[0] = 'start':
	'<center><img <<$set_imgh>> src="images/locations/shared/bathroom/publictoilet.jpg"></center>'
	StallionQ = 4
	'You enter the men''s restroom. It appears empty. You move into a stall and sit down. As you relieve yourself, you hear chuckling in the next stall.'
	'After a second, you hear a strange man''s voice. "<<$pcs_nickname>>. My <<$pcs_nickname>>. Show me more of that cute vagina of yours."'
	
	gs 'willpower', 'misc', 'self', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Confront the strange man (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'self'
			'You jump out of your stall and move to open the other one, but it opens before you reach it. Out of it comes a naked middle aged man.'
			'"I''ve been watching you, <<$pcs_nickname>> <<$pcs_lastname>>. You think it''s a coincidence you are here? I''ve been planning things out. Preparing.'
			gs 'stallion', 'fight'
		end
	else
		act 'Confront the strange man (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Run away':
		*clr & cla
		'You quickly sort yourself out and get out of the stall. You try the bathroom door. It''s locked. There is no handle, and the lock is just a keyhole.'
		'"It''s no use. You are trapped." The strange man says.'
		'A naked middle aged man exits the other stall and walks towards you.'
		gs 'stallion', 'fight'
	end
end

if $ARGS[0] = 'fight':
	cla
	'The strange man laughs. "You think I''m a pushover? I''ve trained in Soo Bahk Do and Krav Maga. Fighting me is futile. Give up now."'
	act 'Give up':gt 'stallion', 'rape'
	act 'Fight':
		cla
		$nameV = 'Naked Man'
		!!stats{
		strenV = 100
		speedV = 300
		agilV = 300
		reactV = 100
		vitalV = 100
		intelV = 100
		willV = 50
		!!skills
		magikV = 10
		boxingV = 100
		shootV = 10
		!!parameters
		healthV = vitalV * 10 + strenV * 5
		manaV = intelV * magikV + magikV * 100 + vitalV * 10
		willpowerV = willV * 10
		BonusAtakV = 0
		BonusDefV = 0
		!!Programme of Action
		program = 0
		if spellavtoklon = 1:klon = 3
		if spellbefshild = 1:defence = 500}
		gs 'fight','initFight'

		$opp_name[0] = 'Naked Man'
		$opp_image[0] = 'images/locations/shared/street/rapist.jpg'
		opp_def[0] = 100
		opp_run[0] = 100
		opp_wrstlng[0] = 100
		opp_kick[0] = 100
		opp_punch[0] = 100
		opp_jab[0] = 100
		opp_stren[0] = 100
		opp_agil[0] = 300
		opp_vital[0] = 200
		opp_react[0] = 100
		opp_health[0] = (opp_vital * 10 + opp_stren * 5)
		opp_willpwr[0] = 100
		opp_shoot[0] = 10
		fightEnding = 13

		gt 'fight', 'start'
	end
end

if $ARGS[0] = 'rape':
	cla
	'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
	rape += 1
	guy += 1
	'The man pushes you down, and you fall on your ass. He advances towards you, grabs a hold of your clothes and rips them open. He falls on top of you. You feel his hot breath against your face as he ruthlessly grabs your arms. You feel his penis poking you in the leg.'
	'"So you know what''s coming next, don''t you my little <<$pcs_nickname>>?"'
	if pcs_horny < 30:
		'You feel his cock stab you in the unprepared vagina, not even the slightest slowed down by the lack of lubrication. It''s rough and raw, pulling at your skin and pressing against your sensitive flesh painfully. You can''t help but cry out.'		
	elseif pcs_horny < 50:
		'You feel his cock stab you in the vagina. It''s not very well lubricated, and it rubs painfully against your sensitive flesh as it penetrates you.'
	elseif pcs_horny < 70:
		'You feel his cock stab you in the vagina. It slides into your lubricated entryway, penetrating you.'
	elseif pcs_horny >= 70:
		'You feel his hard cock enter your wet vagina, easily entering you.'
	end
	if pcs_vag = 0: 'It brings tears to your eyes as he painfully rips your hymen, taking your virginity.'
	gs 'arousal', 'vaginal', 30, 'rough', 'sub'
	gs 'stat'
	'You feel his hot breath against your ear as he continues to thrust into your body. "You know what they call me? Stallion. They call me that because when I ejaculate into a bitch, she ends up pregnant. I''ve already knocked up eleven girls. You''re gonna be number twelve."'
	stallionQ = 5
	if MagikDostup = 0 and broodcurse = 0:
		broodcurse = 1
		if pcs_magik > 0:
			'"Is that magic I feel in you, <<$pcs_nickname>>? It''s not going to protect you. I have some magic of my own."'
			'You feel a tingling in your body as he does something to you.'
		elseif pcs_magik > 3:
			'"Don''t think I don''t feel the magic in you, <<$pcs_nickname>>. It''s not going to protect you. I have some magic of my own."'
			'You feel a tingling in your body as he works some fertility magic upon you.'
		elseif pcs_magik > 7:
			'"Your magic is strong, <<$pcs_nickname>>, but it is not going to protect you. Mine is much stronger."'
			'You feel a tingling in your body. He places a powerful enchantment on you, increasing your fertility and binding your life force to the fruit of your womb. You realize with horror that he has practically guaranteed all sexual encounters will result in pregnancy in the future. Furthermore, your life is now tied to your womb. An abortion will result in your death.'
		else
			'You feel a tingling in your body. You are pretty sure it is something Stallion has done to you.'
		end
		act 'What have you done to me?':
			'"I have given you a gift, sweet <<$pcs_nickname>>. I have turned you into a broodmare." He replied as he continued to repeatedly thrust into you.'
		end
	end
	gs 'willpower', 'misc', 'self', 'easy'
	if will_cost <= pcs_willpwr:
		act 'Beg for Mercy (<<will_cost>> Willpower)':
			cla
			gs 'willpower', 'misc', 'self', 'easy'
			gs 'willpower', 'pay', 'self'
			if kid <= 0 and age < 18:
				'You beg and plead with him to not impregnate you, informing him that you are too young to be a mother.'
			elseif money < 1000 and age > 18:
				'You beg and plead with him to not impregnate you, informing him that you cannot afford to be a mother.'
			elseif broodcurse = 1:
				'You beg and plead for Stallion to lift the curse and release you.'
			else
				'You beg and plead with him to not impregnate you, informing him that you are not ready to be a mother.'
			end
			if broodcurse = 0:
				'Stallion smiles as you plead for him not to cum inside you.'
				'"I''m sure you''ll manage to bear my child just fine." He says as he continues to thrust into you.' 
			else
				'Stallion smiles. "I''m not lifting the curse. You should accept your fate. it will be easier on you in the long run."'
			end
			act 'Continue': gt 'stallion', 'finish'
		end
	else
		act 'Beg for Mercy (<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', 'skill', 'resist', 'stren_lvl'
	if will_cost <= pcs_willpwr:
		act 'Struggle (<<will_cost>> Willpower)':
			cla
			gs 'willpower', 'skill', 'resist', 'stren_lvl'
			gs 'willpower', 'pay', 'resist'
			'You attempt to throw him off you, but he is able to resist your efforts.'
			'"Tightening up like that, makes it feel so good." He says as he continues to thrust into you.'
			act 'Continue': gt 'stallion', 'finish'
		end
	else
		act 'Struggle (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end
	act 'Don''t respond':
		cla
		'You turn your head away from him, willing your mind to drift away from this unpleasant experience as he uses your body for his own ends.'
		act 'Continue': gt 'stallion', 'finish'
	end
end

if $ARGS[0] = 'finish':
	cla
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof10.jpg"></center>'
	'Stallion moaned. "I''m cumming!"'
	'He twitches on top of you, and you feel him fill you with his seed.'
	'"Give birth to a cute baby for me, <<$pcs_nickname>>. But don''t you dare kill it. You won''t survive it long. Ta ta!" He said, pulling out.'
	act 'Continue': gt 'stallion', 'end'
end

if $ARGS[0] = 'end':
	'You notice a syringe sticking out of your thigh. You start to feel woozy. As you black out, your last thought is, where did he even keep it?'
	sexspecpot = 60000
	sexvolume = 70
	gs 'cum_manage'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Awaken':gt 'stallion', 'awaken'
end

if $ARGS[0] = 'awaken':
	'<center><img <<$set_imgh>> src="images/locations/shared/bathroom/publictoilet.jpg"></center>'
	minut += 160
	'You come to several hours later laying on the cold bathroom floor. Your clothing is folded neatly in a pile nearby.'
	if bag > 0: 
		'Your handbag is sitting on top of the clothing. You check it for missing items.'
		if money > 0: 'You have <<money>> rubles.'
		if prezik + prezikcount + preziksabo > 0: 'All your condoms are missing.' & prezik = 0 & prezikcount = 0 & preziksabo = 0
		if tabletki > 0: 'All your birth control pills are missing.' & tabletki = 0 & tabletkioddk = 0
	end
	if broodcurse = 0: 
		$temp = 'you''ll get another visit from me'
	else
		$temp = 'my magic will kill you'
	end
	if stallionQ = 4: $temp[1] = 'I am called Stallion, and you have become my victim. I am called Stallion because I impregnate those whom I target. Today, that was you. ' & StallionQ = 5
	'There is a note next to your clothing. ''<<$temp[1]>>You were a pretty good fuck. I''ll be keeping my eye on you. I look forward to see you growing large with my baby. If you go get an abortion to stop it, <<$temp>>. Go to the cops if you want, you''ll never stop me. The door is unlocked, you can leave now. -Stallion'
	
	act 'Leave':gt 'liames'
end

--- stallion ---------------------------------