Ibiza/locations/mod_Ibiza_club.qsrc

# mod_Ibiza_club
CLOSE ALL
!!needs a complete rework of the club
if $ARGS[0] = 'start':
	$loc = 'mod_Ibiza_club'
	$loc_arg = 'start'
	$menu_loc = 'mod_Ibiza_club'
	$menu_arg = 'start'
	menu_off = 0
	$location_type = 'public_outdoors'
	$sexloc = 'mod_Ibiza_club'
	*clr & cla
	minut += 5
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><b><font color="maroon">Night club</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club.jpg"></center>'
	'The entrance area of the club is full of young people. The entrance itself is guarded by a very large man wearing a shirt that says security, who checks everyones and makes sure they pay to enter. The entry fee costs 250 <b>₽</b>.'

	if ibiza_leaveday = daystart:
		ibizaQW = 3
		gt 'mod_IbizaStart', 'First Day'
	end

	act 'Return to the city center': minut += 5 & gt 'city_center'

	if clubwork = 1:
		act 'Meet Erik for work':
			*clr & cla
			menu_off = 1
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club.jpg"></center>'
			'You tell the bouncer you are here to work for Erik'
			'He looks you over.'
			if pcs_makeup > 1 and pcs_sweat < 30 and (PCloSkirt > 2 or PCloPants > 4 or $clothingworntype = 'exhibit'):
				minut += 5
				'He nods and says something into his walkie-talkie. A couple of minutes later you meet Erik in the foyer.'
				act 'Talk to him':gt 'mod_Ibiza_club', 'work'
			elseif PCloStyle = 4:
				'He shakes his head, if you''re looking for paying clients, try the road by the park this is not a brothel.'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			elseif pcs_sweat >= 30:
				'"God, you actually smell!"'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			elseif pcs_makeup = 1:
				'You have to wear some makeup to start your work.'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			else
				'He tells you that you are over-dressed, you need to wear something shorter, or much more daring if you want to work.'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			end
		end
	end

	if money >= 250:
		act 'Enter the club (250 <b>₽</b>)':
			menu_off = 1
			if pcs_makeup > 1 and pcs_sweat < 50 and (PCloSkirt > 2 or PCloPants > 4 or PCloPanties = 1 or $clothingworntype = 'exhibit'):
				'You can feel his eyes all over your body, but eventually he nods and lets pass where you are stopped just inside the door by another large man. He indicates the cashier window. You step over to it and pay the entry fee. With that paid he steps aside and lets you go inside.'
				minut += 5
				money -= 250
				frost = 0
				gt 'mod_Ibiza_club', 'inside'
			elseif PCloStyle = 4:
				cla
				'He shakes his head, if you''re looking for paying clients, try the road by the park this is not a brothel.'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			elseif pcs_sweat >= 50:
				cla
				'The bouncer shakes his head. "God, girl, you actually smell!"'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			elseif pcs_makeup = 1:
				cla
				'The bouncer shakes his head. "At least wear some makeup, girl."'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			else
				cla
				'The bouncer shakes his head. "Don''t you have some sexy clothes?"'
				act 'Continue':gt 'mod_Ibiza_club', 'start'
			end
		end
	end
end

if $ARGS[0] = 'inside':
	$loc = 'mod_Ibiza_club'
	$loc_arg = 'inside'
	$menu_loc = 'mod_Ibiza_club'
	$menu_arg = 'inside'
	menu_off = 0
	$location_type = 'public_indoors'
	*clr & cla
	minut += 5
	frost = 0
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><b><font color="maroon">Night club</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
	'The music here is loud and the bass is thumping. You see a laser show on the stage and on the poorly lit dance floor filled with people dancing, like there''s no tomorrow.'
	!!* Ibiza start event

	!!* 1/6 	Skills: Dance, Pole Dance and Erotic dancer  85+
	!!* 1/6		Skills: Inhibition 85+
	!!* 2/6 	Nightclub job. +10 times
	!!* 3/5 	Fame of slut in Pavlovsk, Gadukino or city. Enough one of them
	!!* 4/5 	18 years old or fake identity
	!!* 5/5 	College diploma
	!!* Changed College diploma requirement to just being a University Student


	if  ibizaday ! daystart and ibizaQW = 0 and rand(0,20) >= 0 and (ibizatest = 1 or (pcs_danc >= 85 and pcs_dancero >= 85 and pcs_dancpol >= 85 and pcs_inhib >= 85 and clubjob > 10 and (pav_slut >= 125 or city_slut >= 75 or oldtown_slut >= 75 or village_slut >= 75) and (fakepassport = 1 or age >= 18) and student = 1)):
		ibizaday = daystart
		gt 'mod_IbizaStart', 'start'
	end
	
	!!* if said no the first time option for it 30 days later
	if ibiza_cooldown + 30 > daystart and rand(0,20) = 0 and ibizaday = daystart:
		ibizaday = daystart
		gt 'mod_IbizaStart', 'another time'
	end
	*nl
	'There is also a <a href="exec:gt ''mod_Ibiza_club'', ''vip''">vip-room</a>.'

	if hour >= 18 and hotcat >= 6 and clubwork = 0 and clubno = 0 and rand (0,10) = 0:
		*clr & cla
		menu_off = 1
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
		'You are approached by a man in a suit, at first you think he must be security, but his suit looks too expensive.'
		'"Hi there, my name''s Erik, I''m the promoter for the club. I''m looking for someone for some casual work and you have the right look."'
		act 'Hear him out':
			*clr & cla
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
			'"The club opens at 6pm you can work for an hour at a time up to 1am. The jobs vary according to time and demand, It includes finding customers to bring to the club, promoting drinks and some dancing."'
			'"The pay depends on results, get more people in, get people buying up the promotional drinks or if you dance well and you get 200 <b>₽</b>. Do worse, you get less, do very well, you get a bonus. When you finish you can stay in the club, so you get free entry as well."'
			'"So, are you interested?"'
			act 'No':clubno = 1 & gt 'mod_Ibiza_club', 'inside'
			act 'Yes':
				*clr & cla
				clubwork = 1
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
				'You tell Erik you are interested and he takes your details.'
				'"Great <<$pcs_nickname>>, you can find me here, and I''ll place your details on the door so you can get in, but you still have to do your makeup and dress for clubbing."'
				act 'Return':gt 'mod_Ibiza_club', 'inside'
			end
		end

		exit
	end

	act 'Leave the club':
		cla
		drunk = 0
		minut += 5
		gt 'city_center'
	end
	
	if hour >= 18 and clubwork = 0 and clubno = 1:
		act 'Look for the promoter':
			*clr & cla
			menu_off = 1
			minut += 5
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
			'You search the club for a few minutes, before finding the promoter.'
			if hotcat >= 6:
				'He asks you if you''ve changed your mind and want to do some work for him.'
				act 'No':clubno = 1 & gt 'mod_Ibiza_club', 'inside'
				act 'Yes':
					cla
					*clr
					clubwork = 1
					clubno = 0
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
					'You tell Erik you are interested and he takes your details.'
					'"Great <<$pcs_nickname>>, you can find me here, and I''ll place your details on the door so you can get in, but you still have to do your makeup and dress for clubbing."'
					act 'Return':gt 'mod_Ibiza_club', 'inside'
				end
			else
				'You ask him about work, but he says your not pretty enough and walks off. You are shocked enough that you just stand there and watch him walk away.'
			end

			exit
		end
	end

	if hour <= 3 or hour >= 18:
		act 'Use the toilet':gt 'mod_Ibiza_club', 'toi'
		act 'Go to the dance floor':gt 'mod_Ibiza_club', 'dance'
		act 'Go to the bar':gt 'mod_Ibiza_club', 'bar'
	end

	if (hour < 1 or hour >= 18) and clubwork = 1:
		act 'Find Erik for work':
			*clr & cla
			minut += 5
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
			'You search around and it only takes a few minutes to find Erik in his suit.'
			act 'Talk to him':gt 'mod_Ibiza_club', 'work'
		end
	end
