TigorCat/locations/mod_public_WC_rab_random event.qsrc

# mod_public_WC_rab_random event
if $ARGS[0] = 'event1T':
	CLOSE ALL
	*clr & cla
	'Women, I need your help, come here'
	minut += 50
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
	gs 'arousal', 'voyeur', 3, 'sub'


	if pcs_humint <= 80 or pcs_intel <= 90:
		act 'Ok':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_sex','Toliksex'
			end
		end
		act 'No':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				brak += 2
				gt 'mod_public_WC_rab','spat1'
			end
		end
	end
	if pcs_humint > 80 or pcs_intel > 90:
		act 'Nod "yes"':
			slova -= 0
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_sex','Toliksex'
			end
		end
		act 'Nod "No"':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				brak += 2
				gt 'mod_public_WC_rab','spat1'
			end
		end
	end
end

if $ARGS[0] = 'event1V':
	CLOSE ALL
	*clr & cla
	'Oh, cool! I just think about you. Come here Betsi, I have a present for you!'
	minut += 50
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
	gs 'arousal', 'voyeur', 3, 'sub'
	if pcs_humint <= 80 or pcs_intel <= 90:
		act 'Ok':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_sex','Vaniasex'
			end
		end
		act 'No':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				brak += 2
				'"No, you will listen me, stupid cunt!", he grab me and threw on bed'
				gs 'pain', 1, 'hair', 'pull'
				gs 'stat'
				act 'continue': gt 'mod_public_WC_rab_sex','Vaniasex'
			end
		end
	end
	if pcs_humint > 80 or pcs_intel > 90:
		act 'Nod "yes"':
			slova -= 0
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_sex','Vaniasex'
			end
		end
		act 'Nod "No"':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				brak += 2
				'"No, you will listen me, stupid cunt!", he grab me and threw on bed'
				gs 'pain', 1, 'hair', 'pull'
				gs 'stat'
				act 'continue': gt 'mod_public_WC_rab_sex','Vaniasex'
			end
		end
	end
end

if $ARGS[0] = 'event1A':
	CLOSE ALL
	*clr & cla
	'Betsi, yo! Come here, I need you'
	minut += 50
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
	gs 'arousal', 'voyeur', 3, 'sub'


	if pcs_humint <= 80 or pcs_intel <= 90:
		act 'Ok':
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_sex','Artemsex'
			end
		end
		act 'No':
			if Alove >= 2: Alove -= 2
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				brak += 1
				gt 'mod_public_WC_rab','spat1'
			end
		end
	end
	if pcs_humint > 80 or pcs_intel > 90:
		act 'Nod "yes"':
			slova -= 0
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_sex','Artemsex'
			end
		end
		act 'Nod "No"':
			if Alove >= 2: Alove -= 2
			slova -= 1
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				brak += 1
				gt 'mod_public_WC_rab','spat1'
			end
		end
	end
end




if $ARGS[0] = 'event2V':
	CLOSE ALL
	*clr & cla
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/vb<<temp>>.mp4"></video></center>'
	'Vania grabs me and starts to fuck!'
	gs 'arousal', 'vaginal', rand(10,25), 'sub', 'rape'
	gs 'stat'
	act 'Continue':
		*clr & cla
		temp = rand(1,24)
		'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
		'Vania ends up in me'
		gs 'sweat', 'add', 15
		gs 'stat'
		spafinloc = 0
		cumnostd = 1
		cumarrkno = 1
		cumarrdel = 0
		sparrvol = 120
		cumarrcpt = 120
		gs 'cum_call', 'vaginal', 'Vania'
		gs 'cuminsidereact', 'Vania'
		gs 'cum_manage'
		gs 'stat'
		act 'Freshen up' : gt 'mod_public_WC_rab', 'tub1'
	end
end





if $ARGS[0] = 'event3V':
	CLOSE ALL
	*clr & cla
	temp = rand(1,9)
	'Vania grabbed me and started fucking on the kitchen!'
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/vk<<temp>>.mp4"></video></center>'
	gs 'arousal', 'vaginal', rand(10,25), 'sub', 'rape'
	gs 'stat'
	act 'Continue':
		*clr & cla
		temp = rand(1,24)
		'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
		'Vania ends up in me'
		gs 'sweat', 'add', 15
		gs 'stat'
		spafinloc = 0
		cumnostd = 1
		cumarrkno = 1
		cumarrdel = 0
		sparrvol = 120
		cumarrcpt = 120
		gs 'cum_call', 'vaginal', 'Vania'
		gs 'cuminsidereact', 'Vania'
		gs 'cum_manage'
		gs 'stat'
		act 'Freshen up' :
			'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/vk10.mp4"></video></center>'
			'After Vania goes out I decided to continue make food.'
			act ' continue': gt 'mod_public_WC_rab', 'lisnyk_dim'
		end
	end
end

if $ARGS[0] = 'event3T':
	CLOSE ALL
	*clr & cla
	temp = rand(1,9)
	'Drank Tolik, entered lodge and bend me!'
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/vk<<temp>>.mp4"></video></center>'
	gs 'arousal', 'vaginal', rand(30,45), 'sub', 'rape'
	gs 'stat'
	act 'Continue':
		*clr & cla
		temp = rand(1,6)
		if temp = 1: vlada += 1
		temp = rand(1,24)
		'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
		'Tolik always fucks for a long time and always completely pumps my vagina'
		gs 'sweat', 'add', 15
		spafinloc = 0
		cumnostd = 1
		cumarrkno =  1
		cumarrdel = 0
		sparrvol = 200
		cumarrcpt = 200
		gs 'cum_call', 'vaginal', 'Tolik'
		gs 'cuminsidereact', 'Tolik'
		gs 'cum_manage'
		gs 'stat'
		act 'Freshen up' :
			*clr & cla
			'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/vk10.mp4"></video></center>'
			'After Tolik goes out I decided to continue make food.'
			act 'continue': gt 'mod_public_WC_rab', 'lisnyk_dim'
		end
	end
