# brother
brotherAge = age - 2
brotherDick = 14
if brotherQW > 20 and brotherQW < 25: brotherQW = 20

!' Variables used
brothersawpirsF: Flag 0/1 Have your brother seen your nipple piercings
brother: relationship
brotherDick: size of brothers dick (14cm)
brotherSex: Number of sexual interactions with brother (cap at 10)
brotherQW: Quest stages
brotherAge: your age - 2
brotherknowslut: brother knowledge of your sexual activity (1 = seen cum, 2 = groupsex in park)
pregTalkBrother: Flag 0/1 Do your brother know you are pregnant
brotherDay:
brotherSexCount: the number of times left that you can have sex with your brother today (resets to 5 each day)
brotherMorningSex: Last day this happend. Used to block to once a day. 
brotherNightSex: Last day this happend. Used to block to once a day. 
brotherEvSex: Last day this happend. Used to block to once a day. 
brother_homework: last day you helped your brother with homework. Used to block to once a day.
brother_saw_analplug: 0/1 Have your brother seen you with analplug
brother_body_show
brother_knows_not_virgin
natbro:  number of times Natasha sucked your brother (can only happen once at the moment)
BrotherNo:
brother_ev1 
'!



gs 'stat'
'<center><b><font color="maroon">Kolka</font></b></center>'
'<center><img src="images/qwest/alter/brother.jpg"></center>'
'Your brother Kolka is younger than you, he''s <<brotherAge>> years old. Unlike your sister, Kolkas'' dad is your stepfather. He is a student at the same school as you, and enjoys soccer.'

if brother < 20:'You and your brother argue all the time.'
if brother >= 20 and brother < 40:'You and your brother bicker sometimes.'
if brother >= 40 and brother < 60:'You and your brother have a normal relationship.'
if brother >= 60 and brother < 80:'You have a good relationship with your brother.'
if brother >= 80:'You have a great relationship with your brother.'
*nl
if hour >= 7 and hour < 21:
	! WD: Fix old nude variable
	if spdirtyn > 0 and $clothingworntype = 'nude':
		if tanga = 0 and arrpos('sparrloc',1):
			if brotherknowslut < 1: brotherknowslut = 1
			'"Go wash yourself, you''ve got something on your pussy."'
			if brotherSex = 0:
				brother -= 1
				act 'Move away':gt $loc, $metka
				exit
			end
		elseif tanga = 0 and arrpos('sparrloc',4):
			if brotherknowslut < 1: brotherknowslut = 1
			'"Go wash yourself, you''ve got something on your butt."'
			if brotherSex = 0:
				brother -= 1
				act 'Move away':gt $loc, $metka
				exit
			end
		else
			if brotherknowslut < 1: brotherknowslut = 1
			'"Go wash yourself, you''re covered in cum and it''s disgusting."'
			if brotherSex = 0:
				brother -= 1
				act 'Move away':gt $loc, $metka
				exit
			end
		end
	end
	if spdirtyv = 1 and evgenQW <= 3:
		if brotherknowslut < 1: brotherknowslut = 1
		if arrpos('sparrloc',11) ! -1:
			'"Is that cum on your face? That`s disgusting, Wash it off."'
		else
			'"Is that cum? That`s disgusting, Wash it off."'
		end
		if brotherSex = 0:
			brother -= 1
			act 'Move away':gt $loc, $metka
			exit
		end
	end

	! WD: Fix old nude variable
	if spdirtyc > 0 and $clothingworntype ! 'nude':
		'"Your clothes are dirty. Wash them, or atleast get mum to do it."'
	end
	if spanked > 1 and $clothingworntype = 'nude' and tanga = 0:
		'"Got a sore bum? Did someone punish you? You bad girl."'
	end
	!The reaction to the pregnancy
	if $clothingworntype = 'nude' and pregTalkBrother = 0 and pregchem > 2160:
		'Surprised, your brother looks at your tummy. "<<$name>>, are you pregnant? '
		pregTalkBrother = 1
	end
		
		if $clothingworntype ! 'nude' and pregTalkBrother = 0 and pregchem > 3600:
		'Surprised, your brother looks at your tummy, "<<$name>>, why didn''t you tell me I''m going to be an uncle? '
		pregTalkBrother = 1
	end

	if $clothingworntype = 'nude' and towel = 1 and tanga = 0:
		if brotherSex < 1:
			'Your brother sarcastically commented brief little towel for you:'
			'- <<$nickname>>, Are you sure that this is not a hand towel?'
		elseif brotherSex >= 1:
			'Your brother sarcastically commented brief little towel for you:'
			'- Sister, for me chose a towel over-short?'
		end
	elseif $clothingworntype = 'nude' and lobok > 2 and tanga = 0:
		'"You should have shaved," your brother comments, "it looks like you''re growing a forest."'
	elseif $clothingworntype = 'nude':
		if brotherSex >= 1:
			'"<<$nickname>>, you have an amazing body"'
		else
			'"What a view! Have you decided to be a nudist?"'
			brother += 1
		end
	end
end