end

if $ARGS[0] = 'toi':
	$menu_loc = 'mod_Ibiza_club'
	$menu_arg = 'toi'
	menu_off = 0
	*clr & cla
	gs 'stat'
	'Shit, there''s a very long queue in front of the womens toilet. You can''t tell how long this is going to take.'

	act 'Wait in line':
		cla
		menu_off = 1
		minut += rand(10, 30)
		gs 'stat'
		'Finally there''s a free booth for you.'

		act 'WC':gt 'mod_Ibiza_club', 'tou'
	end

	act 'Sneak into the mens toilet':
		cla
		menu_off = 1
		acta += 1
		'You slip unnoticed into the mens toilet room.'

		act 'Find a free cubicle':

			if TQuest = 0 and pcs_horny < 50:
				gt 'mod_Ibiza_club', 'tou'
			elseif TQuest = 0 and pcs_horny >= 50:
				gt 'mod_Ibiza_club2', 'toilet'
			elseif TQuest = 1:
				gt 'mod_Ibiza_club2', 'toilet1'
			elseif TQuest = 2:
				gt 'mod_Ibiza_club2', 'toilet2'
			elseif TQuest >= 3 and rand(1, 100) < 60:
				gt 'mod_Ibiza_club', 'tou'
			elseif TQuest >= 3:
				gt 'mod_Ibiza_club2', 'toilet1'
			end
		end
	end

	act 'Go back to the dancefloor':gt 'mod_Ibiza_club', 'inside'
end

if $ARGS[0] = 'tou':
	$loc_arg = 'tou'
	$loc = 'mod_Ibiza_club'
	$locM = 'mod_Ibiza_club'
	$locM_arg = 'tou'
    $location_type = 'bathroom'
	$locclass = 'restroom'
	$menu_loc = 'mod_Ibiza_club'
	$menu_arg = 'tou'
	menu_off = 0
	*clr & cla
	minut += 5
	gs 'stat'
	gs 'themes', 'indoors'
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club3.jpg"></center>'
	*nl

	act 'Leave the toilet':gt 'mod_Ibiza_club', 'inside'

	act 'Look in the mirror': gt 'mirror', 'start'
	if pcs_hairbsh = 0: act 'Brush your hair': gt 'mirror', 'brush'

	dynamic $tampon
	dynamic $quickwash
	dynamic $basin
	dynamic $publicpan
end