end





if $ARGS[0] = 'event5T':
	CLOSE ALL
	*clr & cla
	'I have just put my head on the pillow when Tolik comes. "Betsi, you have job right now."'
	temp= rand(1,6)
	'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/c<<temp>>.mp4"></video></center>'
	if vlada - brak >= 10:
		temp = rand(1,3)
		if temp = 1:
			'I am in a good mood, and I am going to give you few words for that.'
		end
	end

	if pcs_humint <= 40 or pcs_intel <= 50:
		act 'Ok, Let''s help you':
			vlada += 1
			slova += 3
			slova -= 4
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_random event', 'event5Tsex'
			end
		end
		act 'It''s not my job':
			brak += 2
			slova -= 4
			willpowermax += rand(0,1)
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				cla
				'It''s your job, cunt!'
				'Tolik just hit me and starts to fuck'
				gs 'pain', 1, 'neck', 'spank'
				gs 'stat'
				act 'continue': gt 'mod_public_WC_rab_random event', 'event5Tsex'
			end
		end
	end
	if pcs_humint <= 60 or pcs_intel <= 70:
		act 'Ok, I''ll do':
			vlada += 1
			slova += 3
			slova -= 3
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt  'mod_public_WC_rab_random event', 'event5Tsex'
			end
		end
		act 'I am sleeping':
			brak += 1
			slova -= 3
			willpowermax += rand(0,1)
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				cla
				'Well, ok. You need to be healthy. Have a nice dreams.'
				act 'continue': gt 'mod_public_WC_rab', 'spat2'
			end
		end
	end
	if pcs_humint > 80 or pcs_intel > 90:
		act 'Nod "yes"':
			vlada += 1
			slova += 3
			slova -= 0
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt  'mod_public_WC_rab_random event', 'event5Tsex'
			end
		end
		act 'pretend to be sleeping':
			brak += 2
			slova -= 0
			willpowermax += rand(0,1)
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				cla
				'Tolik is looking at me during few minutes and then go away.'
				act 'continue': gt 'mod_public_WC_rab', 'spat2'
			end
		end
	end
end

if $ARGS[0] = 'event5V':
	CLOSE ALL
	*clr & cla
	'I have just put my head on the pillow when Vania comes. "Betsi, I need to fuck you."'
	temp= rand(1,6)
	'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/c<<temp>>.mp4"></video></center>'

	if pcs_humint <= 40 or pcs_intel <= 50:
		act 'Ok, Let''s help you':
			vlada += 2
			slova -= 4
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt 'mod_public_WC_rab_random event', 'event5Vsex'
			end
		end
		act 'Please don''t do it':
			brak += 2
			slova -= 4
			willpowermax += rand(0,1)
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				cla
				'Ow, shut up!'
				'Vania just hit me and starts to fuck'
				gs 'pain', 1, 'neck', 'spank'
				gs 'stat'
				act 'continue': gt 'mod_public_WC_rab_random event', 'event5Vsex'
			end
		end
	end
	if pcs_humint <= 60 or pcs_intel <= 70:
		act 'Ok, Let''s fuck':
			vlada += 2
			slova -= 3
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt  'mod_public_WC_rab_random event', 'event5Vsex'
			end
		end
		act 'I am sleeping':
			brak += 1
			slova -= 3
			willpowermax += rand(0,1)
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				cla
				'"Pff, I don''t care." Vania jump on my mattress and starts to bend me.'
				act 'continue': gt  'mod_public_WC_rab_random event', 'event5Vsex'
			end
		end
	end
	if pcs_humint > 80 or pcs_intel > 90:
		act 'Nod "yes"':
			vlada += 1
			slova += 3
			slova -= 0
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				gt  'mod_public_WC_rab_random event', 'event5Vsex'
			end
		end
		act 'pretend to be sleeping':
			brak += 2
			slova -= 0
			willpowermax += rand(0,1)
			if slova < 0:
				gt 'mod_public_WC_kara', '0sliv'
			else
				cla
				'Vania hit my cheeks few times and starts to spread my legs.'
				gs 'pain', 1, 'cheeks', 'slap'
				act 'continue': gt  'mod_public_WC_rab_random event', 'event5Vsex'
			end
		end
	end
end

