glife/locations/dorm

# dorm
if $ARGS[0] = 'start':
	cla
	*clr
	minut += 5
	gs 'stat'
	if night_mode = 1:
		fcolor = rgb(255, 255, 255)
		bcolor = rgb(0, 0, 0)
		lcolor = rgb(106, 90, 205)
	else
		fcolor = rgb(0, 0, 0)
		bcolor = rgb(255, 255, 255)
		lcolor = rgb(106, 90, 205)
	end
	'<center><b><font color="maroon">Dormitory</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/dorm.jpg"></center>'

	if student =0:
		'Since you''re not attending the University you are not allowed to enter unless you''re visiting someone you know.'

		act 'Leave':gt 'island'

		if afra > 0 and hour < 22 and hour >= 7:
			act 'I''m here to visit DeMarcus':
				cla
				'You say that you''re here to visit DeMarcus. The janitor remarks, "Look at this whore, sleeping with niggers, go ahead and take care of that black cock."'
				reccoldorm = 1
				demarcusflag = 1

				act 'Enter':gt 'dorm', 'korr'
			end
		end

		if gosh > 0 and hour >= 8 and hour < 22:
			act 'I''m here to visit Gosha':
				cla
				'You say that you''re here to visit Gosha. The janitor chuckles, "Gosha''s new bitch? What you sluts see in that scrawny bastard, I''ll never understand. He''s already been through the half of the dorm already. Heh, go to your stud, bitch."'
				reccoldorm = 1
				goshiflag = 1

				act 'Enter':gt 'dorm', 'korr'
			end
		end
		
		if afra > 20 and afragang = 1 and kendra > 0 and hour >= 8 and hour < 22:
			act 'I''m here to visit Kendra':
				cla
				'You say that you''re here to visit Kendra. The janitor chuckles, "Go on, have fun!"'
				reccoldorm = 1
				kendraflag = 1

				act 'Enter':gt 'dorm', 'korr'			
			end
		end
		
		if afra > 10 and afragang = 1 and hour >= 8 and hour < 22:
			act 'I''m here to visit the african students':
				cla
				'You say that you are here to visit the african students. The janitor remarks, "Look at this whore, sleeping with niggers, go ahead and take care of those black cocks."'
				reccoldorm = 1
				afraflag = 1

				act 'Enter':gt 'dorm', 'korr'	
			end
		end
	else
		act 'Enter':
			cla
			minut += 5
			reccoldorm = 1
			gt 'dorm', 'korr'
		end
	end

	act 'Leave':
		cla
		minut += 5
		reccoldorm = 0
		gt 'island'
	end
end