if $ARGS[0] = 'dance':
	*clr & cla
	$menu_loc = 'mod_Ibiza_club'
	$menu_arg = 'dance'
	menu_off = 0
	gs 'stat'
	'<center><b><font color="maroon">The dance floor</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
	'The club is filled to the brink with people. Most of whom are on the dance floor having a great time.'
	
	act 'Leave the dance floor':gt 'mod_Ibiza_club', 'inside'
	
	if hour <= 3 or hour >= 18:
		act 'Dance (0:15)':
			*clr & cla
			menu_off = 1
			minut += 15
			pcs_stam -= 5
			gs 'sweat', 'add', 3
			fat -= 1
			danc_exp += 1
			if pcs_inhib < 40:inhib_exp += rand(1,2)
			pcs_mood += 10
			clrand = rand(0, 400)
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club4.jpg"></center>'
			'The dance floor is packed and everyone is dancing very closely, you could put your hand on the shoulder of the guy in front of you but you when you turn around your chest is right up against another. You don''t let it bother you as everyone is forced to dance this close.'

			if pcs_apprnc >= clrand:
				pcs_horny += 1
				gs 'boy'
				'While you''re dancing you feel that someone is groping your ass, you turn around and see <<$boybody>> <<$boybod>> <<$boyface>>. He''s <<$boyClo>>'

				act 'Stop dancing':gt 'mod_Ibiza_club', 'inside'
				
				act 'Dance with him':
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club8.jpg"></center>'
					'You continue to dance with the guy on the dance floor, but he doesn''t stop touching your butt. It gets you quite excited having a random guy feeling you up in public.'

					gs 'arousal', 'foreplay', 30, 'sub'
					gs 'stat'

					if pcs_horny < 90:
						act 'Go to the dance floor':gt 'mod_Ibiza_club', 'dance'
					end

					act 'Kiss':
						cla
						
						if rand(0, 1) = 1:
							'You''re passionately kissing the guy, while he''s continuously groping you, always dedicating one of his hands to either your tits or your ass. "Why don''t we go to the VIP-Area. There we''ll have a bit more privacy.", he says inbetween kisses.'

							gs 'arousal', 'kiss', 15, 'sub'
							gs 'stat'							

							if pcs_horny < 70: act 'Go to the dance floor':gt 'mod_Ibiza_club', 'dance'
							act 'Go to Vip-room with the guy':picrand = 38 & $sexloc = 'mod_Ibiza_vipclub' & xgt 'sex', 'var'
						else
							'You''re passionately kissing the guy, while he''s continuously groping you, always dedicating one of his hands to either your tits or your ass. "Let''s go to the toilet.", he says with a smile.'

							gs 'arousal', 'kiss', 15, 'sub'
							gs 'stat'

							if pcs_horny < 70: act 'Go to the dance floor':gt 'mod_Ibiza_club', 'dance'
							act 'Go to the toilet with a guy':gt 'mod_Ibiza_club', 'sex'
						end
					end
				end

				if clrand > 85:
					*clr & cla
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/dancelezb.jpg"></center>'
					'While you''re dancing you a hand groping your ass. You turn around to see who touched your butt, but you''re surprised to see a woman smiling at you, she is seductively biting her lip.'
					
					act 'Stop dancing':gt 'mod_Ibiza_club', 'inside'
					
					if rand(0, 1) = 0:
						act '"Let''s go to the toilet, to have fun."':gt 'mod_Ibiza_club', 'lezbsort'
					else
						act '"Let''s go to VIP-Room, to have fun."': picrand = rand(13, 17) & $sexloc = 'mod_Ibiza_vipclub' & xgt 'lezbsex', 'var'
					end
				end
			end
			killvar 'clrand'
			act 'Go away':gt 'mod_Ibiza_club', 'dance'
		end

		act 'Go up to the DJ (0:30)':
			*clr & cla
			menu_off = 1
			minut += 30
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club7.jpg"></center>'

			if alexeyQW = 0:'The DJ does not pay you any attention.'
			if alexeyQW > 0 and alexeySex = 0:
				'Alexei looks up and smiles at you, he recognizes you from the vocal school.'
			elseif alexeyQW > 0 and alexeySex > 0:
				'As Alexei sees you, he invites you into his DJ booth.'

				act 'Go into the booth':
					*clr & cla
					minut += 30
					gs 'stat'
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club7.jpg"></center>'
					'Alexei barely talks to you as he''s only paying attention to the music.'

					if alexeyClubSex = 3 and sashaClubQW = 0:
						sashaClubQW = 1
						'Into the booth came a man, who seems to be somewhere in forties. He has a large belly, has a bald head and is wearing glasses. Alexei greeted him and introduced you to him, his name is Alexander E. and he''s the owner of the club.'
						'Alexander had a small talk with Alexei, then he left again.'

						act 'Leave the booth':gt 'mod_Ibiza_club', 'dance'

						exit
					end

					if alexeyClubSex ! 3 or sashaClubQW > 0:
						act 'Leave the booth':gt 'mod_Ibiza_club', 'dance'

						act 'Get on your knees and give him a BJ':
							*clr & cla
							alexeySex += 1
							alexeyClubSex += 1
							gs 'stat'
							'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj<<rand(29, 41)>>.jpg"></center>'
							'You kneel down and wrap your <<$liptalk>> around his cock and you begin to suck on it. Alexei helped by moving his hips back and forth, you notice his moving is in sync to the beat of the music he''s playing. After a few minutes he groans, "You better swallow it all, I don''t want anyone to clean up our mess."'

							gs 'arousal', 'bj', 10, 'sub'
							gs 'stat'

							act 'He''s cumming':
								*clr & cla
								pcs_horny += 10
								minut += 10
								swallow += 1
								gs 'boystat', 'A81'
								sexpartkno = 1
								spafinloc = 12
								gs 'cum_manage'
								gs 'stat'
								'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum<<rand(34, 47)>>.jpg"></center>'
								'Streams of sperm hit you in the mouth and began to run down your <<$liptalk>>. Alexei wiped his dick on your <<$liptalk>> and put it away in his pants.'
								'You began greedily to swallow his warm cum and use your finger to collect the drips, that escaped your mouth, then lick your finger clean. Once you''ve swallowed every last drop, you stand up again and thank him for this tasty snack.'

								gs 'arousal', 'end'
								gs 'stat'

								act 'Leave the booth':gt 'mod_Ibiza_club', 'dance'
							end
						end
					end
				end
			end

			act 'Leave the booth':gt 'mod_Ibiza_club', 'dance'
		end
	else
		menu_off = 1
		'Its getting late and the music stops, looks like it might be time to go home.'
		act 'Leave the dance floor': gt 'mod_Ibiza_club', 'inside'
	end	