if $loc = 'gschool':
	if brother < 40:
		'Your brother frowns "I come here to get away from you!"'
		exit
	else
		! WD: Unused Var 'BJBeerQW' use 'GorSlut'
		if evgenQW >= 4 and GorSlut >= 3:
			'Your brother grins "Hello, Sis. Why play football, when you can go with us to watch porn?"'

			act 'Go watch porn':minut += 5 & gt 'seeporn'
		elseif evgenQW >= 4:
			'The guys gather together and tell you "We just finished playing soccer, Let''s go watch porn."'

			act 'Go watch porn':minut += 5 & gt 'seeporn'
		elseif evgenQW < 4:
			'Your brother grins "Hi <<$nickname>>. Fancy a game of football?"'
			if sport ! 1:
				'"Oh, you can''t play dressed like that, put on some sportswear first, or you can watch us."'
			else
				'"Or you could just watch us."'
				act 'Play football':
					cls
					minut += 60
					brother += 5
					agil += rand(0, 2)
					speed += rand(0, 2)
					sweat += 3
					beg += rand(2, 5)
					gs 'stat'
					'You spend an hour running around chasing the ball across the field with your brother and his friends Beshin and Zhendos.'

					if rand(0, 1) = 0 and seepornofut = 0:
						'The boys are whispering something to each other.'
						act 'What you are talking about?':
							cls
							gs 'stat'
							'The boys hesitate, "Err.. nothing".'

							if dom > 0:
								'You press them on it "What are you? A bunch of girls whispering about which boy you want to kiss?." One of the boys immediately spits out "No, we want to go look at porn, but didn''t think. a girl like you could handle it."'
								act 'Move away':gt $loc, $metka
								act 'Prove them wrong':
									cls
									gs 'stat'
									'You tell them, if they`re going to look porn, they''ll need a babysitter. The guys aren''t pleased, but you don''t give them a choice.'

									act 'Go watch porn':minut += 5 & gt 'seeporn'
								end

							elseif brotherQW >=3:
								'Kolka hesitates for a moment then looks at you funny. "Actually <<$name>>, we want to go look at porn, but, you know what, I think a girl like you could handle it."'
								act 'Move away':gt $loc, $metka
								act 'Show interest':
									cls
									gs 'stat'
									'You tell them that you are curious. The guys aren''t pleased, but Kolka persuades them.'

									act 'Go watch porn':minut += 5 & gt 'seeporn'   

								end
							else
								act 'Move away':gt $loc, $metka

							end
						end
					end
					if seepornofut >= 1:
						'The guys gather together and ask you "<<$nickname>>, want to watch some porn?"'

						act 'Go watch porn':minut += 5 & gt 'seeporn'
					end

					act 'Move away':gt $loc, $metka
				end
			end
			act'Watch as they play':
				cls
				picrand = RAND(1,2)
				minut += 60
				brother += 5
					'<center><b><font color = maroon>School - football field</font></b></center>'
				if month=1 or month=2 or month=12:
					'<center><img src="images/qwest/alter/ev2/football4.jpg"></center>'
				else
					'<center><img src="images/qwest/alter/ev2/football<<picrand>>.jpg"></center>'
				end
				'You spend an hour sitting on the bench, watching the guys play football.'
				if rand(0, 1) = 0 and seepornofut = 0:
					'The boys are whispering something to each other.'
					act 'What you are talking about?':
						cls
						gs 'stat'
						'The boys hesitate, "Err.. nothing".'

						if dom > 0:
							'You press them on it "What are you? A bunch of girls whispering about which boy you want to kiss?." One of the boys immediately spits out "No, we want to go look at porn, but didn''t think. a girl like you could handle it."'
							act 'Move away':gt $loc, $metka
							act 'Prove them wrong':
								cls
								gs 'stat'
								'You tell them, if they`re going to look porn, they''ll need a babysitter. The guys aren''t pleased, but you don''t give them a choice.'

								act 'Go watch porn':minut += 5 & gt 'seeporn'
							end

						elseif brotherQW >=3:
							'Kolka hesitates for a moment then looks at you funny. "Actually <<$name>>, we want to go look at porn, but, you know what, I think a girl like you could handle it."'
							act 'Move away':gt $loc, $metka
							act 'Show interest':
								cls
								gs 'stat'
								'You tell them that you are curious. The guys aren''t pleased, but Kolka persuades them.'

								act 'Go watch porn':minut += 5 & gt 'seeporn'   

							end
						else
							act 'Move away':gt $loc, $metka

						end
					end
				end

				if seepornofut >= 1:
					'The guys gather together and ask you "<<$nickname>>, want to watch some porn?"'

					act 'Go watch porn':minut += 5 & gt 'seeporn'
				end

				act 'Move away':gt $loc, $metka
			end
		end
	end
end

! WD: Fix old nude variable
if $loc = 'sitrPar':

	dynamic $brotherSexCount

	if indorf = 0 and $clothingworntype ! 'nude' and brothersawpirsF=0 and father_go = 1 and brother > 85 and hour >= 18 and hour < 21 and pirsF > 0:
		act 'Show off your nipple piercings':
			cls
			gs 'stat'
			minut+=1
			horny+=3
			brothersawpirsF=1
			brother += 3
			'<center><img src="images/qwest/alter/placer/9vh2v.jpg" ></center>'
			'"Look what I have," you walk up to Kolka, your chest bare, showing off your nipple pircings, "Don''t be shy, you can touch them."
			Your brother, dumbfounded by your suggestion, hesitantly touches the piercing in one of your nipples, causing you to moan gently.'
			if  brotherSex = 0:
				'He abruptly withdraws his hand and apologizes for his rudeness. You have no choice, but to appologise, that wasn''t fair. You cover your chest.'
			else
				'Seeing the pleasure playing with your nipples brings you, he begins to play harder with your piercings, sometimes squeezing your exposed Breasts. 
				After playing for a while, he lets go of your breasts, and says, "I really like your these new additions."'
			end
			horny+=10
			act '<B>Move away</B>':gt 'sitrPar'
			exit
		end
	end