if $ARGS[0] = 'korr':
	$metka = 'korr'
	$loc = 'dorm'
    $location_type = 'public_indoors'
	cla
	clr
	*clr
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/island/university/dorm/obkorr.jpg"></center>'
	'Before you is the usual hostel hallway with dilapidated walls, you can hear music and loud talking from drunk students escaping from some rooms.'

	act 'Leave':
		cla
		minut += 5
		reccoldorm = 0
		gt 'island'
	end

	if student > 0:
		act 'Your room':gt 'obroom', 'start'

		act 'Go to the shared kitchen':
			minut += 5
			gt 'obkitchen'
		end

		act 'Go to the shared bathroom':
			minut += 5
			obdysh = 1
			gt 'vann', 'start'
		end

		if week = 5 and hour > 18 and hour < 23:
			'You can hear the music blasting in the corridor, it seems the friday party is in full swing.'

			act 'The party':gt 'vecher', 'start'
		end
	end
	
	if afra > 0 and hour < 22 and hour >= 7:
		act 'DeMarcus'' room':
			cla
			afrand = rand(1, 2)

			if afrand = 1:
				minut += 5
				gs 'stat'
				'You knock on the door, but he is not there.'

				act 'Leave':gt 'dorm', 'korr'
			elseif afrand = 2:
				gt 'dorm', 'demarcusfuck'
			end
		end
	end

	if afra > 10 and hour >= 8 and hour < 22:
		act 'African students'' room':
			cls
			minut += 5
			gs 'stat'
			afrand = rand(1, 2)

			if afrand = 1:
				'You knock on the door, but there is no answer.'
				act 'Leave':minut += 5 & gt 'dorm', 'korr'
			elseif afrand = 2:
				minut += 120
				if afragang = 0:afragang = 1 & guy += 6
				gt 'dorm', 'afragangfuck'
			end
		end
	end

	if afra > 20 and afragang = 1 and hour >= 8 and hour < 22:
		act 'Kendra''s room':
			cls
			gt 'dorm', 'kendrafuck'
			minut += 15
			gs 'stat'
		end
	end

	if gosh > 0 and hour >= 8 and hour < 22:
		act 'Gosha''s room':
			cla
			minut += 15
			gs 'stat'
			'Gosha opens the door and invites you inside.'

			act 'Walk into Gosha''s Room':
				cla
				gt 'dorm', 'goshifuck'
			end

			act 'Go for a walk with Gosha':
				cla
				gosh += 1
				minut += 120
				gs 'stat'
				'You go for a walk with Gosha. You have a great time, he''s a great conversationalist and a true gentleman.'

				act 'Leave':gt 'dorm', 'korr'
			end
		end
	end
	
	if reccoldorm = 1:
		if demarcusflag = 1:demarcusflag = 0 & gt 'dorm', 'demarcusfuck'
		if goshiflag = 1:goshiflag = 0 & gt 'dorm', 'goshifuck'
		if afraflag = 1:afraflag = 0 & gt 'dorm', 'afragangfuck'
		if kendraflag = 1:kendraflag = 0 & gt 'dorm', 'kendrafuck'
	end
end