end

if $ARGS[0] = 'bar':
	*clr & cla
	minut += 5
	$menu_loc = 'mod_Ibiza_club'
	$menu_arg = 'bar'
	menu_off = 0
	gs 'stat'
	'<center><b><font color="maroon">bar</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club10.jpg"></center>'
	'You have to squeeze yourself through the crowd to get to the bar. On your way, random guys try to lay their hands around you, try to convince you into dancing or drinking with them, some even try to grope your tits or ass and some play the white knight and try to get your attention by protecting you.'

	if pcs_apprnc > 56:
		barsexrand = rand(0, 10)
		if barsexrand = 1: killvar 'barsexrand' & gt 'mod_Ibiza_club', 'bar0'
		if barsexrand = 2: killvar 'barsexrand' & gt 'mod_Ibiza_club', 'bar1'
		killvar 'barsexrand'
	end

	act 'Go back':gt 'mod_Ibiza_club', 'inside'

	if alko >= 7:
		*clr & cla
		menu_off = 1
		temp = rand(0, 100)

		if temp = 5:
			pcs_horny += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club1.jpg"></center>'
			'You''re so drunk, you can barely remember where you live.'

			act 'Try to go home':gt 'city_residential'
			killvar 'temp'
			exit
		elseif temp = 6:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club2.jpg"></center>'
			gs 'npcgeneratec', 0, 'male stripper', rand(18,22)
			gs 'boyStat', $npclastgenerated
			sexpartkno = 1
			spafinloc = 12
			gs 'cum_manage'
			'The last thing you remember is how you sucked the cock of one of the male strippers.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'bj', 10, 'sub'
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 7:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand4.jpg"></center>'
			gs 'npcgeneratec', 0, 'Club Dancer', rand(18,26)
			gs 'boyStat', $npclastgenerated
			spafinloc = 12
			gs 'cum_manage'
			'The last thing you remember, is how you sucked someones cock in the middle of the dancefloor.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'bj', 10, 'sub'
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 8:
			pcs_horny += 5
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club5.jpg"></center>'
			'The last thing you remember, is how you tried to pose as a waitress.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 9:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand6.jpg"></center>'
			'The last thing you remember, is a sex scene at the tables, where a girl is bent over one and fucked by a guy from behind.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic_sex', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 10:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand7.jpg"></center>'
			'You see a small group of girl loosing it on the dancefloor. They''re moving like there''s no tomorrow.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 11:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand8.jpg"></center>'
			'You see two hot girls passionately kissing each other.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 12:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand9.jpg"></center>'
			'The last thing you remember, is a girl who crawled under a table, because she probably dropped her phone. But her skirt moves up and reveals her bare naked ass and the fact that she didn''t put on any panties.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 13:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand10.jpg"></center>'
			'You notice a women who is giving a guy a blowjob, then the women opens her mouth, with the cock in her hand and the guy pours champagne into her mouth.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic_sex', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 14:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand11.jpg"></center>'
			'You happen to notice a small group of drunken girls giggling. One of which is fingering the pussy of another girl.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic_sex', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 15:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand12.jpg"></center>'
			'The last thing you can remember is dancing closely with a black guy, with his hands on your hips.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'foreplay', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 16:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club13.jpg"></center>'
			'The last thing you remember, is how you tried to dance with a random guy.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'foreplay', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 17:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club14.jpg"></center>'
			'The last thing you remember, is how you undressed and danced half naked in front of everyone.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'foreplay', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 18:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand15.jpg"></center>'
			'You see a guy and a girl on the dancefloor kissing each other. The guy however uses one of his hands to have some fun with the girls pussy.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic_sex', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 19:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand16.jpg"></center>'
			'You can see a drunken girl spreading her legs on one of the bar stools, she''s not wearing any panties and the bloke next to her takes the opportunity and fingers the girl.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic_sex', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 20:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/shared/sex/public/ivrand17.jpg"></center>'
			'You can see a guy hugging and kissing a drunken girl, while another guy sucks on her exposed tits.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic_sex', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 21:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club21.jpg"></center>'
			'You see a girl as drunk as you attempting taking a picture of her panties.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 22:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club22.jpg"></center>'
			'You see a girl lying on the dancefloor passed out drunk. Someone has taken her panties, exposing her private parts.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 23:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club23.jpg"></center>'
			'You see a girl lying on the dancefloor passed out drunk. Someone has lifted her skirt, exposing her panties to everyone.'
			'You''re so drunk that you fell asleep on the spot. A man from the security had to wake you up and escorted you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp = 24:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club24.jpg"></center>'
			'The last thing you''re able to remember is, that used the mens bathroom to pee.'
			'You''re too drunk to continue partying here. The security has to escort you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		elseif temp > 24:
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club25.jpg"></center>'
			'You see a girl lying on a parcel passed out drunk. You can clearly see her panties.'
			'You''re so drunk that you fell asleep on the spot. A man from the security had to wake you up and escorted you out.'

			gs 'arousal', 'erotic', 10
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave':gt 'city_center'
			killvar 'temp'
			exit
		end
		killvar 'temp'
	end

	if money >= 300:
		act 'Buy a drink (300 <b>₽</b>)':
			*clr & cla
			menu_off = 1
			minut += 15
			gs 'drugs', 'alcohol', 'rum'
			pcs_horny += rand(10, 50)
			money -= 300
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club6.jpg"></center>'
			'You found a free bar stool and sat down on it. You ordered the barkeeper to mix you a cocktail and a few moments later, you sipping on a sweet one.'

			act 'Stand up':gt 'mod_Ibiza_club', 'bar'
		end
	end