! if $loc = 'sitrPar' and indorf = 0 and nude=1 and pirsF>0 and brothersawpirsF =0:
	if indorf = 0 and $clothingworntype = 'nude' and pirsF>0 and brothersawpirsF =0:
		if  brotherSex = 0:
			if brother>=70:
				'"Good on you," your brother winks, and points toward your pierced nipples.'
				brother += 1
				brothersawpirsF=1
				act '<B>Move away</B>':gt 'sitrPar'
				exit
			else
				'"I don''t get it, why would you do that to yourself," Kolka says noticing your pierced nipples.'
				brothersawpirsF=1
				act '<B>Move away</B>':gt 'sitrPar'
				exit
			end
		else
			if father_go = 1 and hour >= 18 and hour < 21:
				'"How lovely," Kolka plays with your pierced nipples'
				brother += 3
				brothersawpirsF=1
				horny+=10
				act '<B>Move away</B>':gt 'sitrPar'
				exit
			elseif father_go = 0 and hour >= 18 and hour < 21:
				'"Beautiful," Kolka gently cups your breasts and strokes your pierced nipples.'
				brother += 3
				brothersawpirsF=1
				horny+=10
				act '<B>Move away</B>':gt 'sitrPar'
				exit
			end
		end
	end


	if indorf = 0 and brotherSexCount > 0 and brotherDay = daystart:
		brotherRand = rand(0,10)
		if hour >= 5 and hour < 7 and brotherSex > 0 and brotherMorningSex ! daystart and brotherRand < 2:
			'Going up to your sleeping brother, you see he''s pitching a tent.'
			if horny >= 90 and brothersex > 6:
				act 'Mount him':
					if brotherSex > 10: brotherSex = 10
					cls
					minut += 5
					horny += 10
					$boy = 'Kolka'
					dick = brotherDick
					silavag = 0
					pose = 0
						
					gs 'stat'

					'<center><img src="images/img/sex/nae22.jpg"></center>'
					'Approaching your brother, you gently pull back the covers and carefully straddle his sleeping body, taking care not to wake him.'
					if son <= 10 and rand(0,4) =0:
							
						dynamic $sexstart3
						dynamic $sleepsexcum
						dynamic $brothersleepSexEnd
					else 
						protect = 0
						vidageday -= 1

						if prezik > 0:
							prezik -= 1
							protect = 1
							if preziktype = 2:
								sexcontra = 7
								'You take a sabotaged condom and put it on <<$boy>>.'
							else
								sexcontra = 3
								'You take a condom and put it on <<$boy>>.'
							end
							
						end
					dynamic $sexstart3
					dynamic $sleepsexcum	
					dynamic $brothersleepSexEnd
					end
				end	
			else 
				act 'Solve your brothers morning problem':
					cls
					minut += 5
					horny += 10
					bj += 1
					$boy = 'Kolka'
					spafinloc = 12
					sexpartkno = 1
					gs 'cum_manage'
					swallow += 1
					brotherSex += 1
					brotherSexCount -= 1
					brotherMorningSex = daystart
					gs 'stat'

					'<center><img src="images/qwest/alexey/bj6.jpg"></center>'
					'Approaching your brother, you gently pull back the covers and begin to suck his <<brotherDick>> cm dick. After a few minutes, he moans softly in his sleep and his cock twitches.'
					'Your mouth quickly fills with warm sperm and you feel its sharp taste.'			
					'Swallowing the semen, you gently replace the blanket and, seeing a slight smile on your sleeping brother, leave.'

					act '<B>Move away</B>':gt 'sitrPar'
					exit
				end
			end
		end

		if hour >= 21 and hour < 24 and brotherSex > 0 and brotherNightSex ! daystart:
			'When you get close, he suddenly opens his eyes and says,:'
			! WD: Unused Var 'BJBeerQW' use 'GorSlut'
			if sub > 0 or (evgenQW >= 4 and GorSlut >= 3):
				'"<<$nickname>>, help me sleep." Then he throws back the blanket, revealing his erection.'
				brotherSexCount -= 1
				brotherNightSex = daystart

				dynamic $brotherSexStart
			else
				'"Sis, I didn`t get any sleep, can you help?" He points to the mound under his blanket.'
				cla
				act 'Help him':
					'"Yes, I know what to do" Then he pulls back the blanket and reveals his erection.'
					brotherSexCount -= 1
					brotherNightSex = daystart

					dynamic $brotherSexStart
				end
				act 'He`s on his own there':
					'"You''ve got 2 perfectly good hands, I mean eww...", You turn around and leave.'
					cla
					act '<B>Move away</B>':gt 'sitrPar'
					exit
				end
			end
		end

		if father_go = 1 and hour >= 18 and hour < 21 and brotherSex > 0 and brotherEvSex ! daystart:
			'When you get close, He turns to you and says,:'
			! WD: Unused Var 'BJBeerQW' use 'GorSlut'
			if sub > 0 or (evgenQW >= 4 and GorSlut >= 3):
				'"<<$nickname>>, Come on you have work to do, and quitely, you don''t want to wake our parents up." Then he drops his pants, and you see his hard <<brotherDick>> cm dick.'
				brotherSexCount -= 1
				brotherEvSex = daystart

				dynamic $brotherSexStart
			else
				'"Sis, I''ve got a problem, can you help me solve it?" Then he looks points at the hump in his pants.'
				cla
				act 'Help him':
					'"I know, what will solve this problem, quietly now, take off your pants." With those words Kolka smiles and takes off his pants, exposing his erect <<brotherDick>> cm dick.'
					brotherSexCount -= 1
					brotherEvSex = daystart

					dynamic $brotherSexStart
				end
				act 'That is so his problem':
					'"Dearest brother they sell porn in the shop, I''m sure you`ll work out the rest" You leave.'
					cla
					act '<B>Move away</B>':gt 'sitrPar'
					exit
				end
			end
		end
	end
end

$sleepsexcum = {

	if protect ! 1:
		!!Unprotected sex

		if rand(0, 2) < 2:
			!!Inside
			sexpartkno = 1
			gs 'cum_manage'
			'<<$boy>> groaned and you feel a jet of sperm fill your pussy.'
			manna -= 15
			willpower -= 15

			if preg = 0 or preg = 1 and knowpreg = 0:'Damn, I could get pregnant, you think with horror.'
			if preg = 1 and knowpreg = 1:'You chuckle to yourself, well at least you cannot get pregnant.'
		else
			!!Out

			if pose = 0:
				if rand(0,1) = 0:
					spafinloc = 14
					'<<$boy>> groaned and you quickly pulled yourself off of his dick. His hot sperm squirts on your stomach'
				else
					spafinloc = 1
					'<<$boy>> groaned and you quickly pulled yourself off of his dick. His hot sperm squirts on your exposed pussy'
				end
				sexpartkno = 1
				gs 'cum_manage'
			elseif pose = 1:
				if rand(0,1) = 0
					spafinloc = 8
					'<<$boy>> groaned and you quickly pulled yourself off of his dick. His hot sperm squirts on your back'
				else
					spafinloc = 4
					'<<$boy>> groaned and you quickly pulled yourself off of his dick. His hot sperm squirts on your ass.'
				end
				sexpartkno = 1
				gs 'cum_manage'
			end
		end
	elseif protect = 1:
		protect = 0
		
		if rand(0, 89) = 0:sexcontra = 4
		sexpartkno = 1
		gs 'cum_manage'	
		if sexcontra = 4:
			'You pull off of <<$boy>> and look at his dick. and think "Oh shit! The condom burst."'
		elseif sexcontra = 5:
			'You pull off of <<$boy>> and look at his dick. and think "Oh shit! The condom is missing!"'
		else
			'<<$boy>> groaned and you realized that he had came in the condom.'
		end
	end

	pose = 0
}

