glife/locations/svidan

# svidan

if $ARGS[0] = 'start':
	if svidanieA = 1 and svidanieB = 1 and svidanieC = 1:

		pcs_lovers[1] = 0
		pcs_lovers[2] = 0
		pcs_lovers[3] = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		pcs_mood = 0
		pcs_willpwr -= 30
		'<<$loverdesc[1]>>, <<$loverdesc[2]>> and <<$loverdesc[3]>> come up to you, then look at each other in bewilderment. They understand everything and go. <<$loverdesc[3]>> throws you a goodbye "Well, you whore!"'

		act 'Leave.':dynamic $brodilr

		exit
	elseif svidanieA = 1 and svidanieB = 1 and svidanieC = 0:
		loverrelation[lover_number] -= 1

		pcs_lovers[2] = 0
		!!pcs_lovers[3] = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		pcs_mood -= 10
		pcs_willpwr -= 20
		'<<$loverdesc[1]>> and <<$loverdesc[2]>> come up to you, then look at each other in bewilderment. <<$loverdesc[1]>> asked what kind of bloke you pinned. At that <<$loverdesc[2]>> is outraged that he''s your guy and not this half-wit.'

		if loverrelation[1] > 0:'<<$loverbody[1]>> <<$loverbod[1]>> <<$loverdesc[1]>> punches his rival''s face. <<$loverdesc[2]>> falls to the ground with a broken face. <<$loverdesc[1]>> defeated opponent says, "see you again beside my girls all fucking kill."'
		if loverrelation[1] <= 0:'<<$loverdesc[1]>> spits angrily on the ground and says. "Fuck you on the dick, whore." throwing flowers and leaves in the trash. <<$loverdesc[2]>> looks at what is happening and leaves without saying a word.'

		act 'Leave.':dynamic $brodilr

		exit
	elseif svidanieA = 1 and svidanieB = 0 and svidanieC = 1:
		loverrelation[1] -= 1
		!!pcs_lovers[2] = 0

		pcs_lovers[3] = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		pcs_mood -= 10
		pcs_willpwr -= 20
		'<<$loverdesc[1]>> and <<$loverdesc[3]>> come up to you, then look at each other in bewilderment. <<$loverdesc[1]>> asked what the dick from the mountain to you pinned. At that <<$loverdesc[3]>> is outraged that he''s your guy and not this half-wit.'

		if loverrelation[1] > 0:'<<$loverbody[1]>> <<$loverbod[1]>> <<$loverdesc[1]>> punches his rival''s face. <<$loverdesc[3]>> falls to the ground with a broken face. <<$loverdesc[1]>> defeated opponent says, "see you again beside my girls all fucking kill."'
		if loverrelation[1] <= 0:'<<$loverdesc[1]>> spits angrily on the ground and says. "Fuck you on the dick, whore." throwing flowers and leaves in the trash. <<$loverdesc[3]>> looks at what is happening and leaves without saying a word.'

		act 'Leave.':dynamic $brodilr

		exit
	elseif svidanieA = 0 and svidanieB = 1 and svidanieC = 1:
		loverrelation[2] -= 1
		!!pcs_lovers[2] = 0

		pcs_lovers[3] = 0
		svidanieA = 0
		svidanieB = 0
		svidanieC = 0
		pcs_mood -= 10
		pcs_willpwr -= 20
		'<<$loverdesc[2]>> and <<$loverdesc[3]>> come up to you, then look at each other in bewilderment. <<$loverdesc[2]>> asked what the dick from the mountain to you pinned. At that <<$loverdesc[3]>> is outraged that he''s your guy and not this half-wit.'

		if loverrelation[2] > 0:'<<$loverbody[2]>> <<$loverbod[2]>> <<$loverdesc[2]>> punches his rival''s face. <<$loverdesc[3]>> falls to the ground with a broken face. <<$loverdesc[2]>> defeated opponent says, "see you again beside my girls all fucking kill."'
		if loverrelation[2] <= 0:'<<$loverdesc[2]>> spits angrily on the ground and says. "Fuck you on the dick, whore." throwing flowers and leaves in the trash. <<$loverdesc[3]>> looks at what is happening and leaves without saying a word.'

		act 'Leave.':dynamic $brodilr

		exit
	elseif svidanieA = 1 and svidanieB = 0 and svidanieC = 0:

		loversday[1] += 1
		svidanieA = 0
		pcs_willpwr += rand(5, 10)
		pcs_mood += rand(5, 10)

		if harakBoy = 0:
			if pcs_makeup <= 2 and pcs_makeup > 0:loverrelation[lover_number] += 1
			if pcs_makeup = 4:loverrelation[lover_number] -= 1
		elseif harakBoy = 1:
			if pcs_makeup <= 3 and pcs_makeup > 0:loverrelation[lover_number] += 1
			if pcs_makeup = 4:loverrelation[lover_number] -= 1
		elseif harakBoy = 2:
			if pcs_makeup = 4:loverrelation[lover_number] += 1
			if pcs_makeup <= 2 and pcs_makeup > 0:loverrelation[lover_number] -= 1
		end

		'<<$loverbody[1]>> <<$loverbod[1]>> <<$loverdesc[1]>> comes up to you and kisses you welcoming.'

		if loversday[1] >= 30:
			giftrand = rand(0, 2)

			if giftrand <= finance[lover_number]:
				gift = rand(loverrelation[lover_number] * 10, loverrelation[lover_number] * 50)
				money += gift
				'<<$loverdesc[1]>> made a gift to you <<gift>> <b>₽</b>.'
			end
		end

		act 'Kiss.':gt 'svidan', 'a'
			act 'Avoid kissing.':
			cla
			loverrelation[lover_number] -= 1
			gt 'svidan', 'a'
		end

		exit
	elseif svidanieA = 0 and svidanieB = 1 and svidanieC = 0:

		loversday[2] += 1
		svidanieB = 0
		'<<$loverbody[2]>> <<$loverbod[2]>> <<$loverdesc[2]>> comes up to you and kisses you welcoming.'

		act 'Kiss.':gt 'svidan', 'b'

		exit
	elseif svidanieA = 0 and svidanieB = 0 and svidanieC = 1:

		loversday[3] += 1
		svidaniec = 0
		'<<$loverbody[3]>> <<$loverbod[3]>> <<$loverdesc[3]>> comes up to you and kisses you welcoming.'

		act 'Kiss.':gt 'svidan', 'c'

		exit
	end