if $ARGS[0] = 'event5A':
	CLOSE ALL
	*clr & cla
	'I have just put my head on the pillow when Artem comes.'
	if Alove >= 50:
		'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/Artem/Artem.jpg"></center>'
		'My love, I want to kiss you before sleep.'
		mood += 10

		act 'Kiss him':
			cla
			'He kisses me and goes out'
			Alove += rand(1,2)
			gs 'arousal', 'kiss', 10
			gs 'stat'
			act 'sleeps': gt 'bed', 'start'
		end
		act 'Honey, lets do 69.':
			minut += 10
			cla
			Alove += rand(1,5)
			'Yeah, let''s do this'
			act 'Start undressing Artem': gt 'mod_public_WC_rab_sex','Artemsecret69'

		end

		act 'Good you came, let''s fuck!.':
			cla
			minut += 10
			Alove += rand(4,7)
			act 'Jump on Artem' : gt 'mod_public_WC_rab_sex','Artemsecretsex'
		end

		act 'Artem, I want to ask you... Please make me free from this place.':
			'Of course, my love.'
			if week = 1 and hour > 6 and hour < 13:
				'I will lead you to the end of the forest near village Gadukino!'
				'Let''s go!'
				act 'Let''s go, my love':
					Alove -= 10
					minut += rand(45,80)
					gt 'gadforest', 'forest_outskirts'
				end
				act 'My love, we need some more time togather':
					Alove += rand(1,4)
					'He kisses me back'
					gs 'arousal', 'kiss', 20
					gs 'stat'
					gt $loc, $loc_arg
				end
			else
				'Next monday you will be free.'
				'I will lead you to the end of the forest near village Gadukino!'
			end
		end

	elseif Alove >= 30:
		'Honey, look! I want to fuck you with this monster!'
		mood += 5

		temp= rand(1,6)
		'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/c<<temp>>.mp4"></video></center>'

		if pcs_humint <= 40 or pcs_intel <= 50:
			act 'Artem, I am tired, may I just blow you?!':
				cla
				'Yes, I take it'
				act 'continue': gt 'mod_public_WC_rab_sex', 'Artemsex'
			end
			act 'Artem, better do 69!':
				cla
				'Ok, Let''s practice.'
				act 'continue': gt 'mod_public_WC_rab_sex', 'Artemsecret69'
			end
			act 'Ok, fuck me':
				gt 'mod_public_WC_rab_sex', 'event5Asex'
			end
			act 'I wouldn''t do it.':
				cla
				If Alove >= 0: Alove -= 1
				'"Ow Betsi, now I am sad." Artem goes out.'
				act 'continue': gt  'mod_public_WC_rab', 'spat2'
			end
		end
		if pcs_humint <= 60 or pcs_intel <= 70:
			act 'Ok, Let''s fuck':
				gt 'mod_public_WC_rab_sex', 'event5Asex'
			end
			act 'I am sleeping':
				If Alove >= 0: Alove -= 1
				cla
				'I see, good night, Honey.'
				act 'continue': gt  'mod_public_WC_rab', 'spat2'
			end
		end
		if pcs_humint > 80 or pcs_intel > 90:
			act 'Nod "yes"':
				gt 'mod_public_WC_rab_sex', 'event5Asex'
			end
			act 'pretend to be sleeping':
				'Artem said "sleep tight" and goes out.'
				act 'continue': gt  'mod_public_WC_rab', 'spat2'
			end
		end

	elseif Alove >= 20:
		'Betsi, I have something sweet for you!'
		temp= rand(1,6)
		'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/c<<temp>>.mp4"></video></center>'

		if pcs_humint <= 40 or pcs_intel <= 50:
			act 'Ok, fuck me':
				vlada += 1
				slova -= 1
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					gt 'mod_public_WC_rab_sex', 'Artemsex'
				end
			end
			act 'I wouldn''t do it.':
				If Alove >= 0: Alove -= 1
				brak += 1
				slova -= 2
				willpowermax += rand(0,1)
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					cla
					'"Ow Betsi, now I am sad." Artem goes out.'
					act 'continue': gt  'mod_public_WC_rab', 'spat2'
				end
			end
		end
		if pcs_humint <= 60 or pcs_intel <= 70:
			act 'Ok, Let''s fuck':
				vlada += 2
				slova -= 1
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					gt 'mod_public_WC_rab_sex', 'Artemsex'
				end
			end
			act 'I am sleeping':
				If Alove >= 0: Alove -= 1
				slova -= 1
				willpowermax += rand(0,1)
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					cla
					'I see, good night.'
					act 'continue': gt  'mod_public_WC_rab', 'spat2'
				end
			end
		end
		if pcs_humint > 80 or pcs_intel > 90:
			act 'Nod "yes"':
				gt 'mod_public_WC_rab_sex', 'Artemsex'
			end
			act 'pretend to be sleeping':
				'Artem said "sleep tight" and goes out.'
				act 'continue': gt  'mod_public_WC_rab', 'spat2'
			end
		end
	else
		'"Betsi, I need to fuck your mouth."'
		temp= rand(1,6)
		'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/c<<temp>>.mp4"></video></center>'

		if pcs_humint <= 40 or pcs_intel <= 50:
			act 'Ok, fuck me':
				vlada += 1
				slova -= 3
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					gt 'mod_public_WC_rab_sex', 'Artemsex'
				end
			end
			act 'I wouldn''t do it!':
				If Alove >= 0: Alove -= 1
				brak += 1
				slova -= 4
				willpowermax += rand(0,1)
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					cla
					'You must to!'
					'Artem hit me and put his dick in my mouth'
					gs 'pain', 2, 'neck', 'spank'
					gs 'stat'
					act 'continue': gt 'mod_public_WC_rab_sex', 'Artemsex'
				end
			end
		end
		if pcs_humint <= 60 or pcs_intel <= 70:
			act 'Ok, Let''s fuck':
				vlada += 2
				slova -= 3
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					gt 'mod_public_WC_rab_sex', 'Artemsex'
				end
			end
			act 'I am sleeping':
				If Alove >= 0: Alove -= 1
				brak += 1
				slova -= 3
				willpowermax += rand(0,1)
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					cla
					'Ohhh, weell, ok.'
					act 'continue': gt  'mod_public_WC_rab', 'spat2'
				end
			end
		end
		if pcs_humint > 80 or pcs_intel > 90:
			act 'Nod "yes"':
				vlada += 1
				slova += 3
				slova -= 0
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					gt 'mod_public_WC_rab_sex', 'Artemsex'
				end
			end
			act 'pretend to be sleeping':
				If Alove >= 0: Alove -= 1
				brak += 2
				slova -= 0
				willpowermax += rand(0,1)
				if slova < 0:
					gt 'mod_public_WC_kara', '0sliv'
				else
					cla
					'Artem said "fuck" and goes out.'
					act 'continue': gt  'mod_public_WC_rab', 'spat2'
				end
			end
		end
	end