if $ARGS[0] = 'demarcusfuck':
	cla
    $location_type = 'event'
	reccoldorm = 0
	demarcusflag = 0
	gs 'boyStat', 'A82'
	*clr
	'You knocked on the door. After a couple of seconds a large black guy opens the door. He smiles as he notices it''s you, and invites you in. He quickly cleans the quite luxurious room for a student and tells you to take a seat.'
	if afra < 17:
		afrand1 = rand(1,afra)
	else
		afrand1 = rand(1,17)
	end
	gs 'stat'
	act 'Drink with DeMarcus':
		cla
		cls
		minut += 120
		'He hands over a glass of wine which you happily accept. The two of you drink wine and talk for a moment and as you feel loose, he leans and begins to grope you by the chest.'
		'As he notices you not resisting takes off your T-shirt, he begins sucking on your nipples and playing with your breasts, you feel yourself becoming very wet very quickly.'
		if demarkus = 0:guy += 1 & demarkus = 1
		sexpartkno = 1
		if afrand1 = 1:
			gs 'cum_manage'
			afra += 1
			pcs_vag += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra.jpg"></center>'
			'DeMarcus lays you on the bed, and pulls out his huge black cock. Before you''re able to speak up he spreads your legs apart to easily enter your pussy.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
		elseif afrand1 = 2:
			gs 'cum_manage'
			afra += 1
			pcs_vag += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra1.jpg"></center>'
			'DeMarcus lays you on the floor, and pulls out his huge black cock. Before you''re able to speak up he spreads your legs apart to easily enter your pussy.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
		elseif afrand1 = 3:
			gs 'cum_manage'
			afra += 1
			pcs_vag += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra2.jpg"></center>'
			'DeMarcus pushes you on all fours on the bed, he pulls out his huge black cock and spreads apart your ass cheeks before penetrating your pussy.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
		elseif afrand1 = 4:
			spafinloc = 3
			gs 'cum_manage'
			afra += 1
			pcs_ass += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra4.jpg"></center>'
			'DeMarcus pushes you on all fours on the bed, he pulls out his huge black cock and spreads apart your ass cheeks before thrusting his thick cock into your asshole.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'anal', 20, 'rough'
		elseif afrand1 = 5:
			gs 'cum_manage'
			afra += 1
			pcs_vag += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra24.jpg"></center>'
			'DeMarcus pushes you on all fours on the bed, he pulls out his huge black cock and salms into your pussy, stretching it to the limit.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'		
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
		elseif afrand1 = 6:
			spafinloc = 3
			gs 'cum_manage'
			afra += 1
			pcs_ass += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra16.jpg"></center>'
			'DeMarcus pushes you face down ass up on the bed and pulls out his huge black cock. He makes you spread wide apart and before you know it he enters your asshole.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'anal', 20, 'rough'
		elseif afrand1 = 7:
			spafinloc = 3
			gs 'cum_manage'
			afra += 1
			pcs_ass += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra13.jpg"></center>'
			'DeMarcus throws you on the bed and easily picks your back part up as he penetrates your asshole with his huge black cock.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'anal', 20, 'rough'
		elseif afrand1 = 8:
			spafinloc = 3
			gs 'cum_manage'
			afra += 1
			pcs_ass += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra20.jpg"></center>'
			'DeMarcus lays on the bed, you stradle him and force your asshole down on his huge black cock.'
			'You ride his thick cock until you orgasm a few times. He cums inside you and passes out.'
			$orgasm_or = 'yes'
			gs 'arousal', 'anal', 20, 'rough'
		elseif afrand1 = 9:
			gs 'cum_manage'
			afra += 1
			pcs_vag += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra11.jpg"></center>'
			'DeMarcus throws you on the bed and easily picks your back part up as he penetrates your pussy with his huge black cock.'
			'He furiously pounds you with his huge cock, you orgasm a few times on his cock. He cums inside you and collapses out on top of you.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
		elseif afrand1 = 10 or afrand1 = 11:
			afrand2 = rand(1,9)
			if afrand2 = 1:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra3.jpg"></center>'
			if afrand2 = 2:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra18.jpg"></center>'
			if afrand2 = 3:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra23.jpg"></center>'
			if afrand2 = 4:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra31.jpg"></center>'
			if afrand2 = 5:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra33.jpg"></center>'
			if afrand2 = 6:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra35.jpg"></center>'
			if afrand2 = 7:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra37.jpg"></center>'
			if afrand2 = 8:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra38.jpg"></center>'
			if afrand2 = 9:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra40.jpg"></center>'
			pcs_throat += 1
			spafinloc = 11
			gs 'cum_manage'
			afra += 1
			'DeMarcus has you drop on your knees, revealing his huge cock and before you know it, your lips are wrapped around his cock as he pushes his huge black cock down your throat.'
			'While DeMarcus is fucking your mouth, you carefully massage and finger your pussy. DeMarcus takes out his cock and as cums all over your face, you orgasm.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
			gs 'arousal', 'bj', 20
			minut -= 20
			
		elseif afrand1 = 12 or afrand1 = 13:
			afrand2 = rand(0,6)
			if afrand2 = 0:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra10.jpg"></center>'
			if afrand2 = 1:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra14.jpg"></center>'
			if afrand2 = 2:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra32.jpg"></center>'
			if afrand2 = 3:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra34.jpg"></center>'
			if afrand2 = 4:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra36.jpg"></center>'
			if afrand2 = 5:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra39.jpg"></center>'
			if afrand2 = 6:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra41.jpg"></center>'
			pcs_throat += 1
			spafinloc = 11
			gs 'cum_manage'
			afra += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra10.jpg"></center>'
			'DeMarcus has you drop on your knees, revealing his huge cock and before you know it, your lips are wrapped around his cock as he pushes his huge black cock down your throat.'
			'While DeMarcus is fucking your mouth, you carefully massage and finger your pussy. DeMarcus takes out his cock and as cums all over your face, you orgasm.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
			gs 'arousal', 'bj', 20
			minut -= 20
		else
			spafinloc = 1
			gs 'cum_manage'
			afra += 1
			pcs_vag += 1
			'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra42.jpg"></center>'
			'DeMarcus lays you on the bed, and pulls out his huge black cock. He spreads your legs apart as he slams into your pussy.'
			'While DeMarcus furiously pounds you, you orgasm a few times on his cock. Just as he''s about to cum he pulls out and cums on you sore clit.'
			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal', 20, 'rough'
		end
		gs 'arousal', 'end'
		gs 'stat'
		act 'Leave':gt 'dorm', 'korr'
	end