end

if $ARGS[0] = 'a':
	if finance[lover_number] = 0:gt 'svi', 'poor'
	if finance[lover_number] = 1:gt 'svi', 'norm'
	if finance[lover_number] = 2:gt 'svi', 'reach'
end

if $ARGS[0] = 'kustA':
	*clr
	minut += 20
	'You hid in the corner and ukromnoi <<$loverdesc[lover_number]>> pulled out his penis.'

	act 'Take by mouth':
		cla
		*clr
		loverrelation[lover_number] += 1


		if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

		stat['bj'] += 1
		dick = loverdick[lover_number]
		harakBoy = haraklover[lover_number]
		gs 'boyStat', $lover[lover_number]
		'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj24.jpg"></center>'
		'You kneel and <<$loverdesc[lover_number]>> pulled out his penis and offered it to your face.'
		
		gs 'arousal', 'bj' 10, 'sub'
		gs 'stat'
		
		gs 'oral', 'start'

		act 'Continue to suck.':
			cla
			*clr
			swallow += 1
			spafinloc = 12
			gs 'cum_manage'
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$loverdesc[lover_number]>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'
			
			gs 'arousal', 'bj' 20, 'sub'
			gs 'arousal', 'end'
			gs 'stat'

			act 'Leave.':
				cla
				dynamic $brodilr
			end
		end

		act 'Remove the mouth.':
			cla
			*clr


			if haraklover[lover_number] = 0:
				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
				'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
				
				gs 'arousal', 'end'
				gs 'stat'
				
			elseif haraklover[lover_number] = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
					'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
					
					gs 'arousal', 'end'
					gs 'stat'
			
				elseif tiprand = 3:
					facial += 1
					spafinloc = 11
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
					'You took out a member and at this point <<$loverdesc[lover_number]>> is dead right on your face, covering it with warm and sticky cum.'
					
					gs 'arousal', 'end'
					gs 'stat'
			
				end
			elseif haraklover[lover_number] = 2:
				facial += 1
				spafinloc = 11
				gs 'cum_manage'
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
				'<<$loverdesc[lover_number]>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
				
				gs 'arousal', 'end'
				gs 'stat'
			
			end

			act 'Leave':
				cla
				dynamic $brodilr
			end
		end
	end