end


if $ARGS[0] = 'event5Tsex':
	CLOSE ALL
	*clr & cla
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
	dick = 25
	npc_dick[$npclastgenerated] = dick
	gs 'npcgeneratec', 0, 'Tolik', 58
	$boy[0] = $npclastgenerated
	$boydesc[0] = $npc_usedname[$npclastgenerated]
	gs 'boyStat', $npclastgenerated
	temp = rand(1,10)
	'Tolik fucks me.'
	stat['vaginal'] += 1

	guy += 1

	gs 'arousal', 'vaginal', rand(20,40)
	gs 'pain', rand(2,4), 'vaginal', 'stretch'
	gs 'pain', rand(0,2), 'vaginal', 'tear'
	gs 'stat'
	act 'Beg to be soft':
		slova -= 2
		if slova < 0: gt 'mod_public_WC_kara', '0sliv'
		temp = rand (1,5)
		if temp = 1: brak += 1
		*nl
		'Silenc, bitch!'
	end
	act 'be silent':
		*clr & cla
		temp = rand(1,6)
		if temp = 1: vlada += 1
		temp = rand(1,24)
		'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
		'Tolik always fucks for a long time and always completely pumps my vagina'
		gs 'sweat', 'add', 15
		spafinloc = 0
		cumnostd = 1
		cumarrkno =  1
		cumarrdel = 0
		sparrvol = 200
		cumarrcpt = 200

		gs 'cuminsidereact', 'Tolik'
		gs 'cum_manage'
		gs 'stat'
		act 'Freshen up' : minut += 2 & gt  'mod_public_WC_rab', 'vana2'
		act 'Go sleep': gt 'bed', 'start'
	end
end

if $ARGS[0] = 'event5Vsex':
	CLOSE ALL
	*clr & cla
	dick = 17
	npc_dick[$npclastgenerated] = dick
	gs 'npcgeneratec', 0, 'Vania', 33
	$boy[0] = $npclastgenerated
	$boydesc[0] = $npc_usedname[$npclastgenerated]
	gs 'boyStat', $npclastgenerated
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
	'Vania with animal sounds fucks me'
	stat['vaginal'] += 1

	guy += 1

	gs 'arousal', 'vaginal', rand(5,15)
	gs 'stat'
	act 'Continue':
		*clr & cla
		temp = rand(1,24)
		'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
		'Vanya doesn''t fuck me, but jumps on my cunt and ends up in me'
		gs 'sweat', 'add', 15
		gs 'stat'
		spafinloc = 0
		cumnostd = 1
		cumarrkno = 1
		cumarrdel = 0
		sparrvol = 120
		cumarrcpt = 120

		gs 'cuminsidereact', 'Vania'
		gs 'cum_manage'
		gs 'stat'
		act 'Freshen up' : minut += 2 & gt 'mod_public_WC_rab', 'vana2'
		act 'Go sleep': gt 'bed', 'start'
	end
end

if $ARGS[0] = 'event5Asex':
	CLOSE ALL
	*clr & cla
	dick = 18
	npc_dick[$npclastgenerated] = dick
	gs 'npcgeneratec', 0, 'Artem', 26
	$boy[0] = $npclastgenerated
	$boydesc[0] = $npc_usedname[$npclastgenerated]
	gs 'boyStat', $npclastgenerated
	temp = rand(1,2)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
	'I''ll hop on Artem!'
	stat['vaginal'] += 1

	guy += 1

	gs 'arousal', 'vaginal', rand(10,20)
	gs 'stat'
	temp = rand(1,4)
	if temp = 1: Alove += 1
	act 'Continue pleasure':
		*clr & cla
		temp = rand(1,24)
		'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
		'Oh yes!!! A-a-Artem!'
		gs 'sweat', 'add', 15
		spafinloc = 0
		cumnostd = 1
		cumarrkno =  1
		sparrvol = 20
		cumarrcpt = 20

		gs 'cuminsidereact', 'Artem'
		gs 'cum_manage'
		gs 'stat'
		act 'Freshen up' : minut += 2 & gt 'mod_public_WC_rab', 'vama2'
		act 'Go sleep': gt 'bed', 'start'
	end
end