end

if $ARGS[0] = 'afragangfuck':
    $location_type = 'event'
	reccoldorm = 0
	afraflag = 0
	hour += 2
	'You knock on door and are greeted by a huge black guy. He grabs you by the arm and drags you into the room, in where you see five Africans. They surround you and immediately begin grabbing your breasts and ass.'
	'They speak a lot in their native language but there are some words you''re able to pick up, cumdump, whore, white trash, bimbo slut.'
	afrand = rand(1, afra)

	if afrand = 1:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra5.jpg"></center>'
	elseif afrand = 2:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra6.jpg"></center>'
	elseif afrand = 3:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra7.jpg"></center>'
	elseif afrand = 4:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra8.jpg"></center>'
	elseif afrand = 5:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra9.jpg"></center>'
	elseif afrand = 6:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra12.jpg"></center>'
	elseif afrand = 7:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra17.jpg"></center>'
	elseif afrand = 8:
	'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra19.jpg"></center>'
	elseif afrand = 9:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra21.jpg"></center>'
	elseif afrand = 10:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra22.jpg"></center>'
	elseif afrand = 11:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra25.jpg"></center>'
	elseif afrand = 12:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra26.jpg"></center>'
	elseif afrand >= 13:
		'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra27.jpg"></center>'
	end

	gs 'stat'
	afraboy = 6
	:afraboys
	gs 'npcgeneratec', 0, 'african student', rand(18,22)
	gs 'npcgenext', 'dick', 3
	$npc_thdick[$npclastgenerated] = $npctempgn[4]
	npc_dick[$npclastgenerated] = npctempgn[5]
	npc_Malen[$npclastgenerated] = rand(10,15)
	gs 'boyStat', $npclastgenerated
		fucloc = rand(0,2)
		if fucloc = 0:
			sexpartkno = 1
			cumprecheck = 1
			gs 'arousal', 'vaginal', 20
			gs 'stat'
			gs 'cum_manage'
		elseif fucloc = 1:
			gs 'arousal', 'anal', 20
			gs 'stat'
		else
			gs 'arousal', 'bj', 20
			gs 'stat'
			end
		!random finishes, 17 and 18 default to spafinloc = 0
		fucloc = rand(0,18)
		if fucloc < 3:
			spafinloc = 1
		elseif fucloc < 6:
			spafinloc = 3
		elseif fucloc < 8:
			spafinloc = 4
		elseif fucloc < 10:
			spafinloc = 12
		elseif fucloc < 12:
			spafinloc = 11
		elseif fucloc = 12:
			spafinloc = 8
		elseif fucloc = 13:
			spafinloc = 13
		elseif fucloc = 14:
			spafinloc = 14
		elseif fucloc = 15:
			spafinloc = 15
		elseif fucloc = 16:
			spafinloc = 16
		end
		gs 'cum_manage'
		afraboy -= 1
	if afraboy > 0: jump 'afraboys'
	gang += 1
	afra += 1
	
	'The africans have ripped all the clothes off and started to play with your body like a toy, having you in all sorts of poses and fucking you relentlessly abusing all your holes.'
	'While they fuck you in all your holes you orgasm a few times and as they finish up one after one they make sure they''ve covered your entire body in african cum.'

	$orgasm_or = 'yes'
	gs 'arousal', 'vaginal', 20
	gs 'arousal', 'anal', 20
	gs 'arousal', 'bj', 20
	gs 'arousal', 'hj', 20
	gs 'arousal', 'end'
	minut -= 20
	gs 'stat'

	act 'Leave':gt 'dorm', 'korr'
end