end

if $ARGS[0] = 'carA':
	*clr
	'You got in the car and <<$loverdesc[1]>> hug you and started kissing.'

	act 'Sex':
		cla
		*clr
		loverrelation[lover_number] += 1


		if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

		pose = 0
		gs 'boyStat', $lover[lover_number]
		dick = loverdick[lover_number]
		silavag = silavag[lover_number]
		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
		'<<$loverdesc[lover_number]>> you put on your back and spread your legs.'
		
		gs 'arousal', 'vaginal', 20, 'sub'
		gs 'stat'
			
		gs 'orgazm', 'start'

		act 'Leave.':
			cla
			dynamic $brodilr
		end
	end

	act 'Take by mouth':
		cla
		*clr
		loverrelation[lover_number] += 1


		if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

		dick = loverdick[lover_number]
		harakBoy = haraklover[lover_number]
		gs 'boyStat', $lover[lover_number]
		'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj24.jpg"></center>'
		'You kneel and <<$loverdesc[lover_number]>> pulled out his penis and offered it to your face.'
		
		gs 'arousal', 'bj', 15, 'sub'
		gs 'stat'
		
		gs 'oral', 'start'

		act 'Continue to suck.':
			cla
			*clr
			swallow += 1
			spafinloc = 12
			gs 'cum_manage'
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$loverdesc[lover_number]>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

			gs 'arousal', 'bj' 15, 'sub'
			gs 'arousal', 'end'
			gs 'stat'
			
			act 'Leave.':
				cla
				dynamic $brodilr
			end
		end

		act 'Remove the mouth.':
			cla
			*clr


			if haraklover[lover_number] = 0:
				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
				'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
				
				gs 'arousal', 'end'
				gs 'stat'
			
			elseif haraklover[lover_number] = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
					'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
				
					gs 'arousal', 'end'
					gs 'stat'
				
				elseif tiprand = 3:
					facial += 1
					spafinloc = 11
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
					'You took out a member and at this point <<$loverdesc[lover_number]>> is dead right on your face, covering it with warm and sticky cum.'
				
					gs 'arousal', 'end'
					gs 'stat'
				end
			elseif haraklover[lover_number] = 2:
				facial += 1
				spafinloc = 11
				gs 'cum_manage'
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
				'<<$loverdesc[lover_number]>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
				
				gs 'arousal', 'end'
				gs 'stat'
			end

			act 'Leave.':
				cla
				dynamic $brodilr
			end
		end
	end
end