if $ARGS[0] = 'event7':
	CLOSE ALL
	*clr & cla
	gs 'npcgeneratec', 0, 'Vania', 33
	$boy[0] = $npclastgenerated
	$boydesc[0] = $npc_usedname[$npclastgenerated]
	gs 'boyStat', $npclastgenerated
	temp = rand(1,10)
	if temp <= 4:
		'Vania with laugting run into the lodge and comes over me.'
		'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/cumread1.mp4"></video></center>'
		mood -= 5
		dick = 17
		npc_dick[$npclastgenerated] = dick
		gs 'arousal', 'voyeur', rand(2,5), 'sub', 'humiliation'
		gs 'stat'
		gs 'npcgeneratec', 0, 'Vania', 33
		gs 'boyStat', $npclastgenerated
		spafinloc = 7
		gs 'cum_manage'
		gs 'npcgeneratec', 0, 'Vania', 33
		gs 'boyStat', $npclastgenerated
		spafinloc = 11
		gs 'cum_manage'
		gs 'npcgeneratec', 0, 'Vania', 33
		gs 'boyStat', $npclastgenerated
		spafinloc = 10
		gs 'cum_manage'
		gs 'npcgeneratec', 0, 'Vania', 33
		gs 'boyStat', $npclastgenerated
		spafinloc = 13
		gs 'cum_manage'
		gs 'npcgeneratec', 0, 'Vania', 33
		gs 'boyStat', $npclastgenerated
		spafinloc = 16
		gs 'cum_manage'
		act 'Continue': gt 'mod_public_WC_rab', 'lisnyk_dim'
	elseif temp <= 7:
		'Vania comes to me with unzip panth and gives me his dick. I started to stroke it and blow while reading.'
		'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/blowread1.mp4"></video></center>'
		mood -= 5
		dick = 17
		npc_dick[$npclastgenerated] = dick
		pcs_throat += rand(0,1)
		stat['bj'] += rand(0,1)
		stat['hj'] += rand(0,1)
		gs 'arousal', 'bj', rand(5,8), 'sub'
		gs 'arousal', 'hj', rand(5,8), 'sub'
		gs 'stat'
		act 'Continue "reading"':
			*clr & cla
			temp = rand(1,2)
			if temp = 1:
				'Vania ends up in my throat. I haven''t read to the end'
				temp = rand(1,32)
				'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
				swallow  += 1

				spafinloc = 12

				gs 'sweat', 'add', 5

				gs 'cum_manage'
				gs 'stat'
				act 'Freshen up' : gt 'mod_public_WC_rab', 'lisnyk_dim'
			else
				'Vania cums all over my face. I haven''t read to the end'
				temp = rand(1,17)
				'<center><video autoplay loop src="mod/public_WC/lisrab/vania/2/c (<<temp>>).mp4"></video></center>'
				facial  += 1

				spafinloc = 11
				gs 'sweat', 'add', 5

				gs 'cum_manage'


				spafinloc = 16
				gs 'cum_manage'

				spafinloc = 15
				gs 'cum_manage'
				gs 'stat'
				act 'Freshen up' : gt 'mod_public_WC_rab', 'lisnyk_dim'
			end
		end
	else
		'Vania comes to me and without any talk just seat me on him... Anyway I want to read!.'
		'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/sexread1.mp4"></video></center>'
		stat['vaginal'] += 1

		guy += 1
		mood -= 5
		dick = 17
		npc_dick[$npclastgenerated] = dick

		gs 'arousal', 'vaginal', rand(20,40)
		act 'Continue "reading"':
			*clr & cla
			temp = rand(1,24)
			'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
			'Vanya doesn''t fuck me, but jumps on my cunt and ends up in me'
			gs 'sweat', 'add', 15
			gs 'stat'
			spafinloc = 0
			cumnostd = 1
			cumarrkno = 1
			cumarrdel = 0
			sparrvol = 120
			cumarrcpt = 120

			gs 'cuminsidereact', 'Vania'
			gs 'cum_manage'
			gs 'stat'
			act 'Freshen up' : gt 'mod_public_WC_rab', 'lisnyk_dim'
		end
	end
end