end

if $ARGS[0] = 'sex':
	*clr & cla
	menu_off = 1
	gs 'dinSex', 'std_trigger_oral'
	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
	gs 'boyStat', $npclastgenerated
	dick = rand(10, 18)
	gs 'stat'
	'<center><b><font color="maroon">toilet stall</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex.jpg"></center>'
	'You went with the guy to the men''s toilet and he dragged you into one of the free booths. He started to caress your breasts and pussy, then helped you getting rid of the clothes.'

	gs 'arousal', 'foreplay', 5
	gs 'stat'

	act 'Give him a blowjob':
		cla
		*clr
		guy += 1
		pcs_horny += 5
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubbj.jpg"></center>'
		gs 'dinSex', 'std_trigger_oral'
		gs 'arousal', 'bj', 5, 'sub'
		gs 'stat'

		act 'Take his cock out of your mouth':
			cla
			*clr

			if harakBoy = 0:
				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
				spafinloc = 13
				gs 'cum_manage'
				'You take his cock and point it away from you. He groans as he cums and most of his cum gets splattered onto the floor, with a few drips covering your hand.'
			elseif harakBoy = 1:
				act 'Point his cock at the floor':
					cla
					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
					spafinloc = 13
					gs 'cum_manage'
					'You take his cock and point it away from you. He groans as he cums and most of his cum gets splattered onto the floor, with a few drips covering your hand.'

					act 'Stand up':gt 'mod_Ibiza_club', 'tou'
				end

				act 'Let him cum on your face':
					cla
					facial += 1
					spafinloc = 11
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubfacial1.jpg"></center>'
					'You grabbed his cock and point his "gun" at your face. He groans as he cums and you can feel hot streams of semen covering your face.'

					act 'Stand up':gt 'mod_Ibiza_club', 'tou'
				end

				exit
			elseif harakBoy = 2:
				facial += 1
				spafinloc = 11
				gs 'cum_manage'
				SUB += 1
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubfacial.jpg"></center>'
				'The bloke grabs your hair and cums on your face. You quickly close your eyes, but it''s too late, a few drips of semen make it into your eyes. It hurts a bit.'
			end

			act 'Stand up':gt 'mod_Ibiza_club', 'tou'
		end

		act 'Swallow his cum':
			cla
			*clr
			swallow += 1
			spafinloc = 12
			gs 'cum_manage'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubswallow.jpg"></center>'
			'The guy came in your mouth, you can feel his hot and salty semen pouring into it. Without hesitation you swallow it, you can''t tell why, but somehow you start to enjoy the taste of fresh, warm sperm.'

			gs 'arousal', 'end'
			gs 'stat'

			act 'Stand up':gt 'mod_Ibiza_club', 'tou'
		end
	end

	act 'Doggy-Style':
		cla
		*clr
		guy += 1
		pcs_vag += 1
		cumprecheck = 1
		gs 'cum_manage'
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/clubsex.jpg"></center>'
		'You turn around and kneel on the toilet seat. "Fuck me", you say and present your ass and pussy to him.'
		'You don''t have to tell him twice, he grabs your hips, positions his cock in front of your pussy and with a strong push he enters your vagina. You moan with pleasure and you are surprised by the sheer force he used to enter you.'
		'He grunts heavy as he fucks you like the bitch in heat that you are. He continues with force and speed, if he''s slowing down, you can''t notice it, but it doesn''t take long and both of you are reaching the state of orgasm.'
		'You look at him, "Don''t you dare to cum inside.". In between his grunts he nods and a few seconds later he cums outside of you, you are relived that he at least acts a bit like a gentleman.'
		spafinloc = 14
		gs 'cum_manage'

		gs 'arousal', 'vaginal', 5, 'sub'
		gs 'stat'

		if pcs_horny > 90:
			$orgasm_or = 'custom'
			$orgasm_txt = 'As you heartbeat slows and you are beginning to catch your breath, you realise your arousal has peaked, a warmth fills you and your eyes lose focus.'
		end
		'You recover to find yourself alone in the cubicle and quickly re-dress.'

		gs 'arousal', 'end'
		gs 'stat'

		act 'Leave cubicle':gt 'mod_Ibiza_club', 'tou'
	end
end

