glife/locations/city_jorahouse.qsrc

# city_jorahouse
!Jora dick = 16, silavag = 1
!Seymon dick = 18, silavag = 2
if $ARGS[0] = 'start':
	cla
	*clr
	CLOSE ALL
	if sound = 0:PLAY 'sound/street.mp3',30
	minut += 5

	act 'Ring the doorbell':
		cla

		if klofQW = 2 and hour >= 16 and klofday ! daystart:
			klofday = daystart
			gt 'city_jorahouse', 'ev1'
		elseif klofQW > 2 and hour >= 16 and klofday ! daystart:
			klofday = daystart
			gt 'city_jorahouse', 'start1'
		else
			'No one home'

			act 'Go home':gt 'city_residential'
		end
	end

	act 'Go home':gt 'city_residential'
end

if $ARGS[0] = 'start1':
	cla
	*clr
	klofday = daystart
	minut += 5
	kloftimes += 1
	gs 'stat'

	if kloftimes < 10:
		gt 'city_jorahouse', 'ev7'
	else
		'<center><img <<$set_imgh>> src="images/characters/city/jora/klof.jpg"></center>'
		'You ring the doorbell. Jora answers, scratching his belly. He yawns and says he is busy.'

		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev1':
	cla
	*clr
	klofday = daystart
	minut += 5
	kloftimes += 1
	gs 'stat'

	if kloftimes < 10:
		'<center><img <<$set_imgh>> src="images/characters/city/jora/klof.jpg"></center>'
		'You ring the doorbell.'
		'You door doesn''t open and you turn to leave, when the door opens.'
		'"Hey," you say.'
		'"Ahh, you." The guy standing in the doorway responds, smiling.'

		act 'Stop by':gt 'city_jorahouse', 'ev2'
	else
		'<center><img <<$set_imgh>> src="images/characters/city/jora/klof.jpg"></center>'
		'You ring the doorbell. Jora answers, scratching his belly. He yawns and says he is busy.'

		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev2':
	cla
	*clr
	minut += 5
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof1.jpg"></center>'
	'You looked around the apartment, it is a pigsty, the wallpaper is peeling and everywhere socks are strewn.'
	'"How pathetic, you guys live like pigs," you say and smile, your eyes met the guy.'
	'It''s nothing, we just arrived in this city haven''t got everything oganized yet." Says the guy, grinning back at you.'
	'"I see. I don''t know your names.'
	'"Call me Jora, and my sidekick Semyon, and now you''re introduced, hurry up and clean up this in the apartment."'

	act 'Clean up':gt 'city_jorahouse', 'ev4'

	if pcs_horny < 75:act 'Leave':gt 'city_jorahouse', 'ev3'
end

if $ARGS[0] = 'ev3':
	cla
	*clr
	minut += 5
	klofQW -= 1

!!Image needed	'<center><img <<$set_imgh>> src="images/pc/pnx.jpg"></center>'
	'You decide that the guys are looking for a maid, tell them to try the phonebook and leave.'

	act 'Leave':gt 'city_residential'
end

if $ARGS[0] = 'ev4':
	cla
	*clr
	minut += 5
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof3.jpg"></center>'
	'Surprised, you approach Jora and question him.'
	'"Jora, you promised money and entertainment, but so far I have not seen either."'
	'"Well look, as I said we have not been here long, right now we need a girl for home services."'
	'"When will have gotten better acquainted, we will talk business."'
	'"Now be a good girl and take off your clothes, you are now the entertainment."'

	act 'Fuck Jora':gt 'city_jorahouse', 'ev5'
end

if $ARGS[0] = 'ev5':
	cla
	*clr
	pcs_vag += 1
	cumprecheck = 1
	gs 'cum_call', '', 'A44', 1
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof4.jpg"></center>'
	'You strip off and with little foreplay, Jora fucks you in the pussy. Not long after you have started, the door opens.'
	'Into the room comes Semyon, "Suck my cock baby, yeah."'
	gs 'arousal', 'vaginal', 5, 'sub'
	gs 'stat'
	act 'Suck him':gt 'city_jorahouse', 'ev6'
end