$brothersleepSexEnd = {
	brotherSex += 1
	minut += 15

	gs 'stat'

	'You catch your breath then carefully climb off your still sleeping though smiling brother then gently replace the blanket and quietly step away.'
		act 'Escape':gt $loc
		end
	end
}

$brother_showbody = {
	cla
	if brotherQW = 3:
		cls
		cla
		minut += RAND(3,5)
		gs'stat'
		'<center><b><font color = maroon>Kolka</font></b></center>'
		'<center><img src="images/qwest/alter/ev2/brother/homework1.jpg"></center>'
		'After finishing engaged, Kolka c red with excitement person asks:'
		'- "<<$nickname>>, I have to quickly control on anatomy will, I still can not learn it can. Do not help me?'
		'- "In terms of?..." - you ask again at a loss.'
		'- "Well there..." - I hesitated a little brother - "See how all the girls out there arranged, explain...'
		if sub < 30: 
			act'Are you really ofigel?':
				cla
				'- "Kohl, you do not confuse? I`m your sister! Are you really ofigel, how do you imagine it?"'
				'- "Well yes, you`re right. Stupidity offered..." '
				act 'Finish':gt $loc
			end
		end
		act'Huh...':
			cla
			brotherQW = 4
			'You briefly reflected on his brother `s request and reply:'
			'- "And how do you imagine it? I undress in front of you?"'
			'- "Well... It would be nice to also tell" - he added.'
			'- "And in the book that you do not have pictures?"'
			'- "There are, but everything is so clumsily written, and the teacher missed this lesson, pier "you already know everything", and control it write" - he began to persuade you with flushed face.'
			'- "Okay, I help you, but only if you will not tell anyone. agreed? I`m serious, It means anyone at all to anyone!" - Strictly speaking you.'
			'- "Word pioneer!"'
			'- "You`re not a pioneer..."'
			'- "A... Well, then just tell the word!"' 
			'- "Okay, I realized. Do not continue."'
			if sub < 30: 
				act'Takeout':gt $CURLOC
			end
			act'Undress':gt'brother','brother_voyeur_ev4'
		end
		exit
	elseif brotherQW > 3:
		if sub < 30: 
			act'Takeout':gt $CURLOC
		end
		act'Undress':gt'brother','brother_voyeur_ev4'
		exit
	else
		if sub < 30: 
			act'Takeout':gt $CURLOC
		end
		act'Undress':gt'brother','brother_voyeur_ev4'
		exit
	act 'Finish':gt $loc
	end
}

$brother_homework = {
	cls
	gs'stat'
	brother_homework = daystart
	brother += 1
	minut += RAND(50,70)
	ivrand = RAND(1,2)
	'<center><b><font color = maroon>Kolka</font></b></center>'
	'<center><img src="images/qwest/alter/ev2/brother/homework1.jpg"></center>'
	'You are about an hour helping his brother to learn new material and understand it.'
	if brotherQW >= 2 and brother >= 60 and ivrand = 1:
		cls
		gs'stat'
		'<center><b><font color = maroon>Kolka</font></b></center>'
		'<center><img src="images/qwest/alter/ev2/brother/homework_touch.gif" width="1000" height="422"></center>'
		if brotherQW = 2:
			cla
			horny += RAND(5,10)
			'As long as you have explained material, Kolka suddenly began to stroke your leg of his hand. You froze in surprise, not knowing what to do.'
			act'Ignore and continue':
				cla
				brotherQW = 3
				brother += 2
				horny += RAND(5,10)
				'You decide to continue to engage in homework, trying not to pay attention to Kolkinu hand on your leg. Realizing, you do not mind, he continues to stroke you just-just nedotyagivayas up your pants.'
				act 'Finish':gt $loc
			end
			act'Remove hand and continue':
				cla
				horny += RAND(1,5)
				dom += 1
				'You decide to remove his hand and continue to engage in homework. Kolka, blushing as cancer, hard starts to do to solve puzzles, trying not to look you in the eye.'
				act 'Finish':gt $loc
			end
			exit
		elseif brotherQW >= 3:
			cla
			horny += RAND(5,10)
			'As long as you have explained material, Kolka began again to stroke your leg his hand.'
			act'Ignore and continue':
				cla
				brother += 2
				horny += RAND(5,10)
				'You do not keep stopping to engage in homework, trying not to pay attention to Kolkinu hand on your leg. Knowing, that you absolutely do not mind, he continues to have nice iron, from what you feel the warm rush of excitement.'
				ivrand = RAND(1,4)
				if brotherSex > 0 and father_go = 1 and ivrand = 1 and brotherEvSex ! day:
					cla
					'After finishing engaged, Kolka c red with excitement person asks:'
					'- "<<$nickname>>, It can be a little indulged?"'
					dynamic $brotherSexStart
					act 'Takeout':gt $loc
				elseif ivrand = 2 and brotherEvSex ! day:
					dynamic $brother_showbody
					exit
				elseif ivrand = 3 and brotherEvSex ! day:
				end
				act 'Finish':gt $loc
			end
			act'Remove hand and continue':
				cls
				cla
				horny += RAND(1,5)
				brother -= 5
				'<center><b><font color = maroon>Kolka</font></b></center>'
				'<center><img src="images/qwest/alter/ev2/brother/homework1.jpg"></center>'
				'You whisper:'
				'- "Do not, Suddenly parents see" - removing his hand from the foot.'
				'- "Chu..." - muttered under his breath Kolka and grimassy resentment on his face continued to engage.'
				act 'Finish':gt $loc
			end
			exit
		end
	end
	act 'Finish':gt $loc
}