if $ARGS[0] = 'bar0':
	cla
	*clr
	menu_off = 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar0.jpg"></center>'
	'As you sit at the bar, a woman walk up to you and begins to chat with you.'
	'During the conversation you get the feeling that she''s flirting with you and before you even can react, her hands wander over your body, giving you a sensational feeling.'

	act 'Move away from her':gt 'mod_Ibiza_club', 'bar'

	act 'Kiss her':
		cla
		*clr
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar1.jpg"></center>'
		'Her flirting works on you. You move closer to her and begin to kiss her. At first, it feels weird for you, kissing a random woman that is, but it doesn''t take long for the kissing to move for awkward to passionately..'

		gs 'arousal', 'kiss', 5, 'lesbian'
		gs 'stat'

		act 'Tell her to meet at the toilet':gt 'mod_Ibiza_club', 'lezbsort'

		act 'Strip her':
			cla
			*clr
			girl += 1
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar2.jpg"></center>'
			'You remove her top and begin to caress and kiss her breasts. You suck on her nipples while your hand unbuttons her pants and slip your hand in to get a feel for her pussy. You are a bit surprised to find an already moistened pussy.'

			gs 'arousal', 'foreplay', 5, 'lesbian'
			gs 'stat'

			act 'Lick her pussy':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar3.jpg"></center>'
				'"Wait a second, let me help you with my pants.", she says, panting softly into your ear, while she drops her pants. Then she sat down on a bar stool and you moved her panty aside and began to lick her womanly folds.'
				'Moments later, she moans heavy and cums. You look up to her and giggle softly. "Why don''t we switch and I make you feel good now?", she says, still panting heavy.'

				gs 'arousal', 'cuni_give', 5, 'lesbian'
				gs 'stat'

				act 'Switch positions':
					cla
					*clr
					pcs_horny = 0
					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar4.jpg"></center>'
					'You stand up and she goes down on you, starting to lick your flower and sticking two fingers into your now wet cunt. She''s very skilled with her tongue and it takes her only minutes to make you cum.'
					'You''re blissfully smiling at her. "Thank you.", you say to her..'

					$orgasm_or = 'yes'
					gs 'arousal', 'cuni', 5, 'lesbian'
					gs 'stat'

					if dildo = 0:
						cla
						*clr
						'Now that the adrenalin fades away again, both you begin to blush as you notice, that the people around you stare at you. Both of you quickly dress-up again and go parted ways.'

						gs 'arousal', 'end'
						gs 'stat'

						act 'Leave':gt 'mod_Ibiza_club', 'inside'
					elseif dildo > 0:
						act 'Get dildo':
							cla
							*clr
							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar5.jpg"></center>'
							'She chuckles, "Ohh you think we''re done? I saw that you carry dildos with you." You blush and nod. "Use them.", she tells you.'
							'You take out your dildos, inserting one into her still wet pussy and one into your own wet cunt, you turn on their vibrations function and move them in and out, both of you are once again panting heavy.'

							gs 'arousal', 'vaginal_vibe', 5, 'lesbian'
							gs 'arousal', 'vaginal_vibe_give', 5, 'lesbian'
							minut -= 5
							gs 'stat'

							act 'Give her one':
								cla
								*clr
								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar6.jpg"></center>'
								'You both stand up and use a dildo to move it in and out of each others pussy. She moves close to you and begins kissing you. Your feelings are overflowing and both of you come together at the same time.'
								'Now that the adrenalin fades away again, both you begin to blush as you notice, that the people around you stare at you. Both of you quickly dress-up again and go parted ways.'

								$orgasm_or = 'yes'
								gs 'arousal', 'vaginal_vibe', 5, 'lesbian'
								gs 'arousal', 'vaginal_vibe_give', 5, 'lesbian'
								minut -= 5
								gs 'arousal', 'end'
								gs 'stat'

								act 'Leave':gt 'mod_Ibiza_club', 'inside'
							end
						end
					end
				end
			end
		end
	end
end

if $ARGS[0] = 'bar1':
	cla
	*clr
	menu_off = 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/bar7.jpg"></center>'
	'While you sit on one of the bar stools a man comes to and grabs on of your ass cheeks. "Why don''t we both have some fun together, huh?", the bloke says and you can hear, that he had more than one beer.'

	act 'Turn him down':
		if alko < 4:
			gt 'mod_Ibiza_club', 'bar'
		else
			gt 'mod_Ibiza_club', 'rape'
		end
	end

	gs 'willpower', 'cuni', 'force', 'medium'
	if will_cost <= pcs_willpwr:
		act 'Tell him to lick you (<<will_cost>> Willpower)':
			*clr & cla
			gs 'willpower', 'pay', 'force'
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barkuni.jpg"></center>'
			'"Sure", you say with a witty smile, "Why don''t you lick my pussy?" You stand up, remove your panties and bend over the stool. "Go on, what are you waiting for.", you tell him.'
			'He kneels down and begins to move his tongue between your folds. You immediately begin to moan softly. You close your eyes and admit to yourself, that he''s not half bad at it.'
			gs 'arousal', 'cuni', 10, 'dom'
			gs 'stat'
			act 'Turn him down':gt 'mod_Ibiza_club', 'bar'
			act 'Suck his cock':gt 'mod_Ibiza_club', 'bar2'
			act 'Let him fuck you':gt 'mod_Ibiza_club', 'bar3'
		end
	else
		act 'Tell him to lick you (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
	end	
	act 'Blow job':gt 'mod_Ibiza_club', 'bar2'
	act 'Let him fuck you':gt 'mod_Ibiza_club', 'bar3'
end

if $ARGS[0] = 'bar2':
	cla
	*clr
	menu_off = 1
	gs 'dinSex', 'std_trigger_oral'
	guy += 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barminet.jpg"></center>'
	'You bend over, unbutton his pants and take out his cock. You bite your lips in anticipation and start to suck on it with your <<$liptalk>>. He''s moaning and smiling at the fact, that a random girl at a club is giving him a header.'

	gs 'arousal', 'bj', 10, 'sub'
	gs 'stat'

	act 'Let him fuck you':gt 'mod_Ibiza_club', 'bar3'

	act 'Continue to suck':
		cla
		*clr
		gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
		gs 'boyStat', $npclastgenerated
		spafinloc = 12
		gs 'cum_manage'
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barcum.jpg"></center>'
		'You suck his cock for a few minutes and not long after, he grabs and holds your head and presses you against his crotch as he cums inside your mouth. You gag a few seconds, then feel his hot cum flowing into you and you swallow every drip of his semen.'
		'He takes his cock out and a few drips of cum land on your chin. You use your fingers to clean it up, then lick them clean. Both of you smile at each other and he eventually thank you, zips-up his pants and moves away.'

		gs 'arousal', 'end'
		gs 'stat'

		act 'Move away':gt 'mod_Ibiza_club', 'inside'
	end