if $ARGS[0] = 'ev6':
	cla
	*clr
	klofQW += 1
	guy += 1
	cla
	*clr
	money += 2000
	gs 'cum_call', '', 'A44', 1
	gs 'cum_call', 'mouth', 'A45', 1
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof5.jpg"></center>'
	'Jora fucks you in your pussy, Semyon fucks you in the mouth.'
	gs 'arousal', 'bj', 5, 'sub', 'group'
	gs 'arousal', 'vaginal', 5, 'sub', 'group'
	minut -= 5
	gs 'stat'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:pcs_horny = 0 & orgasm += 1 & 'The combination is enough to take you past your peak and you orgasm.'
	$orgasm_or = 'yes'
	gs 'stat'
	if horand > stat['vaginal']:pcs_horny += 10 & 'You are not satisfied'

	'You get dressed and ready to go home.'
	'You are approached by Jora who hands you money, "Earned yourself a crumb."'
	gs 'arousal', 'end'
	gs 'stat'
	act 'Go home':gt 'city_residential'
end

if $ARGS[0] = 'ev7':
	cla
	*clr
	minut += 5
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof1.jpg"></center>'
	'You enter the apartment'

	act 'Say hello to the guys':gt 'city_jorahouse', 'ev8'
end

if $ARGS[0] = 'ev8':
	gs 'dinsexFX'
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof6.jpg"></center>'
	'"Hey baby" The boys say, baring your chest and starting to caress you.'
	'"Hello boys, did you miss me?" You say, blushing.'
	gs 'arousal', 'foreplay', 5
	gs 'stat'
	act 'Entertain Jora':gt 'city_jorahouse', 'ev9'
	act 'Entertain Semyon':gt 'city_jorahouse', 'ev10'
	act 'Entertain both':gt 'city_jorahouse', 'ev19'
	act 'Talk business with Jora':gt 'city_jorahouse', 'ev20'
end

if $ARGS[0] = 'ev9':
	cla
	*clr
	gs 'boyStat', 'A44'
	silavag = 1
	gs 'arousal', 'bj', 5, 'sub'
	gs 'stat'
	act 'Have Jora fuck your pussy':gt 'city_jorahouse', 'ev13'
	act 'Have Jora fuck your ass':gt 'city_jorahouse', 'ev14'
	act 'Suck Jora':gt 'city_jorahouse', 'ev19'
end

if $ARGS[0] = 'ev13':
	cla
	*clr
	klofQW += 1
	money += 100
	pose = 3
	picrand = rand(7, 9)
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
	dynamic $vagstart2
	'Jora fucks you in your pussy.'
	gs 'arousal', 'vaginal', 30, 'sub'
	gs 'stat'
	act 'Continue':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof10.jpg"></center>'
		dynamic $vagend
		'You get dressed and get ready to go home.'
		'Jora hands you money, "Earned yourself a crumb."'
		guy += 1
		gs 'arousal', 'end'
		gs 'stat'
		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev14':
	cla
	*clr
	klofQW += 1
	money += 100
	pcs_ass += 1
	spafinloc = 4
	gs 'cum_manage'
	'Jora, with full force, hammers you in the ass.'
	gs 'arousal', 'anal', 30, 'sub', 'rough'
	gs 'stat'
	picrand = rand(11, 13)
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end

	act '...':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof14.jpg"></center>'
		'Jora discharges in your ass, then using a small toy he plays with your ass. It''s quite pleasant so you don''t think to question his actions.'
		'You get dressed and get ready to go home.'
		'Jora hands you money, "Earned yourself a crumb."'
		guy += 1
		gs 'arousal', 'end'
		gs 'stat'
		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev15':
	cla
	*clr
	klofQW += 1
	money += 100
	spafinloc = 11
	gs 'cum_manage'
	'You passionately clasped Jora member between your lips.'
	gs 'arousal', 'bj', 30, 'sub'
	gs 'stat'
	picrand = rand(15, 17)
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
	horand = rand(1, 100)
	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end

	act 'Continue':
		cla
		*clr
		'Jora discharges himself on your face'
		picrand = rand(18, 20)
		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
		'You get dressed and get ready to go home.'
		'Jora hands you money, "Earned yourself a crumb."'
		gs 'arousal', 'end'
		gs 'stat'
		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev10':
	cla
	*clr
	gs 'boyStat', 'A45'
	silavag = 2
	gs 'arousal', 'bj', 5, 'sub'
	gs 'stat'
	act 'Have Semyon fuck your pussy':gt 'city_jorahouse', 'ev 16'
	act 'Have Semyon fuck your ass':gt 'city_jorahouse', 'ev 17'
	act 'Suck Semyon':gt 'city_jorahouse', 'ev 18'