if $ARGS[0] = 'event8':
	CLOSE ALL
	*clr & cla
	if Tolik = 1 or Tolik = 3:
		if hour <= 4:
			brak += 5
			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/tolik/tolik.jpg"></center>'
			'Betsi, It''s not funy! I was sleeping. I need to punish you, don''t I?'
			if pcs_humint <= 40 or pcs_intel <= 50:
				act 'Yes, you need':
					slova -= 3
					vlada += 2
					slova += rand(1,5)
					if slova < 0:
						gt 'mod_public_WC_kara', '0sliv'
					else
						gt 'mod_public_WC_kara','vtecha'
					end
				end
				act 'No, plese.':
					slova -= 2
					brak += 1
					if slova < 0:
						gt 'mod_public_WC_kara', '0sliv'
					else
						cla
						'Anyway I need'
						act 'continue':
							*clr & cla
							'He called all guys, and they started to fuck me'
							gs 'arousal', 'vaginal', rand(5,10), 'sub', 'group', 'gangbang'
							gs 'arousal', 'anal', rand(5,10), 'sub', 'group', 'gangbang'
							gs 'arousal', 'bj', rand(5,10), 'sub', 'group', 'gangbang'
							gs 'stat'
							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_1.jpg"></center>'
							wait 500
							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_2.jpg"></center>'
							wait 500
							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_3.jpg"></center>'
							wait 500
							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_4.jpg"></center>'
							wait 500
							'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_5.jpg"></center>'
							act 'guys cum all over me':
								*clr & cla
								'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_10.jpg"></center>'
								'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_11.jpg"></center>'
								temp = rand(1,24)
								'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
								'Tolik always fucks for a long time and always completely pumps my vagina'
								gs 'sweat', 'add', 15
								gs 'stat'
								spafinloc = 0
								cumnostd = 1
								cumarrkno =  1
								cumarrdel = 0
								sparrvol = 200
								cumarrcpt = 200

								gs 'cuminsidereact', 'Tolik'
								gs 'cum_manage'
								gs 'stat'

								gs 'npcgeneratec', 0, 'Vania', 33
								gs 'boyStat', $npclastgenerated
								spafinloc = 3
								cumnostd = 1
								gs 'cum_manage'
								gs 'npcgeneratec', 0, 'Vania', 33
								gs 'boyStat', $npclastgenerated
								spafinloc = 4
								cumnostd = 1
								gs 'cum_manage'
								gs 'npcgeneratec', 0, 'Vania', 33
								gs 'boyStat', $npclastgenerated
								spafinloc = 14
								cumnostd = 1
								gs 'cum_manage'
								gs 'npcgeneratec', 0, 'Vania', 33
								gs 'boyStat', $npclastgenerated
								spafinloc = 15
								cumnostd = 1
								gs 'cum_manage'
								gs 'stat'

								gs 'npcgeneratec', 0, 'Artem', 26
								gs 'boyStat', $npclastgenerated
								cumnostd = 1
								spafinloc = 12
								gs 'sweat', 'add', 5

								gs 'cum_manage'
								gs 'stat'
								gs 'npcgeneratec', 0, 'Artem', 26
								gs 'boyStat', $npclastgenerated
								cumnostd = 1
								spafinloc = 11
								gs 'sweat', 'add', 5

								gs 'cum_manage'
								gs 'stat'
								dick = 25
								npc_dick[$npclastgenerated] = dick



								swallow  += 1
								facial += 1

								guy += 3
								gang += 1
								rape += 1
								stat['bj'] += 1
								stat['vaginal'] += 1
								stat['anal'] += 1
								gs 'bras', 'remove'
								gs 'panties', 'remove'
								gs 'stat'
								act 'Freshen up' : gt $loc, $loc_arg
							end
						end
					end
				end
			end
			if pcs_humint <= 60 or pcs_intel <= 70:
				act 'punish me.':
					slova -= 2
					vlada += 2
					slova += rand(1,5)
					if slova < 0:
						gt 'mod_public_WC_kara', '0sliv'
					else
						gt 'mod_public_WC_kara','vtecha'
					end
				end
				act 'I see your bulge, want to help.':
					slova -= 6
					if slova < 0:
						gt 'mod_public_WC_kara', '0sliv'
					else
						*clr & cla
						'Well, alright. Good enought'
						temp = rand(1,2)
						'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
						act 'go to Tolik':

							temp = rand(1,2)
							'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
							dick = 25
							npc_dick[$npclastgenerated] = dick
							gs 'npcgeneratec', 0, 'Tolik', 58
							$boy[0] = $npclastgenerated
							$boydesc[0] = $npc_usedname[$npclastgenerated]
							gs 'boyStat', $npclastgenerated
							temp = rand(1,10)
							'Tolik fucks me.'
							stat['vaginal'] += 1

							guy += 1

							gs 'arousal', 'vaginal', rand(20,40)
							gs 'pain', rand(2,4), 'vaginal', 'stretch'
							gs 'pain', rand(0,2), 'vaginal', 'tear'
							gs 'stat'
							act 'Beg to be soft':
								slova -= 2
								if slova < 0: gt 'mod_public_WC_kara', '0sliv'
								temp = rand (1,5)
								if temp = 1: brak += 1
								*nl
								'Silenc, bitch!'
							end
							act 'be silent':
								*clr & cla
								temp = rand(1,24)
								'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
								'Tolik always fucks for a long time and always completely pumps my vagina'
								gs 'sweat', 'add', 15
								spafinloc = 0
								cumnostd = 1
								cumarrkno =  1
								cumarrdel = 0
								sparrvol = 200
								cumarrcpt = 200

								gs 'cuminsidereact', 'Tolik'
								gs 'cum_manage'
								gs 'stat'
								act 'Freshen up':
									minut += 2
									gt  'mod_public_WC_rab', 'spat1'
								end
							end
						end
					end
				end
			end
			if pcs_humint > 80 or pcs_intel > 90:
				act 'Nod "yes"':
					vlada += 2
					slova += rand(2,5)
					gt 'mod_public_WC_kara','vtecha'
				end
				act 'Point to a bulge in the bed':
					*clr & cla
					'Well, alright. Good enought'
					temp = rand(1,2)
					'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/lijko<<temp>>.mp4"></video></center>'
					act 'go to Tolik':

						temp = rand(1,2)
						'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/5/sex<<temp>>.mp4"></video></center>'
						dick = 25
						npc_dick[$npclastgenerated] = dick
						gs 'npcgeneratec', 0, 'Tolik', 58
						$boy[0] = $npclastgenerated
						$boydesc[0] = $npc_usedname[$npclastgenerated]
						gs 'boyStat', $npclastgenerated
						temp = rand(1,10)
						'Tolik fucks me.'
						stat['vaginal'] += 1

						guy += 1

						gs 'arousal', 'vaginal', rand(20,40)
						gs 'pain', rand(2,4), 'vaginal', 'stretch'
						gs 'pain', rand(0,2), 'vaginal', 'tear'
						gs 'stat'
						act 'Beg to be soft':
							slova -= 2
							if slova < 0: gt 'mod_public_WC_kara', '0sliv'
							temp = rand (1,5)
							if temp = 1: brak += 1
							*nl
							'Silenc, bitch!'
						end
						act 'be silent':
							*clr & cla
							temp = rand(1,24)
							'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
							'Tolik always fucks for a long time and always completely pumps my vagina'
							gs 'sweat', 'add', 15
							spafinloc = 0
							cumnostd = 1
							cumarrkno =  1
							cumarrdel = 0
							sparrvol = 200
							cumarrcpt = 200

							gs 'cuminsidereact', 'Tolik'
							gs 'cum_manage'
							gs 'stat'
							act 'Freshen up':
								minut += 2
								gt  'mod_public_WC_rab', 'spat1'
							end
						end
					end
				end
			end

		else
			'Good music, Betsi. But if you choose to spent time for music, it''s better to do something more useful! Guys Betsi needs us.'
			brak += 1
			'In fer ninutes all rednecks come.'
			minut += 3
			'Shit, I must listen them.'
			'Betsi, get undressed! Now!'
			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_0.jpg"></center>'
			gs 'arousal', 'flash', 5, 'sub', 'exhibitionism'
			gs 'stat'
			act 'continue':
				*clr & cla
				'They fucks me: fill all my holes'
				gs 'arousal', 'vaginal', rand(5,10), 'sub', 'group', 'gangbang'
				gs 'arousal', 'anal', rand(5,10), 'sub', 'group', 'gangbang'
				gs 'arousal', 'bj', rand(5,10), 'sub', 'group', 'gangbang'
				gs 'stat'
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_1.jpg"></center>'
				wait 500
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_2.jpg"></center>'
				wait 500
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_3.jpg"></center>'
				wait 500
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_4.jpg"></center>'
				wait 500
				'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_5.jpg"></center>'
				act 'guys cum all over me':
					*clr & cla
					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_10.jpg"></center>'
					'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/3gop/s_11.jpg"></center>'
					temp = rand(1,24)
					'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
					'Tolik always fucks for a long time and always completely pumps my vagina'
					gs 'sweat', 'add', 15
					gs 'stat'
					spafinloc = 0
					cumnostd = 1
					cumarrkno =  1
					cumarrdel = 0
					sparrvol = 200
					cumarrcpt = 200

					gs 'cuminsidereact', 'Tolik'
					gs 'cum_manage'
					gs 'stat'

					gs 'npcgeneratec', 0, 'Vania', 33
					gs 'boyStat', $npclastgenerated
					spafinloc = 3
					cumnostd = 1
					gs 'cum_manage'
					gs 'npcgeneratec', 0, 'Vania', 33
					gs 'boyStat', $npclastgenerated
					spafinloc = 4
					cumnostd = 1
					gs 'cum_manage'
					gs 'npcgeneratec', 0, 'Vania', 33
					gs 'boyStat', $npclastgenerated
					spafinloc = 14
					cumnostd = 1
					gs 'cum_manage'
					gs 'npcgeneratec', 0, 'Vania', 33
					gs 'boyStat', $npclastgenerated
					spafinloc = 15
					cumnostd = 1
					gs 'cum_manage'
					gs 'stat'

					gs 'npcgeneratec', 0, 'Artem', 26
					gs 'boyStat', $npclastgenerated
					cumnostd = 1
					spafinloc = 12
					gs 'sweat', 'add', 5

					gs 'cum_manage'
					gs 'stat'
					gs 'npcgeneratec', 0, 'Artem', 26
					gs 'boyStat', $npclastgenerated
					cumnostd = 1
					spafinloc = 11
					gs 'sweat', 'add', 5

					gs 'cum_manage'
					gs 'stat'
					dick = 25
					npc_dick[$npclastgenerated] = dick



					swallow  += 1
					facial += 1

					guy += 3
					gang += 1
					rape += 1
					stat['bj'] += 1
					stat['vaginal'] += 1
					stat['anal'] += 1
					gs 'bras', 'remove'
					gs 'panties', 'remove'
					gs 'stat'
					act 'Freshen up' : gt $loc, $loc_arg
				end
			end
		end
	elseif Vania = 1 or Vania = 3:
		if hour >= 7 and hour <= 14:
			'WTF! Do you blind? I am trying to sleep here, cunt!'
			'You are gonna regret that'
			'Vania comes to me and without any asking bend me and starts to fuck'
		else
			'During my play, I found Vanias'' dick'
			'"Good, Betsi, now we are going to fuck". Without any asking Vania bend me and starts to fuck'
			temp = rand(1,2)
			'<center><img <<$set_imgh>> src="mod/public_WC/lisrab/r_events/8/dick<<temp>>.jpg"></center>'
		end
		temp= rand(1,3)
		'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/f<<temp>>.mp4"></video></center>'
		stat['vaginal'] += 1

		guy += 1
		dick =17

		gs 'arousal', 'vaginal', rand(5,15)
		gs 'stat'
		act 'Continue':
			*clr & cla
			temp = rand(1,24)
			'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
			'Vanya doesn''t fuck me, but jumps on my cunt and ends up in me'
			gs 'sweat', 'add', 15
			gs 'stat'
			spafinloc = 0
			cumnostd = 1
			cumarrkno = 1
			cumarrdel = 0
			sparrvol = 120
			cumarrcpt = 120

			gs 'cuminsidereact', 'Vania'
			gs 'cum_manage'
			gs 'stat'
			act 'Freshen up' : gt $loc, $loc_arg
		end
	elseif Artem = 1 or Artem = 3:
		'Do you have nothing to do? If so, here is job for you.'
		temp= rand(1,6)
		'<center><video autoplay loop src="mod/public_WC/lisrab/need_help/c<<temp>>.mp4"></video></center>'
		act 'continue playing':
			instrmusic_exp += rand(0,3)
			pcs_mood += 5
			minut += rand(15,35)
			'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/8/b10.mp4"></video></center>'
			if  pcs_instrmusic >= 100:
				'Music fascinated me and took me to another world, music conveyed harmony to everyone around'
				pcs_mood += 10
				brak -= 3
			elseif pcs_instrmusic >= 70:
				'Music comforted my hearing and pleasantly pleased my soul'
				pcs_mood += 5
				brak -= 2
			elseif pcs_instrmusic >= 40:
				'The music is quite entertaining'
				brak -= 1
			elseif pcs_instrmusic >= 20:
				'I can call it music'
			else
				'The cacophony of sounds is cheered me up a little bit.'
				pcs_mood -= 3
				brak += 1
			end
			gs 'stat'

			stat['bj'] += 2
			gs 'arousal', 'bj', rand(5,10), 'sub', 'humiliation', 'rough', 'deepthroat'
			gs 'stat'
			temp = rand(1,3)
			if temp = 1:
				Alove += 1
			end
			act 'Artem are going to cum':
				*clr & cla
				temp = rand(1,32)
				'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
				'Artem cums in my throat'
				swallow  += 1

				spafinloc = 12

				gs 'sweat', 'add', 5

				gs 'cum_manage'
				gs 'stat'
				act 'Freshen up' : gt 'mod_public_WC_rab', 'spat1'
			end
		end
		act 'start sucking':
			temp = rand(1,3)
			'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/8/b<<temp>>.mp4"></video></center>'

			stat['bj'] += 2
			gs 'arousal', 'bj', rand(5,10), 'sub', 'humiliation', 'rough', 'deepthroat'
			gs 'stat'
			temp = rand(1,3)
			if temp = 1:
				Alove += 1
			end
			act 'Artem are going to cum':
				*clr & cla
				temp = rand(1,32)
				'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
				'Artem cums in my throat'
				swallow  += 1

				spafinloc = 12

				gs 'sweat', 'add', 5

				gs 'cum_manage'
				gs 'stat'
				act 'Freshen up' : gt 'mod_public_WC_rab', 'spat1'
			end
		end
	end