$brother_homework[1] = {
	cla
	cls
	gs'stat'
	minut += 1
	textrand = RAND(1,3)
	if textrand = 1:$brother_textrand1 = '- "Kohl, let me help you with homework?"
- "Come on, it would be nice"'
	if textrand = 2:$brother_textrand1 = '- "Kohl, How are you with the lessons, let`s help?"
- "Come on, it would be nice"'
	if textrand = 3:$brother_textrand1 = '- "Kohl, the lessons do not need help?"
- "Yes, I would not prevent"'
	'<center><b><font color = maroon>Kolka</font></b></center>'
	'<center><img src="images/qwest/alter/brother.jpg"></center>'
	'Your brother Kolka younger than you and he <<brotherAge>> years. Kolka was born, unlike you and your sister have by stepfather. He is a student at the same school as you, and enjoys soccer.'
	''
	'<<$brother_textrand1>>'
	act 'Further': dynamic $brother_homework
}

if (week = 6 and brother_homework = daystart - 1) or (week = 7 and brother_homework = daystart - 2): brother_homework = daystart
if $loc = 'sitrPar' and brotherAge < 18 and kanikuli = 0 and brother >= 40 and brother_homework ! daystart and hour >= 18 and hour < 20:
	if RAND(1,4) = 1:
		cla
		cls
		gs'stat'
		'<center><b><font color = maroon>Kolka</font></b></center>'
		'<center><img src="images/qwest/alter/brother.jpg"></center>'
		'Your brother Kolka younger than you and he <<brotherAge>> years. Kolka was born, unlike you and your sister have by stepfather. He is a student at the same school as you, and enjoys soccer.'
		''
		'- <<$name>>, help me with homework, and then I have a little problem here does not work?'
		act'Certainly help':dynamic $brother_homework
		act'Later, now I can not':
			cla
			'- Sorry, I`m busy right now. Then help.'
			act 'Escape':gt $loc
		end
	else
		act'Offer help with homework': dynamic $brother_homework[1]
	end
end

act 'Move away':gt $loc, $metka

$brotherSexStart = {
	cla
	if brotherSex = 0:brotherSex = 1 & guy += 1
	act 'Jerk your brother':
		cls
		minut += 5
		dick = brotherDick
		hj += 1
		gs 'stat'

		'<center><img src="images/qwest/alter/artom/hj.jpg"></center>'
		'You take his hard and hot cock in your hand and begin to masturbate him. Finally your brother groans and you watch his cock erupt.'
		$boy = 'Kolka'
		spafinloc = 13
		sexpartkno = 1
		gs 'cum_manage'
		dynamic $brotherSexEnd
	end
	if brotherSex > 4:
		act 'Suck your brother':
			cls
			minut += 5
			horny += 10
			bj += 1
			dick = brotherDick
			gs 'stat'

			'<center><img src="images/nigma/gor/ш0,<<rand(0,6)>>.gif"></center>'
			'You sit down in front of your brother and move your face toward his cock.'

			dynamic $dinrandbj

			'Soon Kolka groans "<<$nickname>>, I`m cumming."'

			act 'Suck on':
				cls
				minut += 5
				horny += 10
				$boy = 'Kolka'
				spafinloc = 12
				sexpartkno = 1
				gs 'cum_manage'
				swallow += 1
				gs 'stat'

				'<center><img src="images/nigma/gor/с0,<<rand(0,11)>>.gif"></center>'

				dynamic $dinrandswallow

				dynamic $brotherSexEnd
			end
			act 'Remove from your mouth':
				cls
				minut += 5
				horny += 10
				$boy = 'Kolka'
				spafinloc = 11
				sexpartkno = 1
				gs 'cum_manage'
				facial += 1
				gs 'stat'

				'<center><img src="images/qwest/alter/Ev/cocksuckerFacial.jpg"></center>'
				'You take his dick out of your mouth and then a hot jet of sperm hits your face, then another and another, until finally your brother is spent and your face as covered in cum.'

				dynamic $brotherSexEnd
			end
			if brotherSex > 6:
				act 'Give yourself to your brother':
					if brotherSex > 10: brotherSex = 10
					cls
					minut += 5
					horny += 10
					$boy = 'Kolka'
					dick = brotherDick
					silavag = 0

					gs 'stat'

					'<center><img src="images/nigma/gor/ш1,<<rand(0,11)>>.gif"></center>'
					'You lie on the sofa and brother lies on top of you.'

					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum

					dynamic $brotherSexEnd
				end
			end
		end
	end
	if brotherSex > 6:
		act 'Give yourself to your brother':
			if brotherSex > 10: brotherSex = 10
			cls
			minut += 5
			horny += 10
			$boy = 'Kolka'
			dick = brotherDick
			silavag = 0

			gs 'stat'

			'<center><img src="images/nigma/gor/ш1,<<rand(0,11)>>.gif"></center>'
			'You lie on the sofa and brother lies on top of you.'

			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum

			dynamic $brotherSexEnd
		end
	end
}

$brotherSexEnd = {
	brotherSex += 1
	! WD: Unused Var 'BJBeerQW' use 'GorSlut'
	if sub > 0 or (evgenQW >= 4 and GorSlut >= 3):
		if $loc = 'sitrPar' and father_go = 1 and hour >= 18 and hour < 21:
			minut += 15

			gs 'stat'

			'Kolka catches his breath, then says, "Nice one <<$nickname>>, good job, just remember this is our little secret!", He continues to go about his business.'
			act 'Escape':gt $loc
		elseif $loc = 'sitrPar':
			minut += 15

			gs 'stat'

			'Kolka catches his breath, then says, "Nice one <<$nickname>>, you''re well trained. Now don''t tell anyone!", and falls asleep.'
			act 'Escape':gt $loc
		else
			'Kolka says, "Nice one <<$name>>, you`re well trained, Now don''t tell anyone!", and leaves.'
		end
	else
		if $loc = 'sitrPar' and father_go = 1 and hour >= 18 and hour < 21:
			minut += 15

			gs 'stat'

			'Kolka catches his breath, then says, "Many thanks, <<$name>>, You helped me a lot", He continues to go about his business.'
			act 'Escape':gt $loc
		elseif $loc = 'sitrPar':
			minut += 15

			gs 'stat'

			'Kolka catches his breath, then says, "Thank you, <<$name>>, You saved me , now I can finally sleep.", and sleeps.'
			act 'Escape':gt $loc
		else
			'Kolka says, "Thanks for everything, Sis. Well, I`m off.", and leaves.'
		end
	end
}