end

if $ARGS[0] = 'ev 16':
	cla
	*clr
	klofQW += 1
	money += 100
	pose = 3
	picrand = rand(7, 9)
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
	dynamic $vagstart2
	'Semyon fucks you in your pussy.'
	gs 'arousal', 'vaginal', 30, 'sub'
	gs 'stat'
	act 'Continue':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof10.jpg"></center>'
		dynamic $vagend
		'You get dressed and get ready to go home.'
		'Seymon hands you money, "Earned yourself a crumb."'
		guy += 1
		gs 'arousal', 'end'
		gs 'stat'
		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev 17':
	cla
	*clr
	klofQW += 1
	money += 100
	spafinloc = 4
	gs 'cum_manage'
	pcs_ass += 1
	'Hsien, with full force, hammers you in the ass.'
	gs 'arousal', 'anal', 30, 'sub', 'rough'
	gs 'stat'
	picrand = rand(11, 13)
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end

	act 'Continue':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof14.jpg"></center>'
		'Hsien discharges himself in your ass, as your ass is recovering he massages it with a toy.'
		'You get dressed and get ready to go home.'
		'Seymon hands you money, "Earned yourself a crumb."'
		guy += 1
		gs 'arousal', 'end'
		gs 'stat'
		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev 18':
	cla
	*clr
	klofQW += 1
	money += 100
	guy += 1
	spafinloc = 12
	gs 'cum_manage'
	'You passionately clasped Semyon member between your lips.'
	gs 'arousal', 'bj', 30, 'sub'
	gs 'stat'
	picrand = rand(15, 17)
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof<<picrand>>.jpg"></center>'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end

	act 'Continue':
		cla
		*clr
		facial += 1
		'Semyon cums all over your face'
		picrand = rand(18, 20)
		'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof18.jpg"></center>'
		'You get dressed and get ready to go home.'
		'Seymon hands you money, "Earned yourself a crumb."'
		gs 'arousal', 'end'
		gs 'stat'
		act 'Go home':gt 'city_residential'
	end
end

if $ARGS[0] = 'ev19':
	cla
	*clr
	if rand(0,1) = 1:jorasemyon = 1
	klofQW += 2
	money += 200
	spafinloc = 11
	facial += 1
	pcs_vag += 1
	if jorasemyon = 1:
		gs 'cum_call', 'mouth', 'A44', 1
		gs 'cum_call', '', 'A45', 1
	else
		gs 'cum_call', 'mouth', 'A45', 1
		gs 'cum_call', '', 'A44', 1
	end
	killvar 'jorasemyon'
	picrand = rand(1, 3)
	if picrand = 1:'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof21.jpg"></center>'
	if picrand = 2:'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof22.jpg"></center>'
	if picrand = 3:'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof23.jpg"></center>'

	'Jora brutally fucks you in your mouth and Semyon drills your pussy.'
	gs 'arousal', 'bj', 30, 'sub', 'rough', 'deepthroat', 'group'
	gs 'arousal', 'vaginal', 30, 'sub', 'rough', 'group'
	minut -= 30
	gs 'stat'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end
	gs 'stat'

	'Finally they both finished, one in your pussy, the other on your face.'
	'You get dressed and get ready to go home.'
	'The boys throw money at you, "Earned yourself a crumb."'
	guy += 1
	gang += 1
	gs 'arousal', 'end'
	gs 'stat'
	act 'Go home':gt 'city_residential'
end