end




if $ARGS[0] = 'teaseread':
	CLOSE ALL
	*clr & cla
	'While I am reading Artem enters the lodge. He silently comes closer and put his hand into my panty, then starts to rub my clit.'
	'<center><video autoplay loop src="mod/public_WC/lisrab/alove/tease/teaseread.mp4"></video></center>'
	gs 'arousal', 'foreplay', 5
	gs 'stat'
	'Obviously he wants more'


	If Alove >= 10 and Vania = 0 and Tolik = 0:
		act 'Honey, better use your toungue.':
			minut += 10
			Alove += rand(1,5)
			cla
			temp = rand (0,100)
			'Yes, let''s do this!'
			act 'Start undressing': gt 'mod_public_WC_rab_sex','Artemsecretcuni'
		end
	end
	If Alove >= 20 and Vania = 0 and Tolik = 0:
		act 'Kiss him':
			minut += 4
			'He kisses me back'
			Alove += rand(0,1)
			gs 'arousal', 'kiss', 10
			gs 'stat'
		end
		act 'Honey, lets do 69.':
			minut += 10
			cla
			'Yes, let''s do this'
			act 'Start undressing Artem': gt 'mod_public_WC_rab_sex','Artemsecret69'
		end
	end

	If Alove >= 30 and Vania = 0 and Tolik = 0:
		act 'Fuck me!':
			minut += 10
			Alove += rand(4,7)
			act 'Jump on Artem' : gt 'mod_public_WC_rab_sex','Artemsecretsex'
		end
	elseIf Alove >= 30 and Avirgin = 0:
		If hour <= 10 or hour >= 19:
			act 'Let''s go to the storage and fuck! I know there are nobody.':
				minut += 10
				Alove += rand(4,7)
				*clr & cla
				dick = 18
				npc_dick[$npclastgenerated] = dick
				gs 'npcgeneratec', 0, 'Artem', 26
				$boy[0] = $npclastgenerated
				$boydesc[0] = $npc_usedname[$npclastgenerated]
				gs 'boyStat', $npclastgenerated
				temp = rand(1,10)
				'<center><video autoplay loop src="mod/public_WC/lisrab/alove/tease/skladsex.mp4"></video></center>'
				'I''ll hop on Artem!'
				stat['vaginal'] += 1

				guy += 1
				dick = 18
				npc_dick[$npclastgenerated] = dick

				gs 'arousal', 'vaginal', rand(10,20)
				gs 'stat'
				temp = rand(1,4)
				if temp = 1: Alove += 1
				act 'Continue pleasure':
					*clr & cla
					temp = rand(1,24)
					'<center><video autoplay loop src="mod/public_WC/lisrab/tolik/2/tolik<<temp>>.mp4"></video></center>'
					'Oh yes!!! Artem, I''m so glad you decided!'
					gs 'sweat', 'add', 15
					spafinloc = 0
					cumnostd = 1
					cumarrkno =  1
					sparrvol = 20
					cumarrcpt = 20

					gs 'cuminsidereact', 'Artem'
					gs 'cum_manage'
					gs 'stat'
					act 'Freshen up' : gt 'mod_public_WC_rab', 'sklad'
				end
			end
		end
	end