$brotherSexCount = {
	if brotherDay = daystart - 1 and brotherSexCount > 0:brotherSexCount = 5

	if brotherMorningSex ! daystart:brotherMorningSex = daystart - 1
	if brotherEvSex  ! daystart:brotherEvSex = daystart - 1
	if brotherNightSex  ! daystart:brotherNightSex = daystart - 1

	if brotherSexCount < 1:
		brotherDay = daystart + 1
		brotherSexCount = 5
	else
		brotherDay = daystart
	end

	if brotherDay = 0:brotherDay = 1
	
}


act 'Move away':gt $loc, $metka

if $ARGS[0] = 'brother_go_away':
	cla
	cls
	gs'stat'
	horny += RAND(5,10)
	minut += RAND(5,10)
	brother -= 10
	dom += 1
	'<center><img src="images/qwest/alter/ev2/brother/b (13).jpg"></center>'
	'You hide your pussy with your hands and shout to your brother:'
	'"Kohl! What the fuck? Get the fuck out of here, small fry!'
	'Caught red-handed, Kolka slams the door and runs away. You finish showering quietly and dry yourself.'
	act 'Exit the bathroom':mirror_steam = hour & gt $locM, $metkaM
end

if $ARGS[0] = 'brother_voyeur_end':
	cla
	cls
	gs'stat'
	horny += RAND(5,10)
	minut += RAND(5,10)
	picrand = RAND(1,2)
	brother += 5
	manna = manna + 10
	willpower = willpower + 10
	'<center><img src="images/qwest/alter/ev2/brother/b (end<<picrand>>).jpg"></center>'
!--- Need to expand
!	if brotherQW < 5
		'confused, surreptitiously looking at his brother, You take a towel and wraps around your flushed, steamed body.'
		'You shudder at the realization hits wrong and punishable your actions. Kolka neatly conceals the door and tiptoed out.'
		'You feel uncomfortable and ashamed, but smiling, recalling the wide open Cat`s eye, flushed face and ears maroon, More and decide to tease his brother.'
!	else
!	end
	act 'Exit the bathroom':mirror_steam = hour & gt $locM, $metkaM
end

if $ARGS[0] = 'brother_voyeur_ev1':
	cla
	cls
	gs'stat'
	horny += RAND(10,15)
	minut += RAND(5,10)
	picrand = RAND(2,7)
	brother += 5
	if brotherQW < 1: brotherQW = 1
	'<center><img src="images/qwest/alter/ev2/brother/b (<<picrand>>).jpg"></center>'
	'You continue to wash as if nothing had happened, glancing at your audience. Carefully washing your body, paying particular attention to your breasts and pussy, feeling the excitement grow in your abdomen.'
	act 'Wipes':gt 'brother','brother_voyeur_end'
	if horny >= 40:
		act 'Play with your tits':gt 'brother','brother_voyeur_ev2'
	end
end

if $ARGS[0] = 'brother_voyeur_ev2':
	cla
	cls
	gs'stat'
	horny += RAND(10,15)
	minut += RAND(5,10)
	picrand = RAND(1,7)
	brother += 5
	'<center><img src="images/qwest/alter/ev2/brother/c (<<picrand>>).jpg"></center>'
	'You turn to face the door, giving Kolka a better view, and erotically squeeze you <<$titsize>> tits. Your fingers pinch your nipples, and you take the shower hose in your hand and pour water over your chest, while gazing at your brother. You close your eyes for a moment and immersed in fantasy, your heart flutters and you elicit a light moan.'
	act 'Wash':gt 'brother','brother_voyeur_end'
	if horny >= 90:
		act 'Direct the water at your pussy':gt 'brother','brother_voyeur_ev3'
	end
end

if $ARGS[0] = 'brother_voyeur_ev3':
	cla
	cls
	gs'stat'
	if brotherQW <= 1: brotherQW = 2
	horny += RAND(10,15)
	minut += RAND(5,10)
	picrand = RAND(1,2)
	brother += 5
	horny = 0
	orgasm = orgasm + 1
	mastr = mastr + 1
	manna = manna + 15
	willpower = willpower + 15
	'<center><img src="images/qwest/alter/ev2/brother/d (<<picrand>>).jpg"></center>'
	'You Set your feet a little wider and channel water from a hose on her pussy. From surging pleasure you start breathing heavily and moaning softly. Soon you will feel like a warm wave covers your whole body and you began to shudder in orgasm.'
	act 'Wipes':gt 'brother','brother_voyeur_end'
end

if $ARGS[0] = 'brother_voyeur_ev4':
	cla
	cls
	gs'stat'
	brother += 5
	horny += RAND(10,15)
	minut += RAND(5,10)
	'<center><img src="images/qwest/alter/ev2/brother/f (1).jpg"></center>'
	if brotherQW = 4:
		brotherQW = 4
		'You check whether the door is closed to the hall, then silence quickly removed her clothes and sits down in the chair next to the sofa, a little embarrassed covers her breasts with her hands:'
		'- "Well "pioneer", what do you explain?" - you ask, Ofigevshy by looking at the reality of what is happening brother.'
		'- "Ohrenet..." - the only, I was able to squeeze out Kolka, staring at you goggle-eyed.'
		'- "Kohl, you just wanted to enjoy or you really need help?" - Strictly speaking you, noting the growing bump in his pants.'
		'- "No-no, need-need!"'
		'- "So can, faster start - quickly finish?"'
		'- "Em-yes, good...'
		act'Further':gt 'brother','brother_voyeur_ev5'
	elseif brotherQW >= 4:
		'You check whether the door is closed to the hall, then silence quickly removed her clothes and sits down in the chair next to the sofa, slightly compresses your breasts with her hands:'
		'- "Well, repetition - the mother of learning?" - asked brother.'
		'- "Something like that" - with a smile, you reply.'
		act'Further':gt 'brother','brother_voyeur_ev5'
	end