if $ARGS[0] = 'hisA':
	*clr
	'Once you have entered the apartment <<$loverdesc[1]>> hug you and started kissing.'

	act 'Sex':
		cla
		*clr
		loverrelation[lover_number] += 1


		if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

		pose = 0
		gs 'boyStat', $lover[lover_number]
		dick = loverdick[lover_number]
		silavag = silaVag[lover_number]
		'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
		'<<$loverdesc[lover_number]>> you put on your back and spread your legs.'
		
		gs 'arousal', 'vaginal', 20, 'sub'
		gs 'stat'
		
		gs 'orgazm', 'start'

		act 'Show him out':
			cla
			dynamic $brodilr
		end
	end

	act 'Take by mouth':
		cla
		*clr
		loverrelation[lover_number] += 1


		if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

		dick = loverdick[lover_number]
		harakBoy = haraklover[lover_number]
		gs 'boyStat', $lover[lover_number]
		'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj24.jpg"></center>'
		'You kneel and <<$loverdesc[lover_number]>> pulled out his penis and offered it to your face.'
		
		gs 'arousal', 'bj', 15, 'sub'
		gs 'stat'
		
		gs 'oral', 'start'

		act 'Continue to suck.':
			cla
			*clr
			swallow += 1
			spafinloc = 12
			gs 'cum_manage'
			'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
			'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$loverdesc[lover_number]>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

			gs 'arousal', 'bj' 15, 'sub'
			gs 'arousal', 'end'
			gs 'stat'
			
			act 'Show him out':
				cla
				dynamic $brodilr
			end
		end

		act 'Remove the mouth.':
			cla
			*clr


			if haraklover[lover_number] = 0:
				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
				'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
				
				gs 'arousal', 'end'
				gs 'stat'
			
			elseif haraklover[lover_number] = 1:
				tiprand = rand(0, 3)

				if tiprand < 3:
					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
					'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
					
					gs 'arousal', 'end'
					gs 'stat'
					
				elseif tiprand = 3:
					facial += 1
					spafinloc = 11
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
					'You took out a member and at this point <<$loverdesc[lover_number]>> is dead right on your face, covering it with warm and sticky cum.'
				
					gs 'arousal', 'end'
					gs 'stat'
					
				end
			elseif haraklover[lover_number] = 2:
				facial += 1
				spafinloc = 11
				gs 'cum_manage'
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
				'<<$loverdesc[lover_number]>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
				
				gs 'arousal', 'end'
				gs 'stat'
			
			end

			act 'Show him out':
				cla
				dynamic $brodilr
			end
		end
	end
end