end

if $ARGS[0] = 'event10':
	CLOSE ALL
	*clr & cla
	'Artem knocks me down and rushes at me. He starts to fuck my mouth'
	dick = 18
	npc_dick[$npclastgenerated] = dick
	gs 'npcgeneratec', 0, 'Artem', 26
	$boy[0] = $npclastgenerated
	$boydesc[0] = $npc_usedname[$npclastgenerated]
	temp = rand (1,37)
	'<center><video autoplay loop src="mod/public_WC/lisrab/r_events/artemdvir.mp4"></video></center>'
	'Artem starts fuck my mouth'

	stat['bj'] += 2
	gs 'arousal', 'bj', rand(5,10), 'sub', 'humiliation', 'rough', 'deepthroat', 'rape'
	gs 'stat'
	act 'Continue suffering':
		*clr & cla
		temp = rand(1,32)
		'<center><video autoplay loop src="mod/public_WC/lisrab/Artem/2/b (<<temp>>).mp4"></video></center>'
		'Artem cums in my throat'

		gs 'boyStat', $npclastgenerated
		spafinloc = 12
		gs 'cum_manage'

		gs 'sweat', 'add', 5

		gs 'stat'
		act 'Stand up' : gt 'mod_public_WC_rab_DVIR', 'dvir'
	end
end

--- mod_public_WC_rab_random event ---------------------------------