end

$brother_anus_check = {
	if analplugIN = 1:
		if brother_saw_analplug = 0:
			brother_saw_analplug = 1
			'- "Wow, and this is why?" - perplexed freezes, asked Kolya, obviously referring to sex-toy in your ass.'
			'- "I like it so"'
			'- "Wow! Really?"'
			'- "Well yes..." - embarrassed answer you.'
			'- "And how does it feel?"'
			'- "Do you want to try?"'
			'- "Em... No, thank you. A, all these things girls like?"'
			'- "I do not know... I did not ask for all" - red answer you.' 
		elseif brother_saw_analplug = 1:
			'- "There you go again with this thing in the ass?" - asked Kolya, obviously referring to sex-toy in your ass.'
			'- "Aha..." - coquettish answer you.'
			if  brotherSex > 0:
				'- "Maybe better to that-else insert?" - he asks, clearly alluding.'
				'- "Next time, Kohl"'
				'- "fiasco..."'
			else
				'- "Pervert!"'
				'- "Well, except that just a little-slightly"'
			end
		end
	else
		if brother_anus_mem < anpic:
			'- "<<$nickname>>, I think you have a point , or become wider?"'
			'- "What?"'
			'- "I`m serious, less than it was before!"'
			'- "Do not invent, Nothing there has changed , and it is not necessary to stare at him!"'
			'- "changed, exactly say! Previously, it was less! <<$nickname>>, you give up your ass?"'
			'- "ohrenel? No of course!" - you blush.'
			'- "Just give!"'
			'- "Kohl, go fuck!"'
			'- "Okay-okay, silent..."'
		end
	end
}

if $ARGS[0] = 'brother_voyeur_ev5':
	cla
	cls
	gs'stat'
	brother += 5
	horny += RAND(10,15)
	minut += RAND(5,10)
	if brother_body_show = 0: brother_body_show = 1 & brother_anus_mem = anpic
	'<center><img src="images/qwest/alter/ev2/brother/f (2).jpg"></center>'
	if brotherQW = 4:
		if analplugIN = 1:
			'You turn the booty to his brother and lean, resting his elbows on his chair, revealing his views on <<$vaginatipe2>> pussy and <<$anustipe>> anus, which is inserted into the anal plug:'
			dynamic $brother_anus_check
		else
			'You turn the booty to his brother and lean, resting his elbows on his chair, revealing his views on <<$vaginatipe2>> pussy and <<$anustipe>> anus:'
			dynamic $brother_anus_check
		end
		'- "Pancake, ofiget" - After a short pause, says brother.'
		'- "You`re just going to stare?"'
		'- "Okay, Let`s start."'
		'You begin to explain to his brother all the difference between male and female body, why a woman breast , etc., simultaneously struggling with excitement mixed with shame of knowing, that you are standing naked in front of his cancer brother.'
		'- "And it hurts?" - It interrupts your brother.'
		'- "What?"'
		'- "Well, when you shove a member?"'
		if vagina > 0:
			brother_knows_not_virgin = 1
			'- "Only the first time or two"'
			'- "Have you tried?"'
			if sex = 0:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "No, have not tried."'
			elseif sex > 1 and sex < 10:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "Well, there were a few times" - you answer.'
			elseif sex > 10 and sex < 20:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "So was the case, I tried" - you answer.'
				'- "And many times already?"'
				'- "Enough"'
			elseif sex > 20:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "So was the case, I tried" - you answer.'
				'- "And many times already?"'
				'- "A lot of."'
			end
		else
			'- "I do not know, I did not try."'
			'- "Clear..."'
		end
		act'Further':gt 'brother','brother_voyeur_ev6'
	elseif brotherQW > 4:
		if analplugIN = 1:
			'You turn the booty to his brother and lean, resting his elbows on his chair, revealing his views on <<$vaginatipe2>> pussy and <<$anustipe>> anus, which is inserted into the anal plug:'
			dynamic $brother_anus_check
		else
			'You turn the booty to his brother and lean, resting his elbows on his chair, revealing his views on <<$vaginatipe2>> pussy and <<$anustipe>> anus:'
			dynamic $brother_anus_check
		end
		'- "Steep View!" - After a short pause, says brother.'
		'- "You`re just going to stare?"'
		'- "Okay, Let`s start."'
		'You begin to explain to his brother all the difference between male and female body, why a woman breast , etc., simultaneously struggling with excitement mixed with shame of knowing, that you are standing naked in front of his cancer brother.'
		'- "And it hurts?" - It interrupts your brother.'
		'- "What?"'
		'- "Well, when you shove a member?"'
		if vagina > 0:
			brother_knows_not_virgin = 1
			'- "Only the first time or two"'
			'- "Have you tried?"'
			if sex = 0:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "No, have not tried."'
			elseif sex > 1 and sex < 10:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "Well, there were a few times" - you answer.'
			elseif sex > 10 and sex < 20:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "So was the case, I tried" - you answer.'
				'- "And many times already?"'
				'- "Enough"'
			elseif sex > 20:
				'- "Never mind..."'
				'- "Well, Speak!"'
				'- "So was the case, I tried" - you answer.'
				'- "And many times already?"'
				'- "A lot of."'
			end
		else
			'- "I do not know, I did not try."'
			'- "Clear..."'
		end
		act'Further':gt 'brother','brother_voyeur_ev6'
		
	end
end

if $ARGS[0] = 'brother_voyeur_ev6':
	cla
	cls
	gs'stat'
	brother += 5
	horny += RAND(10,15)
	minut += RAND(5,10)
	'<center><img src="images/qwest/alter/ev2/brother/f (3).jpg"></center>'
	'You sit down on the heels of booty and turning, To see at Kolka and notice, that he has a strong riser, which is very noticeable through light clothes, and his face red with excitement.'
	if brotherQW = 4:
		'- "<<$name>>, but you can at-close show?"'
		'- "What show?"'
		'- "Well, you knew..."'
		'- "You do a little something? And so far gone..." - indignant answer you.'
		'- "Well show!"'
		if sub < 30: 
			act'Refuse and dress':gt $CURLOC
		end
		act'Show':gt 'brother','brother_voyeur_ev7'
	elseif brotherQW > 4:
		'- "<<$nickname>>, and show by-closer?"'
		'- "Again?"'
		'- "Again" - he smiles - "Come on, Th you break?"'
		if sub < 30: 
			act'Refuse and dress':gt $CURLOC
		end
		act'Show':gt 'brother','brother_voyeur_ev7'
	end