if $ARGS[0] = 'kendrafuck':
    $location_type = 'event'
	reccoldorm = 0
	kendraflag = 0
	gs 'stat'
	if kendra = 5:
		'Kendra opens the door and invites you in. It doesn''t take long before you both are naked and are exctingly touching eachother.'

		act 'Have sex':
			cla
			lesb += 1
			gs 'stat'
			picrand = rand(1, 5)
			'<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/sex/kendrastrap<<picrand>>.jpg"></center>'
			'Kendra smiles as she takes out the strap-on and locks herself in it. She has you spread your legs wide as she fucks you hard until she has you orgasm.'

			$orgasm_or = 'yes'
			gs 'arousal', 'vaginal_strap', 20, 'sub'
			gs 'stat'
			
			act 'Leave':gt 'dorm', 'korr'
		end
	elseif kendra = 4:
		'The lovely ebony Kendra opens the door. She observes you for a while and suggests that you get another tattoo, and only then and not before will she allow you to taste her once again.'
		
		act 'Leave':gt 'dorm', 'korr'

		act 'Get a tattoo':
			cla
			minut += 60
			kendra = 5
			tat = 5
			gs 'stat'

			if tatlip = 1 or tatlip = 3:
				'"So you went and got a tattoo? Took you some time, but I got to say you''re a quite obidiant. Now get to work!"'
			else

				if rand(1, 2) = 1:
					tatlip = 1
					'<center><img <<$set_imgh>> src="images/pc/body/tattoos/lip/tatlip1.jpg"></center>'
				else
					tatlip = 3
					'<center><img <<$set_imgh>> src="images/pc/body/tattoos/lip/tatlip3.jpg"></center>'
				end

				if tatlip > 1 and tatlip ! 3:
					'Kendra sees that you already have tattooed your lip, "Don''t you want to cover that up?" she asks, "A whore should have something else tattooed there, cocksucker seems fitting." She does it so masterfully that the old tattoo is not noticeable anymore.'
				else
					tattCount += 1
					'Kendra tattoo''s cocksucker on your lip.'
				end
			end

			act 'Give yourself to Kendra':
				cla
				lesb += 1
				'<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/sex/kendrastrap1.jpg"></center>'
				'Kendra undresses you and puts you on all fours, she puts on a strap-on and pushes it deep inside your pussy. Her thrusts are magical and it doesn''t take long before you orgasm. After a while she decides you had enough.'

				$orgasm_or = 'yes'
				gs 'arousal', 'vaginal_strap', 20, 'sub'
				gs 'stat'
				
				act 'Leave':gt 'dorm', 'korr'
			end
		end
	elseif kendra = 3:
		'The lovely African Kendra comes out of her room, and suggests you get another tattoo, after which she will allow you to lick her.'

		act 'Leave':gt 'dorm', 'korr'

		act 'Get a tattoo':
			cla
			minut += 60
			kendra = 4
			tat = 4
			gs 'stat'

			if tatvag = 3 or tatvag = 18:
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag3.jpg"></center>'
				'Kendra says that you already have such a stigma, a predatory smile and savory otveschshivaem you slap on the vagina.'
			else

				if rand(1, 2) = 1:
					tatvag = 3
					'<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag3.jpg"></center>'
				else
					tatvag = 18
					'<center><img <<$set_imgh>> src="images/pc/body/tattoos/pubic/tatvag18.jpg"></center>'
				end

				if tatvag ! 18 and tatvag ! 3:
					'Kendra sees that you already have a tattoo above your pussy. "Nothing, it''s a quick fix." - she says, and tattoos you above the pussy with the whore for blacks tattoo over the old one. She does it so masterfully that old tattoo is not noticeable.'
				else
					tattCount += 1
					'Kendra tattoos you above the pussy with the whore for blacks tattoo.'
				end
			end

			act 'Lick Kendra':
				cla
				*clr
				lesb += 1
				'<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/sex/kendra3.jpg"></center>'
				'Kendra undresses and pushes your face to start licking her pussy. You skillfully run your tongue in her juicy pussy and Kendra orgasms violently.'
				gs 'arousal', 'cuni_give', 20, 'sub'
				gs 'stat'
				act 'Leave':gt 'dorm', 'korr'
			end
		end
	elseif kendra = 2:
		'The lovely ebony Kendra opens the door. She observes you for a while and suggests that you get another tattoo, and only then and not before will she allow you to taste her once again.'
		
		act 'Leave':gt 'dorm', 'korr'

		act 'Get a tattoo':
			cla
			minut += 60
			kendra = 3
			tat = 3
			gs 'stat'

			if tatlech = 4:
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr4.jpg"></center>'
				'Kendra sees your tattoo on the shoulder showing that you''re a black cock loving whore, she grins and closes the door.'
			elseif tatlech = 0:
				tatlech = 4
				tattCount += 1
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr4.jpg"></center>'
				'Kendra tattoos your shoulder with the symbol of a black cock loving whore.'
			elseif tatlech > 0 and tatlech ! 4:
				tatlech = 4
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/shoulder/tatshldr4.jpg"></center>'
				'Kendra sees that you already have a tattoo on your shoulder, "That''s nothing, I''ll fix it up quickly." she says, and tattoos your shoulder with the symbol of a black cock loving whore over the old tattoo. She does it so masterfully that old tattoo is not noticeable.'
			end

			act 'Eat Kendra out':
				cls
				lesb += 1
				'<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/sex/kendra2.jpg"></center>'
				'Kendra undresses and grabs your head and forces it towards her pussy, "Now''s your turn to impress me!" You skillfully run your tongue in her juicy pussy and Kendra orgasms violently...'
				gs 'arousal', 'cuni_give', 20, 'sub'
				gs 'stat'
				
				act 'Leave':gt 'dorm', 'korr'
			end
		end
	elseif kendra = 1:
		'The lovely ebony Kendra opens the door. She observes you for a while and suggests that you get another tattoo, and only then and not before will she allow you to taste her once again.'

		act 'Leave':gt 'dorm', 'korr'

		act 'Get a tattoo':
			cls
			minut += 60
			kendra = 2
			tat = 2
			gs 'stat'

			if tatankle = 1 or tatankle = 2:
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle2.jpg"></center>'
				'"Oh, look at this, what an independent girl, you''ve already got one. Now you can get what you came for."'
			elseif tatankle = 0:
				tatankle = 2
				tattCount += 1
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle2.jpg"></center>'
				'Kendra tattoos your ankle with the symbol of black cock loving whore.'
			elseif tatankle > 2:
				tatankle = 2
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/foot/tatankle2.jpg"></center>'
				'Kendra notices you already have a tattoo on your ankle. "Nothing I can''t fix." she says, as she starts tattooing your ankle with the symbol of black cock loving whore over the old tattoo. She does it so masterfully that the old tattoo is not noticeable.'
			end

			act 'Eat Kendra out':
				cls
				repa = 9
				lesb += 1

				if kendrasex = 0:kendrasex = 1 & girl = girl + 1
				'<center><img <<$set_imgh>> src="images/characters/city/university/girl/kendra/sex/kendra.jpg"></center>'
				'Kendra undresses and grabs your head and forces it towards her pussy, "Now''s your turn to impress me!" You skillfully run your tongue in her juicy pussy and Kendra orgasms violently...'
				gs 'arousal', 'cuni_give', 20, 'sub'
				gs 'stat'
				
				act 'Leave':gt 'dorm', 'korr'
			end
		end
	elseif kendra = 0:
		'A pretty ebony woman opens the door, she introduces herself as Kendra and says that she knows you love black cocks. She tells you to get a proper tattoo if you want to get it on with her.'

		act 'Leave':gt 'dorm', 'korr'

		act 'Get a tattoo':
			cla
			minut += 60
			kendra = 1
			tat = 1
			gs 'stat'

			if tatupb = 4 or tatupb = 29:
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampStamp/tatlowbck<<tatupb>>.jpg"></center>'
				'"Oh, so you already have tattooed a tramp stamp? No need to waste time here then! Come in and eat my pussy, whore."'
			elseif tatupb = 0:
				tatupb = 4
				tattCount += 1
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampStamp/tatlowbck4.jpg"></center>'
				'Kendra tattoos a tramp stamp with the word, Slut!'
			elseif tatupb > 0 and tatupb ! 4:
				tatupb = 4
				'<center><img <<$set_imgh>> src="images/pc/body/tattoos/trampStamp/tatlowbck4.jpg"></center>'
				'Kendra sees that you already have a tramp stamp. "Nothing that can''t be easily fixed." she says, as she tattoo''s a tramp stamp with the word Slut over the old tattoo. She does it so masterfully that the old tattoo is not noticeable.'
			end

			act 'Eat Kendra out':
				cla
				*clr

				if kendrasex = 0:kendrasex = 1 & girl += 1

				lesb += 1
				gs 'arousal', 'cuni_give', 20, 'sub'
				gs 'arousal', 'end'
				gs 'stat'
				
				'<center><img <<$set_imgh>> src="images/characters/city/university/boy/djibril/sex/afra30.jpg"></center>'
				'Kendra undresses and grabs your head and forces it towards her pussy, "Now''s your turn to impress me!" You skillfully run your tongue in her juicy pussy and Kendra orgasms violently...'
				
				act 'Leave':gt 'dorm', 'korr'
			end
		end
	end