if $ARGS[0] = 'kvartA':
	*clr
	minut += 20
	if housr > 0:housrA = 1 & housrMir = 0

	'Once you have entered the apartment <<$loverdesc[1]>> hug you and started kissing.'

	if husband = 0:
		act 'Sex':
			cla
			*clr
			loverrelation[lover_number] += 1


			if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

			arousal_minut = 0
			pose = 0
			gs 'boyStat', $lover[lover_number]

			dick = loverdick[lover_number]
			silavag = silavag[lover_number]
			'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/vag.jpg"></center>'
			'<<$loverdesc[lover_number]>> you put on your back and spread your legs.'
			
			gs 'arousal', 'vaginal', 20, 'sub'
			gs 'stat'
		
			gs 'orgazm', 'start'

			act 'Show him out':
				cla
				dynamic $brodilr
			end
		end

		act 'Take by mouth':
			cla
			*clr
			loverrelation[lover_number] += 1


			if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40


			dick = loverdick[lover_number]
			harakBoy = haraklover[lover_number]
			gs 'boyStat', $lover[lover_number]
			'<center><img <<$set_imgh>> src="images/shared/sex/blowjob/bj24.jpg"></center>'
			'You kneel and <<$loverdesc[lover_number]>> pulled out his penis and offered it to your face.'
			
			gs 'arousal', 'bj', 15, 'sub'
			gs 'stat'
		
			gs 'oral', 'start'

			act 'Continue to suck.':
				cla
				*clr
				swallow += 1
				spafinloc = 12
				gs 'cum_manage'
				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum30.jpg"></center>'
				'Hot jet of sperm hit you in the mouth. You started to swallow cum, and <<$loverdesc[lover_number]>> continued to cum in your mouth. Finally the flow of hot liquid with a pungent taste stopped.'

				gs 'arousal', 'bj', 15, 'sub'
				gs 'arousal', 'end'
				gs 'stat'
		
				act 'Show him out':
					cla
					dynamic $brodilr
				end
			end

			act 'Remove the mouth':
				cla
				*clr


				if haraklover[lover_number] = 0:
					'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
					'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
					
					gs 'arousal', 'end'
					gs 'stat'
				
				elseif haraklover[lover_number] = 1:
					tiprand = rand(0, 3)

					if tiprand < 3:
						'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hand.jpg"></center>'
						'You remove a member from his mouth and <<$loverdesc[lover_number]>> you are finished in hand.'
						
						gs 'arousal', 'end'
						gs 'stat'
						
					elseif tiprand = 3:
						facial += 1
						spafinloc = 11
						gs 'cum_manage'
						'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
						'You took out a member and at this point <<$loverdesc[lover_number]>> is dead right on your face, covering it with warm and sticky cum.'
						
						gs 'arousal', 'end'
						gs 'stat'
						
					end
				elseif haraklover[lover_number] = 2:
					facial += 1
					spafinloc = 11
					gs 'cum_manage'
					'<center><img <<$set_imgh>> src="images/shared/sex/cum/facial/facial16.jpg"></center>'
					'<<$loverdesc[lover_number]>> hold your hair took a member of your mouth and cum on your face, covering it with warm and sticky cum.'
					
					gs 'arousal', 'end'
					gs 'stat'
				
				end

				act 'Show him out':
					cla
					dynamic $brodilr
				end
			end

			act 'Masturbate him':
				cla
				*clr


				if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

				'<center><img <<$set_imgh>> src="images/shared/sex/cum/handjob/hand1.jpg"></center>'
				'You stripped and put the guy on the bed, while they themselves sat next to him and began to fondle his penis hands.'
				'Soon, your skillful movements guy finished you in her hands.'
				
				gs 'arousal', 'hj', 20, 'dom'
				gs 'arousal', 'end'
				gs 'stat'

				if haraklover[lover_number] = 0:loverrelation[lover_number] -= 1
				if haraklover[lover_number] = 1:loverrelation[lover_number] -= 5
				if haraklover[lover_number] = 2:loverrelation[lover_number] -= 10

				act 'Wipe your hands and show him out':
					cla
					dynamic $brodilr
				end
			end

			if pcs_dom > 1 and kunday ! daystart and mesec <= 0:
				act 'Cooney':
					cla
					*clr
					kunday = daystart


					if boyonce[lover_number] = 0:boyonce[lover_number] = 1 & guy += 1 & vneshlover[lover_number] += 40

					pcs_horny += pcs_dom + (silaVag * 2 + 5)
					'<center><img <<$set_imgh>> src="images/shared/sex/kuni/kuni.jpg"></center>'
					'You undressed and lay on the bed, saying that the guy you caressed his tongue.'
					'<<$loverdesc[1]>> lay down between your legs and began to work the tongue on your pussy.'
					
					gs 'arousal', 'cuni', 20, 'dom'
					gs 'stat'

					if haraklover[lover_number] = 0:loverrelation[lover_number] -= 1
					if haraklover[lover_number] = 1:loverrelation[lover_number] -= 5
					if haraklover[lover_number] = 2:loverrelation[lover_number] -= 10

					if pcs_horny >= 90:
						pcs_mood += 15
						pcs_willpwr += 15
						$orgasm_or = 'custom'
						$orgasm_txt ='Man of skillful actions you covered orgasm.'
						
						gs 'arousal', 'end'
						gs 'stat'
						
					else
						'Actions Man though they were exciting, but they started to bore you.'
						
						gs 'arousal', 'end'
						gs 'stat'
						
					end
				end

				act 'Further':
					cla
					gt 'svidan', 'kvartA'
				end
			end
		end
	end
end

--- svidan ---------------------------------