end

if $ARGS[0] = 'bar3':
	cla
	*clr
	menu_off = 1
	gs 'npcgeneratec', 0, 'stranger from the club', rand(18,26)
	gs 'boyStat', $npclastgenerated
	cumprecheck = 1
	gs 'cum_manage'
	'<center><b><font color="maroon">Bar</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barsex.jpg"></center>'
	t = rand(0, 2)

	gs 'arousal', 'vaginal', 10, 'sub', 'rough'
	gs 'stat'

	if $pantyworntype = 'none':
		'You sit down sideways on one of the stools. The guy unzips his cock and quickly enters your pussy. Both of you start to moan in pleasure and he kisses your neck gently. He roughly fucks you for several minutes before suddenly cumming deep inside your pussy'
		spafinloc = 0
		gs 'cuminsidereact'
	elseif t = 0:
		'You remove your panties and sit down sideways on one of the stools. The guy unzips his cock and quickly enters your pussy. Both of you start to moan in pleasure and he kisses your neck gently. He roughly fucks you for several minutes before suddenly cumming deep inside your pussy'
		spafinloc = 0
		gs 'cuminsidereact'
	elseif t = 1:
		spafinloc = 1
		'You remove your panties and sit down sideways on one of the stools. The guy unzips his cock and quickly enters your pussy. Both of you start to moan in pleasure and he kisses your neck gently. After about ten minutes of rough fucking he pulls out barely in time and cums on your pussy.'
	elseif t = 2:
		spafinloc = 4
		'You remove your panties and sit down sideways on one of the stools. The guy unzips his cock and quickly enters your pussy. Both of you start to moan in pleasure and he kisses your neck gently. About ten minutes later of rough fucking he cums on your ass check and you pull up your panties, still breathing heavy.'
	end
	killvar 't'

	gs 'cum_manage'

	gs 'arousal', 'end'
	gs 'stat'

	act 'Leave':gt 'mod_Ibiza_club', 'inside'
end

if $ARGS[0] = 'rape':
	cla
	*clr
	menu_off = 1
	SUB += 5
	rape += 1
	'<center><b><font color="maroon">Bar</font></b></center>'
	gs 'npcgeneratec', 0, 'rapist in the club', rand(18,26)
	gs 'boyStat', $npclastgenerated
	if rand(0, 1) = 0:
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barminet.jpg"></center>'
		'The guy notices you being heavily drunk and you couldn''t resits anything right now. He orders you to unbutton his pants, take out his cock and begin to suck on it. He grabs your hair and forces your to deepthroat it.'

		gs 'arousal', 'bj', 10, 'sub', 'deepthroat'
		gs 'stat'

		act 'Further':
			if rand(0, 1) = 0:
				cla
				*clr
				spafinloc = 12
				gs 'cum_manage'
				'<center><b><font color="maroon">Bar</font></b></center>'
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barcum.jpg"></center>'
				'A few minutes later he is finally done and pushes your head against his crotch, forcing you to swallow his cum. You can''t help but to enjoy the tase of his semen in your mouth.'

				gs 'dinSex', 'std_trigger_oral'
				gs 'arousal', 'end'
				gs 'stat'

				act 'Leave':gt 'mod_Ibiza_club', 'inside'
			else
				cla
				*clr
				cumprecheck = 1
				gs 'cum_manage'
				spafinloc = 4
				gs 'cum_manage'
				'<center><b><font color="maroon">Bar</font></b></center>'
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barsex.jpg"></center>'
				'The bloke takes his cock out of your mouth, tells you position yourself in the stool and then he begins to fuck you roughly. As you''re drunk you barely register anything, but you catch yourself moaning heavy. Not even ten minutes laters he takes his cock out of your pussy and cums on your ass.'

				gs 'dinSex', 'std_trigger'
				gs 'arousal', 'vaginal', 10, 'sub', 'rough'
				gs 'arousal', 'end'
				gs 'stat'

				act 'Leave':gt 'mod_Ibiza_club', 'inside'
			end
		end
	else
		gs 'cum_manage'
		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/barsex.jpg"></center>'
		'You are trying to send it, but your tongue drunk guy is braided and seeing that you are not able to resist, pulls out his cock turns you on a stool and saliva-moistened member enters your vagina, it tears you to force shoving his dick as deep as possible, and finally finishing the leaves.'

		gs 'dinSex', 'std_trigger'
		gs 'arousal', 'vaginal', 10, 'sub', 'rough'
		gs 'arousal', 'end'
		gs 'stat'

		act 'Leave':gt 'mod_Ibiza_club', 'inside'
	end
end

if $ARGS[0] = 'lezbsort':
	cla
	*clr
	menu_off = 1
	girl += 1
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/lezbsort.jpg"></center>'
	'She follows you into the womens bathroom and you lure her into one of the empty booths.'

	act 'Lick her':gt 'mod_Ibiza_club', 'lezbsort1'
	act 'Tell her to lick you':gt 'mod_Ibiza_club', 'lezbsort2'
	act 'Leave her':gt 'mod_Ibiza_club', 'tou'
end