end

if $ARGS[0] = 'goshifuck':
    $location_type = 'event'
	reccoldorm = 0
	goshiflag = 0
	gs 'boyStat', 'A83'
	sexpartkno = 1
	if goshsex = 0:goshsex = 1 & guy += 1

	'As soon as you walk into Gosha''s room he begins fondling your breasts, and slowly undressing you.'
	gs 'arousal', 'foreplay', 30
	gs 'stat'

	srand = rand(1, 3)

	if srand = 1:
		gs 'cum_manage'
		picrand = rand(1, 5)

		if picrand = 1:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh2.jpg"></center>'
		if picrand = 2:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh11.jpg"></center>'
		if picrand = 3:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh13.jpg"></center>'
		if picrand = 4:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh14.jpg"></center>'
		if picrand = 5:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh15.jpg"></center>'

		'Seeing that you''re not resisting Gosha quickly removes his pants, revealing his cock and guides it into your pussy. While he fucks you, you orgasm.'
		'As you''re still trying to come to your senses Gosha cums inside you.'
		$orgasm_or = 'yes'
		gs 'arousal', 'vaginal', 20
		
	elseif srand = 2:
		spafinloc = 12
		gs 'cum_manage'
		picrand = rand(1, 5)
		if picrand = 1:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh.jpg"></center>'
		if picrand = 2:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh3.jpg"></center>'
		if picrand = 3:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh4.jpg"></center>'
		if picrand = 4:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh5.jpg"></center>'
		if picrand = 5:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh7.jpg"></center>'

		'Gosha pushes you down on your knees and fucks you hard in the mouth. It doesn''t take long before his cock starts twitching and he quickly pulls out and cums all over your face.'
		gs 'arousal', 'bj', 10, 'deepthroat', 'rough'

	elseif srand = 3:
		anal += 1
		spafinloc = 3
		gs 'cum_manage'
		picrand = rand(1, 5)
		gs 'stat'

		if picrand = 1:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh6.jpg"></center>'
		if picrand = 2:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh8.jpg"></center>'
		if picrand = 3:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh9.jpg"></center>'
		if picrand = 4:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh10.jpg"></center>'
		if picrand = 5:'<center><img <<$set_imgh>> src="images/characters/city/university/boy/gosha/sex/gosh12.jpg"></center>'

		'Gosha lubricates your asshole and starts pushing his fingers in. After a while he deems you ready, he takes out his cock and thrusts deeply into your ass. He fucks you for some time and ends by cumming inside of you.'
		$orgasm_or = 'yes'
		gs 'arousal', 'anal_finger', 10
		gs 'arousal', 'anal', 10, 'rough'
		minut -= 10
		
	end
	gs 'arousal', 'end'
	gs 'stat'
	act 'Leave':gt 'dorm', 'korr'
end

--- dorm ---------------------------------