end


if $ARGS[0] = 'brother_voyeur_ev7':
	cla
	cls
	gs'stat'
	brother += 5
	horny += RAND(10,15)
	minut += RAND(5,10)
	'<center><img src="images/qwest/alter/ev2/brother/f (4).jpg"></center>'
	if brotherQW = 4:
		brotherQW = 5
		'You sits in a chair and spreads her legs wide. A little strongly you take the tips of your fingers labia and put them off a bit in the hand, revealing that their slightly <<$vaginatipe2>> pussy:' 
		'- "Ohrenet!..." - He sees a trembling voice your brother.'
		'- "Everything? Satisfied?"'
		'- "Wait-wait, give consideration!"'
		'- "Everything, enough." - you remove your hands and get up.'
		'- "Well, <<$name>>!"'
		'- "I said everything!" - strictly slice you and dress.'
		act 'Move away':gt $CURLOC
	elseif brotherQW > 4:
		'You sits in a chair and spreads her legs wide. You take the tips of your fingers labia and put them off a bit to the side, revealing that their slightly <<$vaginatipe2>> pussy:' 
		'- "Fucking!" - I see your brother.'
		'- "Satisfied?" - you ask.'
		'- "Nearly..."'
		ivrand = RAND (1,2)
		if brother_knows_not_virgin = 1 and vagina > 0 and ivrand = 1:
			'- "What else?"'
			'- "<<$name>>, and you can poke a finger inside?"'
			'- "Why?"'
			'- "Well, I`m curious to see."'
			act'Refuse':
				cla
				'- "No of course!"'
				'- "Why?" - he asks in bewilderment.'
				'- "Sam do you think?" - Strictly speaking , you get up and, starting to dress.'
				act 'Move away':gt $CURLOC
			end
			act'shove':
				cla
				cls
				gs'stat'
				'<center><img src="images/qwest/alter/ev2/brother/f (5).jpg"></center>'
				minut += RAND(5,10)
				'You are not saying a word, you entered my finger into the vagina and then another. The second hand automatically reached for the clitoris.'
				if vagina < 5:
					horny += RAND(2,5)
					'Slippery walls of your pussy very tightly clasped fingers.'
					elseif vagina >= 5 and vagina < 10:
					horny += RAND(5,10)
					'You feel your pussy slippery wall around your fingers.'
				elseif vagina >= 10:
					horny += RAND(2,5)
					'Your pussy is quite spacious for a couple of fingers and you are moving your fingers feel slippery walls your pussy.'
				end
				'Burning desire, you, without even realizing, You start masturbating right in the face of your brother.'
				'Accumulated excitation is completely clouded your mind and you do not even pay attention to what, that Kolka, looking at you, He took up the same right in front.'
				act'Further':gt 'brother','brother_voyeur_ev8'
			end
		else
			if brotherQW = 5:
				'- "What else?"'
				'- "Help me relieve the tension" - Kolka issues.'
				'- "You ohuel?"'
				'- "Just do not get dressed and sit in place, and I myself will do everything."'
				if sub < 30: 
					act'Refuse and dress':gt $CURLOC
				end
				act'Help':gt 'brother','brother_voyeur_ev8'
			elseif brotherQW > 5:
				'- "What else?"'
				'- "Come as last time? I really liked it" - Kolka issues.'
				if sub < 30: 
					act'Refuse and dress':gt $CURLOC
				end
				act'Help':gt 'brother','brother_voyeur_ev8'
			end
		end
		
	end
end

if $ARGS[0] = 'brother_voyeur_ev8':
	cla
	cls
	gs'stat'
	brother += 5
	horny += RAND(10,15)
	minut += RAND(5,10)
	ivrand = RAND(1,2)
	if sound = 0:PLAY 'sound/Moaning<<ivrand>>.mp3',30
		picrand = RAND(1,2)
	'<center><img src="images/qwest/alter/ev2/brother/f (6.<<picrand>>).jpg"></center>'
	'Going down from the chair onto the carpet, You can not overcome the excitement and desire, lying under drochaschim brother over you and caress her pussy.'
	if vagina > 0:'Your fingers get inside and you develop on the floor, softly moaning and panting.'
	'Your eyes are a member of a brother and you closely follow his every move, until the abdomen does not hit the shock and you do not give up the wave of strong orgasm, not paying attention to what, that your brother starts to finish right at you. Jets of his warm sperm fall on your stomach and you, writhing in orgasm, nonspecial bit smeared her own hands.'
	act'Further':
		cls
		cla
		CLOSE ALL
		gs'stat'
		picrand = RAND(1,2)
		'<center><img src="images/qwest/alter/ev2/brother/f (7.<<picrand>>).jpg"></center>'
		if brotherQW = 5:
			if brotherQW = 5:brotherQW = 6
			'Recovering you become aware of the incident:'
			'- "Ohuet!" - almost excitedly shout out you, We are looking at a drop of Spur in his stomach.'
			'- "Aha..." - Kolka said, out of breath.'
			'- "Whore... You... NO WORDS!"'
			'- "And I liked it..." - he says.'
			'- "to nobody! hear?! Not a word!"'
			'- "Yes, I realized, I realized. Do not shout, and the mother hears!"'
		elseif brotherQW > 5:
			'When he came to pick you at the head of a smiling brother:'
			'- "Again all finished me..."'
			'- "Aha..." - Kolka said, out of breath.'
			'- "asshole! Okay, go so far no one caught us"'
			'- "Come on... It was cool, <<$name>>!"'
		end
		act'Dress':gt $CURLOC
	end
end

--- brother ---------------------------------