if $ARGS[0] = 'lezbsort1':
	cla
	*clr
	menu_off = 1
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortukuni.jpg"></center>'
	'You remove her pants and sit down on the toilet. She happily does as you told her. She spreads her legs and you begin to lick her cunt furiously. She moans heavily and plays with her erect nipples. Some time later you make cum.'

	gs 'dinSex', 'std_trigger'
	gs 'arousal', 'cuni_give', 10, 'sub', 'lesbian'
	gs 'stat'

	if hour >= 15 or hour <= 3:act 'Now it''s your turn':gt 'mod_Ibiza_club', 'lezbsort2'

	gs 'arousal', 'end'
	gs 'stat'

	act 'Leave her':gt 'mod_Ibiza_club', 'tou'
end

if $ARGS[0] = 'lezbsort2':
	cla
	*clr
	menu_off = 1
	'<center><b><font color="maroon">WC</font></b></center>'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/sex/sortkuni.jpg"></center>'
	'You sit down on the toilet and move your feet up. "Lick it", you tell her. She seductively bites her lips and happily follows your orders. The woman parts your pussy lips and begins to lick your cunt. Every so often she switches between licking your pink flesh and your flower. She doesn''t stop until you cry out in pleasure and cum.'

	$orgasm_or = 'yes'
	gs 'dinSex', 'std_trigger_oral'
	gs 'arousal', 'cuni', 10, 'sub', 'lesbian'
	gs 'stat'

	if hour >= 15 or hour <= 3:act 'Lick her':gt 'mod_Ibiza_club', 'lezbsort1'

	gs 'arousal', 'end'
	gs 'stat'

	act 'Leave her':gt 'mod_Ibiza_club', 'tou'
end

if $ARGS[0] = 'vip':
	if vipcart = 0 and vipday ! daystart:
		'A security guard stops you from going any further. "I''m sorry, I can''t let your through, because you don''t own a VIP-Card. You can buy one for 10.000 <b>₽</b>, which will be good for 10 visits."'

		if money >= 10000:
			act 'Buy a VIP-Card (10,000 <b>₽</b>)':
				money -= 10000
				vipcart = 10
				vipday = daystart
				gt 'mod_Ibiza_vipclub', 'start'
			end
		end
	elseif vipcart > 0 and vipday ! daystart:
		act 'Go to the VIP-Area':
			vipcart -= 1
			vipday = daystart
			gt 'mod_Ibiza_vipclub', 'start'
		end
	end

	if vipday = daystart:act 'Return to the VIP area':gt 'mod_Ibiza_vipclub', 'start'

	act 'Leave him be and go away':gt 'mod_Ibiza_club', 'inside'
end

if $ARGS[0] = 'work':
	*clr & cla
	menu_off = 1
	frost = 0
	gs 'stat'
	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
	if pcs_danc > 30:
		clubr = rand (0,2)
	else
		clubr = rand (0,1)
	end
	if clubr = 0:
		'"OK <<$pcs_nickname>>, I want you to go around the city center and find some customers, bring them to the door and give the bouncer a nod so he knows they are yours. See you in an hour."'
		act 'Look for customers':
			*clr & cla
			minut += 60
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/down.jpg"></center>'
			'You spend an hour searching for customers in the city center.'
			act 'Return to Erik':
				cla
				*clr
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
				if pcs_apprnc > rand (80, 120):
					money += 300
					'You exceed Eriks expectations and find alot of customers, he pays you 300 <b>₽</b>.'
				elseif rand (0, 1) = 0:
					money += 200
					'Erik seems fairly happy and he pays you 200 <b>₽</b>.'
				else
					money += 100
					'You hardy found anyone, Erik doesn''t seem happy, but he pays you 100 <b>₽</b> for your efforts.'
				end
				if hour < 1 or hour >= 18:
					act 'Get another job from Erik':gt 'mod_Ibiza_club', 'work'
				end
				
				act 'Go to dancefloor':gt 'mod_Ibiza_club', 'inside'
			end
		end
	elseif clubr = 1:
		'"OK <<$pcs_nickname>>, I want you to go around the club getting people to try and hopefully switch to these spirits. You can''t go wrong here, just smile and give out free drinks."'
		'"No need to hold back with it, the suppliers are paying and if you''re curious and want to try it, don''t its horrible. I''ll see you back here in an hour."'
		act 'Get to work':
			*clr & cla
			minut += 60
			gs 'stat'
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club6.jpg"></center>'
			'You spend an hour giving away unpleasant shots.'
			act 'Return to Erik':
				*clr & cla 
				money += 200
				gs 'stat'
				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club11.jpg"></center>'
				'You hand Erik the empty bottles, he gives you 200 <b>₽</b>.'
				if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'mod_Ibiza_club', 'work'

				act 'Go to dancefloor':gt 'mod_Ibiza_club', 'inside'
			end
		end
	elseif clubr = 2:
		'"OK <<$pcs_nickname>>, we''re short a dancer, get in that cage there and dance. If you put on a good show you get a bonus."'
		act 'Get in the cage':
			if pcs_inhib < 60:inhib_exp += rand(1,2)
			*clr & cla
			minut += 60
			danc_exp += rand (1,3)
			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club12.jpg"></center>'
			if pcs_danc > rand (30, 100):
				money += 300
				'You put on a great show, getting a lot of attention and drawing people up to dance.'
				'Erik is very happy and pays you 300 <b>₽</b>.'
			else
				money += 200
				'You try hard, but you are mostly ignored by the customers.'
				'Erik thanks you for helping when he was short and pays you 200 <b>₽</b>, but doesn''t even mention your dancing.'
			end
			gs 'stat'
			if hour < 1 or hour >= 18: act 'Get another job from Erik':gt 'mod_Ibiza_club', 'work'

			act 'Go to dancefloor':gt 'mod_Ibiza_club', 'inside'
		end
	end
	killvar 'clubr'
end

--- mod_Ibiza_club ---------------------------------