if $ARGS[0] = 'ev20':
	cla
	*clr
	klofday = daystart
	minut += 5
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof.jpg"></center>'
	'You want to talk serious business with the boss'

	act 'Talk to the boss':
		cla

		if klofQW < 10:gt 'city_jorahouse', 'ev21'
		if klofQW >= 10:gt 'city_jorahouse', 'ev22'
	end
end

if $ARGS[0] = 'ev21':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof24.jpg"></center>'
	'From the room comes an ugly old man.'
	'"Too early for you to progress in our business." He says.'

	act 'Go home':gt 'city_residential'
end

if $ARGS[0] = 'ev22':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof24.jpg"></center>'
	'From the room comes an ugly old man.'
	'The boss looks closely at you and says, "Come to me, looks like you''re ready to make some more money."'

	act 'Go to the boss''s room':gt 'city_jorahouse', 'ev23'
	
	gs 'willpower', 'misc', 'self', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Go home (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'self'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Go home (<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] = 'ev23':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof25.jpg"></center>'
	'You go into the boss''s room, it is surprisingly well renovated and furnished.'
	'"Well, Well, take off your clothes and show yourself." Says the boss.'

	act 'Show yourself':gt 'city_jorahouse', 'ev24'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev24':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof26.jpg"></center>'
	'You sit on the bed modestly.'
	'"Show your breasts" Orders the boss.'

	act 'Show your breasts':gt 'city_jorahouse', 'ev25'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev25':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof26_1.jpg"></center>'
	'You bare your breasts.'
	'"Show me your ass!" Orders the boss'
	gs 'arousal', 'flashlite', 5, 'sub'
	gs 'stat'
	act 'Show your ass':gt 'city_jorahouse', 'ev26'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev26':
	cla
	*clr
	! WD: Correct Image path ~ "images/characters/city/jora/klof26</center>.jpg"
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof26.jpg"></center>'
	'You show your ass to the boss.'
	'"Let''s get rid of that dress!" He says.'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	act 'Remove your dress':gt 'city_jorahouse', 'ev27'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev27':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof26_4.jpg"></center>'
	'You take off your dress'
	'"Spreads your legs!" You receive an order.'

	act 'Spread your legs':gt 'city_jorahouse', 'ev28'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev28':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof26_6.jpg"></center>'
	'You sat on the bed and open your legs.'
	'"And now seduce me" Smiles the boss.'
	gs 'arousal', 'foreplay', 5, 'sub'
	gs 'stat'
	act 'Seduce the boss':gt 'city_jorahouse', 'ev29'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev29':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/1284364hjl.jpg"></center>'
	'You roll over on your side and show the boss your charms.'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	act 'Give him a better view':gt 'city_jorahouse', 'ev30'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev30':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/1284365sgp.jpg"></center>'
	'You get on all fours and show off your ass to the boss, you noticed that he is fidgeting in his chair. He undoes his pants and gives you a look that you immediately understand.'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	act 'Lick the boss''s cock':gt 'city_jorahouse', 'ev31'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev31':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof27.jpg"></center>'
	'You gently began to lick his penis.'
	gs 'arousal', 'foreplay', 5, 'sub'
	gs 'stat'
	act 'Suck it':gt 'city_jorahouse', 'ev32'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev32':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof28.jpg"></center>'
	'You eagerly clasped his member between your lips.'
	'In a hoarse voice the boss orders, "Spreads your legs, bitch."'
	gs 'arousal', 'bj', 5, 'sub'
	gs 'stat'
	act 'Spread your legs':gt 'city_jorahouse', 'ev33'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev33':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof26_5.jpg"></center>'
	'You get back on the bed and spread your legs.'
	'"Well, now I''ll check your pussy" States the boss.'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	act 'Let him fuck your pussy':gt 'city_jorahouse', 'ev34'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev34':
	cla
	*clr
	klofQW += 1
	pcs_vag += 1
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof28.jpg"></center>'
	'With full force the boss pushes his penis in your vagina.'
	gs 'arousal', 'vaginal', 30, 'sub', 'rough'
	guy += 1
	gs 'stat'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end

	'"Now I try your ass."'

	act 'Let him fuck your ass':gt 'city_jorahouse', 'ev35'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Get out of here (<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] = 'ev35':
	cla
	*clr
	klofQW += 1
	pcs_ass += 1
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof29.jpg"></center>'
	'The boss skewers your ass with his penis.'
	gs 'arousal', 'anal', 30, 'sub', 'rough'
	gs 'stat'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end

	'You feel that the boss is ready to cum.'

	act 'Kneel in front of him':gt 'city_jorahouse', 'ev36'
	act 'Let him end in your ass':gt 'city_jorahouse', 'ev37'
	act 'Stick his cock in your pussy':gt 'city_jorahouse', 'ev38'
end

if $ARGS[0] = 'ev36':
	cla
	*clr
	spafinloc = 11
gs 'cum_manage'
	money += 500
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof30.jpg"></center>'
	'You jump from his member and start wanking his cock until the boss cums on your face.'
	gs 'arousal', 'hj', 5, 'sub'
	gs 'stat'
	act 'Get out of bed':gt 'city_jorahouse', 'ev39'
end

if $ARGS[0] = 'ev37':
	cla
	*clr
	spafinloc = 3
gs 'cum_manage'
	money += 500
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof32.jpg"></center>'
	'You start furiously thrusting your ass trying to help him quickly reach orgasm. You fill the warm feeling that tells you he has cum in your ass.'
	gs 'arousal', 'anal', 5, 'sub'
	gs 'stat'
	act 'Get out of bed':gt 'city_jorahouse', 'ev39'
end

if $ARGS[0] = 'ev38':
	cla
	*clr
	gs 'cum_manage'
	money += 500
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof10.jpg"></center>'
	'Relying on good instinct, just as he peaks, you switch his cock from your ass to your vagina.'
	'Fine, but if you have a kid it''s not mine." Says the boss.'
	gs 'arousal', 'vaginal', 5, 'sub'
	gs 'stat'
	act 'Get out of bed':gt 'city_jorahouse', 'ev39'
end

if $ARGS[0] = 'ev39':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof33l.jpg"></center>'
	'You got off of the bed, look at the exhausted man, and with a grin you ask. "So, do I pass the test?"'
	'"Well you pass to bed test, now to check your obedience."'
	'"Serve both my boys only your pussy, both at the same time." Orders the boss.'

	act 'Obediently serve the boys':gt 'city_jorahouse', 'ev40'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Refuse (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'stat'
			gt 'city_residential'
		end
	else
		act 'Refuse (<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] = 'ev40':
	cla
	*clr
	klofQW += 1
	db += 1
	pcs_vag += 2
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/klof33.jpg"></center>'
	'Jora and Semyon are called in and with no ceremony the two of them hammer you in your pussy.'
	gs 'arousal', 'vaginal', 30, 'sub', 'group', 'rough'
	guy += 2
	gang += 1
	gs 'stat'
	horand = rand(1, 100)

	if horand <= stat['vaginal']:
		pcs_horny = 0 & orgasm += 1 & 'You orgasm.'
		$orgasm_or = 'yes'
	elseif horand > stat['vaginal']:
		pcs_horny += 10 & 'You are not satisfied'
	end
	act 'Get up and get dressed':gt 'city_jorahouse', 'ev41'
end

if $ARGS[0] = 'ev41':
	cla
	*clr
	money += 5000
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof3.jpg"></center>'
	'You got dressed and cleaned up.'
	'Jora approaches you and says, "The boss likes you, he wants you to go to the pool tomorrow after 10, keep money and bring your swimsuit.'

	act 'Go home':
		gs 'arousal', 'end'
		gs 'stat'
		gt 'city_residential'
	end
end

if $ARGS[0] = 'ev42':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/klof3.jpg"></center>'
	'You look around and notice Jora in the crowd.'
	'He motions to you and says, "Come on baby, swim."'

	act 'Go swimming':gt 'city_jorahouse', 'ev43'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Leave (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Leave (<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] = 'ev43':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas.jpg"></center>'
	'You dress up in a swimsuit and wait for Jora.'
	'Jora finds you a spot by the pool and tells you, "Lie down <<$pcs_nickname>> wait until more people gather." He goes for a swim.'

	act 'Lie down beside the pool':gt 'city_jorahouse', 'ev44'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Leave (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Leave (<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] = 'ev44':
	cla
	*clr
	minut += 30
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas1.jpg"></center>'
	'You lay around the pool, the pool is filling up with people.'
	'Jora swims up to you orders, "Take off your clothes in front of the crowd."'

	act 'Hesitantly remove your top':gt 'city_jorahouse', 'ev45'

	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev45':
	cla
	*clr
	minut += 5
	pcs_horny += 10
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas3.jpg"></center>'
	'You lower the straps.'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas2.jpg"></center>'
	'You lower the cups.'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas4.jpg"></center>'
	'You are standing in water trying to conceal your chest with your hand and burning with shame.'

	'Jora says with a grin, "Show the people those tits, they want some entertainment."'

	act 'Remove hands':gt 'city_jorahouse', 'ev46'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev46':
	cla
	*clr
	minut += 5
	pcs_horny += 10
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas5.jpg"></center>'
	'You move your hands from your chest and a crowd of men starts to gather around you.'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas6.jpg"></center>'
	'You lift your arms behind his head and strike a pose.'
	'Jora orders, "Remove the rest."'

	act 'Go into the water and remove bikini bottoms':gt 'city_jorahouse', 'ev47'

	act 'Get out of here':
		gs 'arousal', 'end'
		gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
		gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
		gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
		gt 'city_center'
	end
end

if $ARGS[0] = 'ev47':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas7.jpg"></center>'
	'You go into the water, there are even more people around you.'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas8.jpg"></center>'
	'You pull off your bikini bottoms and let them drift away in water.'
	'Jora orders, "Come out and show yourself to everyone."'

	act 'Get out of the water':gt 'city_jorahouse', 'ev48'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev48':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas9.jpg"></center>'
	'You confidently stride out of the water'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas10.jpg"></center>'
	'You go to the edge of the pool, around you there is a crowd of excited guys.'
	'Jora orders you, "Spread your legs."'

	act 'Spread your legs':gt 'city_jorahouse', 'ev49'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev49':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas11.jpg"></center>'
	'You spread your legs, and the crowd whoops.'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas12.jpg"></center>'
	'The excitement covers you in heat so you go into the shallow water and relax.'
	'Jora orders, "Spread your lips."'

	act 'Spread your lips':gt 'city_jorahouse', 'ev50'
	gs 'arousal', 'flash', 5, 'sub'
	gs 'stat'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev50':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas13.jpg"></center>'
	'You slide a couple of fingers into your pussy and pull the lips apart displaying your vagina.'
	'Most of the mens mouths are gaping open.'
	'Jora orders, "play with yourself."'

	act 'Caressing your pussy':gt 'city_jorahouse', 'ev51'
	gs 'arousal', 'vaginal_finger', 5, 'exhibitionism', 'sub'
	gs 'stat'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev51':
	*clr & cla
	'<center><video autoplay loop src="images/characters/city/jora/sex/bas14.mp4"></video></center>'
	'You are so excited that you pay no attention to the crowd and start to masturbate.'
	'The gathered men are silently drooling.'

	act 'Cum':gt 'city_jorahouse', 'ev52'
	gs 'arousal', 'clit_finger', 5, 'exhibitionism', 'sub', 'masturbate'
	gs 'stat'
	
	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev52':
	*clr & cla
	'<center><video autoplay loop src="images/characters/city/jora/sex/bas15.mp4"></video></center>'
	$orgasm_or = 'custom'
	$orgasm_txt = 'Within a few minutes you have a wild orgasm.'
	'The crowd of men are standing in complete shock.'
	gs 'arousal', 'clit_finger', 5, 'exhibitionism', 'sub', 'masturbate'
	'Jora hands you a dildo and says, "Insert this."'
	gs 'stat'
	act 'Insert dildo':gt 'city_jorahouse', 'ev53'

	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev53':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas16.jpg"></center>'
	'You start fucking your pussy with the Dildo.'
	'Jora hands you a second Dildo and says "Insert this in the same hole."'
	gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism', 'sub'
	gs 'stat'
	act 'Insert second Dildo':gt 'city_jorahouse', 'ev54'
end

if $ARGS[0] = 'ev54':
	*clr & cla
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas17.jpg"></center>'
	'It takes a little time to stretch and fit both, but when you do, you very much enjoy having two dildos in your hole.'
	'Jora orders, "Put one in your ass."'
	gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism', 'sub'
	gs 'stat'
	act 'Put one in your ass':gt 'city_jorahouse', 'ev55'

	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev55':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas18.jpg"></center>'
	'You take one of the dildos from your pussy and thrust it straight into your ass.'
	'Jora takes out the dildos and holding your eye contact, eases his fist into your vagina.'
	gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism', 'sub'
	gs 'arousal', 'anal_dildo', 5, 'exhibitionism', 'sub'
	minut -= 5
	gs 'stat'
	act 'Breathe':gt 'city_jorahouse', 'ev56'
end

if $ARGS[0] = 'ev56':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas19.jpg"></center>'
	'Jora raises your pelvis telling you, "Hold my cup, OK?"'
	'He inserts a glass into you and fills it with a can of beer.'
	gs 'arousal', 'vaginal_dildo', 5, 'exhibitionism', 'sub'
	gs 'stat'
	act 'Obediently hold the glass':gt 'city_jorahouse', 'ev57'

	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev57':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas20.jpg"></center>'
	'Jora leisurely drinks the beer with a straw, then smiling says, "Suck my dick, bitch."'
	gs 'arousal', 'foreplay', 5, 'exhibitionism', 'sub'
	gs 'stat'
	act 'Suck Jora':gt 'city_jorahouse', 'ev58'
end

if $ARGS[0] = 'ev58':
	cla
	*clr
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas21.jpg"></center>'
	'You accept his cock into your mouth, spreading time to run your tongue around his glans, watching his face closely to try and read exactly what is turning him on most.'
	'You deepthroat Jora''s dick, struggling to hold your breath and even mange to lick his balls.'
	'Once he is aroused Jora orders, "Enough, come over here and sit on it."'
	gs 'arousal', 'bj', 5, 'exhibitionism', 'sub'
	gs 'stat'
	act 'Fuck Jora':gt 'city_jorahouse', 'ev60'
end

if $ARGS[0] = 'ev60':
	cla
	*clr
	gs 'boyStat', 'A45'
	dick = 16
	silavag = 1
	pose = 3
	guy += 1
	dynamic $vagstart2
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas 27.jpg"></center>'
	'You obediently follow Jora to a small platform where he sits down, you don''t need further instruction and sit on his lap take his member inside as you do so.'
	'You grind on Jora''s dick as he gropes your tits, you put some real effort into draining his balls knowing you aren''t getting away before he''s satisfied. You use every muscle and trick you know to bring him to the point of no return.'
	gs 'arousal', 'vaginal', 5, 'exhibitionism', 'sub'
	gs 'stat'
	act 'Take it':gt 'city_jorahouse', 'ev61'
end

if $ARGS[0] = 'ev61':
	cla
	*clr
	pcs_horny = 100
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas22.jpg"></center>'
	dynamic $vagend
	gs 'stat'
	'Jora gets up and goes to the showers saying to the crowd, "This bitch is all yours."'

	act 'Fuck the crowd':gt 'city_jorahouse', 'ev62'

	gs 'willpower', 'misc', 'resist', 'hard'
	if will_cost <= pcs_willpwr:
		act 'Get out of here (<<will_cost>> Willpower)':
			gs 'willpower', 'pay', 'resist'
			gs 'arousal', 'end'
			gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
			gs 'panties', 'wear', $lastwornpantytype['swim'], lastwornpantynumber['swim']
			gs 'bras', 'wear', $lastwornbratype['swim'], lastwornbranumber['swim']
			gs 'stat'
			gt 'city_center'
		end
	else
		act 'Get out of here (<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] = 'ev62':
	cla
	*clr
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'mouth_swallow', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'labia', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'labia', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'cum_call', 'vaginal', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'cum_call', 'vaginal', $boy, 0
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas23.jpg"></center>'
	'You haven''t got any choice and you are gangbanged by the group of men.'
	'Someone bends you over and sticks his dick in your ass, another your throat and a third in your cunt. You remain fully stuffed as they all try each of your holes.'
	'One of them comes down your throat giving you no choice but to swallow with the rest finishing in or on your pussy.'
	$orgasm_or = 'yes'
	gs 'arousal', 'vaginal', 10, 'exhibitionism', 'sub', 'unknown', 'gangbang'
	gs 'arousal', 'anal', -10, 'exhibitionism', 'sub', 'unknown', 'gangbang'
	guy += 5
	gs 'stat'
	act 'Fuck the crowd':gt 'city_jorahouse', 'ev63'
end

if $ARGS[0] = 'ev63':
	cla
	*clr
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'butt', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'butt', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'anus', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'anus', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'mouth_swallow', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'mouth_swallow', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'face', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'face', $boy, 0
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas24.jpg"></center>'
	'You continue to suck, while you are pounded in the ass and pussy. Your only saving grace being that teh show has them so aroused none of them last long before they cum.'
	'Some of the men finish on your face or in your mouth while the others have started to finish in and on you butt leaving you covered in cum.'
	gs 'arousal', 'bj', 15, 'exhibitionism', 'sub', 'unknown'
	$orgasm_or = 'yes'
	gs 'arousal', 'vaginal', -15, 'exhibitionism', 'sub', 'unknown', 'gangbang'
	gs 'arousal', 'anal', -15, 'exhibitionism', 'sub', 'unknown', 'gangbang'
	guy += 8
	gs 'stat'
	act 'Fuck the crowd':gt 'city_jorahouse', 'ev64'
end

if $ARGS[0] = 'ev64':
	cla
	*clr
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'back', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'stomach', $boy, 0
	gs 'npcgeneratec', 0, 'a random man', rand(18,45)
	gs 'boyStat', $npclastgenerated
	gs 'cum_call', 'breasts', $boy, 0
	if pcs_ass < 16: pcs_ass += 1
	'<center><img <<$set_imgh>> src="images/characters/city/jora/sex/bas25.jpg"></center>'
	'Only three guys left and they seem to know what they are doing, working in tandem they take you in each orifice  finding your most sensitive triggers.'
	gs 'arousal', 'bj', 10, 'exhibitionism', 'sub', 'unknown'
	$orgasm_or = 'yes'
	gs 'arousal', 'vaginal', -10, 'exhibitionism', 'sub', 'unknown', 'gangbang'
	'They have more stamina then the last group and seem to want to make sure you remember this.'
	$orgasm_or = 'yes'
	gs 'arousal', 'anal', -10, 'exhibitionism', 'sub', 'unknown', 'gangbang'
	'You have no strength left and they are the only thing stopping you collapsing at this point which seems to be enough for them to hit orgasm. They each pull out and paint your body in their cum before gently lowering you to the ground so you can catch your breath.'
	guy += 3
	gs 'stat'
	act 'Get up and dress in your swimsuit':gt 'city_jorahouse', 'ev65'
end

if $ARGS[0] = 'ev65':
	cla
	*clr
	money += 2000
	saunawhore = 1
	'<center><img <<$set_imgh>> src="images/characters/city/jora/bas26.jpg"></center>'
	'One of the men finds and hands you your swimsuit.'
	'"Damn you''re good, boss said we can have you last if we kept an eye on you to make sure things didn''t get out of hand. Hope we made it as much fun for you as it was for us."'
	'You put your swimsuit back on and rest against a column. Your arms and legs are shaking and your pussy and ass feel unbearably raw.'
	'Jora comes out of the locker room and says, "Well, you put on a good show here, the boss is delighted!"'
	'He hands you a business card with an address in the residential area on it and a handful of rubles. "If you ever need money, go to the sauna, show them this card and tell them we sent you."'
	gs 'arousal', 'end'
	gs 'clothing', 'wear', $lastwornclothingtype['swim'], lastwornclothingnumber['swim']
	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'
end

!!Jesus, what hueta, I cried tears of blood

--- city_jorahouse ---------------------------------