glife-shopfix/locations/brother

# brother
brotherAge = year - ((npc_dob['A34'] - (npc_dob['A34'] mod 10000)) / 10000)
if npc_QW['A34'] > 20 and npc_QW['A34'] < 25: npc_QW['A34'] = 20

! Variables used
! brothersawpirsF: Flag 0/1 Have your brother seen your nipple piercings
! npc_rel['A34']: relationship
! npc_dick['A34']: size of brothers dick (14cm)
! brotherSex: Number of sexual interactions with brother (cap at 10)
! npc_QW['A34']: 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
! brotherConfidence: if it is over 10 he might try and touch you during a homework (not used yet)

if $ARGS[0] = 'start':

	gs 'stat'
	'<center><b><font color="maroon">Kolka</font></b></center>'
	'<center><img src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
	'Your brother Kolka is younger than you, he''s <<brotherAge>> years old. While you share the same mother, unlike you and your sister, Kolka''s dad is your stepfather. He is a student at the same school as you, and enjoys soccer.'

	if npc_rel['A34'] < 20:'You and your brother argue all the time.'
	if npc_rel['A34'] >= 20 and npc_rel['A34'] < 40:'You and your brother bicker sometimes.'
	if npc_rel['A34'] >= 40 and npc_rel['A34'] < 60:'You and your brother have a normal relationship.'
	if npc_rel['A34'] >= 60 and npc_rel['A34'] < 80:'You have a good relationship with your brother.'
	if npc_rel['A34'] >= 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:
					npc_rel['A34'] -= 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:
					npc_rel['A34'] -= 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:
					npc_rel['A34'] -= 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:
				npc_rel['A34'] -= 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 at least 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

		if $clothingworntype = 'nude' and towel = 1 and tanga = 0:
			if brotherSex < 1:
				'Your brother sarcastically comments on the small towel you are wearing:'
				'<<$pcs_nickname>>, Are you sure that is not a hand towel?'
			elseif brotherSex >= 1:
				'Your brother sarcastically comments on the small towel you are wearing:'
				'Sister, are you wearing that for me?'
			end
		elseif $clothingworntype = 'nude' and pcs_pubes > 10 and tanga = 0:
			'"You should have shaved," your brother comments, "it looks like you''re growing a forest."'
		elseif $clothingworntype = 'nude':
			if brotherSex >= 1:
				'"<<$pcs_nickname>>, you have an amazing body"'
			else
				'"What a view! Have you decided to be a nudist?"'
				npc_rel['A34'] += 1
			end
		end
	end

	if $loc = 'gschool_grounds':
		if npc_rel['A34'] < 20:
			'Your brother frowns "I come here to get away from you!"'

			act 'Move away':gt $loc, $metka
			exit
		else
			if evgenQW >= 4 and pav_slut >= 75:
				'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 <<$pcs_nickname>>. Fancy a game of football?"'
				if $clothingworntype ! 'exercise':
					'"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
						npc_rel['A34'] += 5
						agil_exp += rand(0, 2)
						pcs_sweat += 30
						run_exp += rand(0, 2)
						fat -= rand(2, 7)
						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 are you talking about?':
								cls
								gs 'stat'
								'The boys hesitate, "Err.. nothing".'

								if pcs_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.'
										'They have found spare key for an AV lounge at the school that is not used in the evenings and you all sneak in.'

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

								elseif npc_QW['A34'] >=3:
									'Kolka hesitates for a moment then looks at you funny. "Actually <<$pcs_nickname>>, 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.'
										'They have found spare key for an AV lounge at the school that is not used in the evenings and you all sneak in.'

										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, "<<$pcs_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
					npc_rel['A34'] += 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/locations/pavlovsk/school/grounds/football4.jpg"></center>'
					else
						'<center><img src="images/locations/pavlovsk/school/grounds/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 pcs_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 npc_QW['A34'] >=3:
								'Kolka hesitates for a moment then looks at you funny. "Actually <<$pcs_nickname>>, 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 "<<$pcs_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

	if $loc = 'sitrPar':

		gs 'brother', 'pregreact'
		gs 'brother', 'brotherSexCount'

		if indorf = 0 and $clothingworntype ! 'nude' and brothersawpirsF=0 and father_go = 1 and npc_rel['A34'] > 85 and hour >= 18 and hour < 21 and pirsF > 0:
			act 'Show off your nipple piercings':
				cls
				gs 'stat'
				minut+=1
				pcs_horny += 3
				brothersawpirsF=1
				npc_rel['A34'] += 3
				'<center><img src="images/characters/pavlovsk/school/boy/kolka/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 apologise, 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 new additions."'
				end
				pcs_horny += 10
				act '<B>Move away</B>':gt 'sitrPar'
				exit
			end
		end


		if indorf = 0 and $clothingworntype = 'nude' and pirsF > 0 and brothersawpirsF = 0:
			if  brotherSex = 0:
				if npc_rel['A34'] >= 70:
					'"Looks good on you." your brother winks, and points toward your pierced nipples.'
					npc_rel['A34'] += 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'
					npc_rel['A34'] += 3
					brothersawpirsF = 1
					pcs_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.'
					npc_rel['A34'] += 3
					brothersawpirsF=1
					pcs_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 pcs_horny >= 90 and brothersex > 6:
					act 'Mount him':
						if brotherSex > 10: brotherSex = 10
						cls
						minut += 5
						pcs_horny += 10
						gs 'boyStat', 34
						pose = 0

						gs 'stat'

						'<center><img src="images/locations/shared/sex/sexrand/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 pcs_sleep <= 50 and rand(0,4) =0:

							$risk_boy = 'your own brother'
							dynamic $sexstart3
							gs 'brother', 'sleepsexcum'
						else
							protect = 0
							vidageday -= 1

							if prezik > 0:
								dynamic $prezik
								protect = 1
								if preziktype = 2:
									sexcontra = 7
									'You take a sabotaged condom and put it on <<$boydesc>>.'
								else
									sexcontra = 3
									'You take a condom and put it on <<$boydesc>>.'
								end

							end
						$risk_boy = 'your own brother'
						dynamic $sexstart3
						gs 'brother', 'sleepsexcum'
						end
					end
				else
					act 'Solve your brother''s morning problem':
						cls
						minut += 5
						pcs_horny += 10
						stat['bj'] += 1
						gs 'boyStat', 34
						spafinloc = 12
						sexpartkno = 1
						gs 'cum_manage'
						swallow += 1
						brotherSex += 1
						brotherSexCount -= 1
						brotherMorningSex = daystart
						gs 'stat'

						'<center><img src="images/shared/sex/blowjob/bj34.jpg"></center>'
						'Approaching your brother, you gently pull back the covers and begin to suck his <<dick>> 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, you 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,:'
				if sub > 0 or (evgenQW >= 4 and pav_slut >= 75):
					'"<<$pcs_nickname>>, help me sleep." Then he throws back the blanket, revealing his erection.'
					gs 'boyStat', 34
					brotherSexCount -= 1
					brotherNightSex = daystart

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

						gs 'brother', '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,:'
				if sub > 0 or (evgenQW >= 4 and pav_slut >= 75):
					gs 'boyStat', 34
					'"<<$pcs_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 <<dick>> cm dick.'
					brotherSexCount -= 1
					brotherEvSex = daystart

					gs 'brother', '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':
						gs 'boyStat', 34
						'"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 <<dick>> cm dick.'
						brotherSexCount -= 1
						brotherEvSex = daystart

						gs 'brother', '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

	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 npc_rel['A34'] >= 20 and brother_homework ! daystart and hour >= 18 and hour < 20:
		if RAND(1,3) = 1:
			cla
			cls
			gs'stat'
			'<center><b><font color = maroon>Kolka</font></b></center>'
			'<center><img src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
			'Your brother Kolka is younger than you, he''s <<brotherAge>> years old. While you share the same mother, unlike you and your sister, Kolka''s dad is your stepfather. He is a student at the same school as you, and enjoys soccer.'
			''
			'"<<$pcs_nickname>>, can you help me with my homework? I have a problem here I can''t solve."'
			act'Certainly, I will help you':gt 'brother', 'homework2'
			act'Later, I am busy now.':
				cla
				'Sorry, I''m busy right now.'
				act 'Leave': gt 'sitrPar'
			end
		else
			act'Offer help with homework': gt 'brother', 'homework'
		end
	end

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

if $ARGS[0] = 'sleepsexcum':
	brotherSex += 1
	minut += 15
	if protect ! 1:
		!!Unprotected sex

		if rand(0, 100) > pcs_horny:
			!!Inside
			sexpartkno = 1
			gs 'cum_manage'
			'<<$boydesc>> groans and you feel a jet of sperm fill your pussy.'
			pcs_mood -= 15
			pcs_willpwr -= 15

			gs 'cuminsidereact', 'your own brother'
		else
			!!Out

			if pose = 0:
				if rand(0,1) = 0:
					spafinloc = 14
					'<<$boydesc>> groans and you quickly pull yourself off of his dick. His hot sperm squirts on your stomach.'
				else
					spafinloc = 1
					'<<$boydesc>> groans and you quickly pull 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
					'<<$boydesc>> groans and you quickly pull yourself off of his dick. His hot sperm squirts on your back.'
				else
					spafinloc = 4
					'<<$boydesc>> groans and you quickly pull 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 <<$boydesc>> and look at his dick. and think "Oh shit! The condom burst."'
		elseif sexcontra = 5:
			'You pull off of <<$boydesc>> and look at his dick. and think "Oh shit! The condom is missing!"'
		else
			'<<$boydesc>> groans and you realize that he came in the condom.'
		end
		gs 'cuminsidereact', 'your own brother'
	end

	pose = 0
	if sexcontra > 0: sexcontra = 0
	$risk_boy = ''

	gs 'stat'

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

if $ARGS[0] = 'showbody':
	cla
	if npc_QW['A34'] = 3:
		cls
		cla
		minut += RAND(3,5)
		gs'stat'
		'<center><b><font color = maroon>Kolka</font></b></center>'
		'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/homework1.jpg"></center>'
		'After you both finish studying, Kolka goes red with excitement and asks:'
		'"<<$pcs_nickname>>, I have to learn about human anatomy, but I am having trouble with it. Can you help me?'
		'"What do you mean?" You ask, a little confused.'
		'"Well, um..." Kolka hesitated, "Can you show me what girls look like...'
		if sub < 30:
			act'No way':
				cla
				'"How the fuck can I do that? Should I just take my clothes off in front of you and let you gawk at me? I''m your sister!"'
				'"Yes, you are right. I''m sorry..." Kolka responded in embarrassment.'
				act 'Finish':gt $loc, $metka
			end
		end

		act'Huh...':
			cla
			npc_QW['A34'] = 4
			'You briefly reflect on your brother''s request and reply, "How would you want me to do that? Should I just take my clothes off in front of you and let you gawk at me!?"'
			'"Well... That would help but you could also explain each part." He adds.'
			'You sigh and shake your head, "Surely your text books have pictures"'
			'"There are pictures, but everything is so badly written, and the teacher skipped the lesson, saying "You already know everything." He explains with flushed face.'
			'"Okay, I will help you, but only if you don''t tell anyone. Agreed? I''m serious, not a single person!" You say in a strict tone.'
			'"<<$pcs_nickname>>, I promise not a word to anyone!"'
			'After his promise you consider what to do.'

			act'Undress':gt'brother','brother_voyeur_ev4'
			act'Don''t do it':gt $loc, $metka
		end
	elseif npc_QW['A34'] > 3:
		act'Undress again':gt'brother','brother_voyeur_ev4'

		if sub < 30: act'Enough for today':gt $loc, $metka
		exit
	else
		act 'Finish':gt $loc, $metka
	end
end

if $ARGS[0] = 'homework':
	cla
	cls
	gs'stat'
	minut += 1
	'<center><b><font color = maroon>Kolka</font></b></center>'
	'<center><img src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
	'Your brother Kolka is younger than you, he''s <<brotherAge>> years old. While you share the same mother, unlike you and your sister, Kolka''s dad is your stepfather. He is a student at the same school as you, and enjoys soccer.'
	''
	textrand = RAND(1,3)
	if textrand = 1:
		'"Kolka, would you like help with your homework?"'
		'"Yes, that would be good."'
	elseif textrand = 2:
		'"Kolka, How are you going with your classes? Do you want help?"'
		'"Yes, that would be good."'
	elseif textrand = 3:
		'"Kolka, do you need help with your homework?"'
		'"Yes, I need help."'
	end

	act 'Further': gt 'brother', 'homework2'
end

if $ARGS[0] = 'homework2':
	brother_homework = daystart
	npc_rel['A34'] += 1
	minut += RAND(50,70)
	ivrand = RAND(1,2)
	if npc_QW['A34'] >= 2 and npc_rel['A34'] >= 60 and ivrand = 1:
		cls
		gs'stat'
		'<center><b><font color = maroon>Kolka</font></b></center>'
		'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/homework_touch.gif" width="1000" height="422"></center>'
		if npc_QW['A34'] = 2:
			cla
			pcs_horny += RAND(5,10)
			'As you explain the material, Kolka suddenly began to slowly stroke your leg with his hand. You freeze in surprise, not knowing what to do.'
			act'Ignore and continue':
				cla
				npc_QW['A34'] = 3
				npc_rel['A34'] += 2
				pcs_horny += RAND(5,10)
				'You decide to continue to do homework, trying not to pay attention to Kolka''s hand on your leg. He realizes that you don''t mind so he continues to stroke higher up your leg.'
				act 'Finish': gt 'sitrPar'
			end
			act'Remove hand and continue':
				cla
				pcs_horny += RAND(1,5)
				pcs_dom += 1
				'You decide to remove his hand and continue to do homework. Kolka begins to blush and starts to try hard to solve the problems. While not looking you in the eye.'
				act 'Finish': gt 'sitrPar'
			end
		elseif npc_QW['A34'] >= 3:
			cla
			pcs_horny += RAND(5,10)
			'As soon as you begin to explain the material, Kolka begins again to stroke your leg his hand.'
			act'Ignore and continue':
				cla
				npc_rel['A34'] += 2
				pcs_horny += RAND(5,10)
				'You continue to do the homework, trying hard not to pay attention to Kolka''s hand on your leg. Kolka knowing that you do not mind continues to have nice feel of your leg. You feel the warm rush of excitement.'
				ivrand = RAND(1,3)
				if brotherSex > 0 and father_go = 1 and ivrand = 1 and brotherEvSex ! daystart:
					cla
					'After you finish explaining the new material, Kolka goes red with excitement and asks:'
					'"<<$pcs_nickname>>, Can you help me out here now?"'
					gs 'brother', 'brotherSexStart'
					act 'No': gt 'sitrPar'
				elseif ivrand = 2 and brotherEvSex ! daystart:
					gs 'brother', 'showbody'
				else
					act 'Finish': gt 'sitrPar'
				end
			end
			act'Remove hand and continue':
				cls
				cla
				pcs_horny += RAND(1,5)
				npc_rel['A34'] -= 5
				'<center><b><font color = maroon>Kolka</font></b></center>'
				'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/homework1.jpg"></center>'
				'You whisper:'
				'"Don''t, Our parents will see us." You remove his hand from your leg.'
				'Kolka mutters something under his breath with grim resentment on his face.'

				act 'Finish': gt 'sitrPar'
			end
		end
	else
		cls
		gs'stat'
		'<center><b><font color = maroon>Kolka</font></b></center>'
		'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/homework1.jpg"></center>'
		'You help your brother with his homework for an hour.'

		act 'Finish': gt 'sitrPar'
	end
end

if $ARGS[0] = 'brotherSexStart':
	cla
	gs 'boyStat', 34
	if brotherSex = 0:brotherSex = 1 & guy += 1
	act 'Jerk your brother':
		cls
		minut += 5
		stat['hj'] += 1
		gs 'stat'

		'<center><img src="images/shared/sex/handjob/hj1.jpg"></center>'
		'You take his hard cock in your hand and begin to masturbate him. Finally your brother groans and you watch sperm erupt from his cock.'
		spafinloc = 13
		sexpartkno = 1
		gs 'cum_manage'
		gs 'brother', 'brotherSexEnd'
	end
	if brotherSex > 4:
		act 'Suck your brother':
			cls
			minut += 5
			pcs_horny += 10
			stat['bj'] += 1
			gs 'stat'

			'<center><img src="images/characters/pavlovsk/school/boy/kolka/sex/blow0,<<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 "<<$pcs_nickname>>, I''m cumming."'

			act 'Suck on':
				cls
				minut += 5
				pcs_horny += 10
				gs 'boyStat', 34
				spafinloc = 12
				sexpartkno = 1
				gs 'cum_manage'
				swallow += 1
				gs 'stat'

				'<center><img src="images/shared/sex/cum/mouth/cum1,<<rand(0,11)>>.gif"></center>'

				dynamic $dinrandswallow

				gs 'brother', 'brotherSexEnd'
			end
			act 'Remove from your mouth':
				cls
				minut += 5
				pcs_horny += 10
				gs 'boyStat', 34
				spafinloc = 11
				sexpartkno = 1
				gs 'cum_manage'
				facial += 1
				gs 'stat'

				'<center><img src="images/shared/sex/cum/facial/facial21.jpg"></center>'
				'You take his dick out of your mouth and you feel a hot jet of sperm hit your face then a few more cover your face until finally your brother is spent and your face is covered in his cum.'

				gs 'brother', 'brotherSexEnd'
			end
			if brotherSex > 6:
				act 'Give yourself to your brother':
					if brotherSex > 10: brotherSex = 10
					cls
					minut += 5
					pcs_horny += 10
					gs 'boyStat', 34

					gs 'stat'

					'<center><img src="images/characters/pavlovsk/school/boy/kolka/sex/sex,<<rand(0,11)>>.gif"></center>'
					'You lie on the sofa and brother lies on top of you.'

					$risk_boy = 'your own brother'
					dynamic $sexstart
					dynamic $sexstart2
					dynamic $sexcum

					gs 'brother', 'brotherSexEnd'
				end
			end
			if brotherSex >= 10:
				act 'Offer your ass to your brother':
					cls
					minut += 5
					pcs_horny += 10
					gs 'boyStat', 34

					gs 'stat'

					!Pictures already in folder - Gifs should be added.
					'<center><img src="images/characters/pavlovsk/school/boy/kolka/sex/anal,<<rand(0,4)>>.gif"></center>'
					'You turn away from Kolka and give him an inviting look while you spread your butt. He doesn''t need more encouragement than that.'

					dynamic $analsex

					gs 'brother', 'brotherSexEnd'
				end
			end
		end
	end
	if brotherSex > 6:
		act 'Give yourself to your brother':
			if brotherSex > 10: brotherSex = 10
			cls
			minut += 5
			pcs_horny += 10
			gs 'boyStat', 34

			gs 'stat'

			'<center><img src="images/characters/pavlovsk/school/boy/kolka/sex/sex,<<rand(0,11)>>.gif"></center>'
			'You lie on the sofa and brother lies on top of you.'

			$risk_boy = 'your own brother'
			dynamic $sexstart
			dynamic $sexstart2
			dynamic $sexcum

			gs 'brother', 'brotherSexEnd'
		end
	end
	if brotherSex >= 10:
		act 'Offer your ass to your brother':
			cls
			minut += 5
			pcs_horny += 10
			gs 'boyStat', 34

			gs 'stat'

			'<center><img src="images/characters/pavlovsk/school/boy/kolka/sex/anal,<<rand(0,4)>>.gif"></center>'
			'You turn away from Kolka and give him an inviting look while you spread your butt. He doesn''t need more encouragement than that.'

			dynamic $analsex

			gs 'brother', 'brotherSexEnd'
		end
	end
end

if $ARGS[0] = 'brotherSexEnd':
	brotherSex += 1
	if sub > 0 or (evgenQW >= 4 and pav_slut >= 75):
		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 <<$pcs_nickname>>, good job, just remember this is our little secret!", He continues to go about his business.'
			act 'Leave': gt 'sitrPar'
		elseif $loc = 'sitrPar':
			minut += 15

			gs 'stat'

			'Kolka catches his breath, then says, "Nice one <<$pcs_nickname>>, you''re well trained. Now don''t tell anyone!", and falls asleep.'
			act 'Leave': gt 'sitrPar'
		else
			'Kolka says, "Nice one <<$pcs_nickname>>, you''re well trained, Now don''t tell anyone!", and leaves.'

			act 'Continue':gt $loc, $metka
		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, <<$pcs_nickname>>, You helped me a lot", He continues to go about his business.'
			act 'Leave': gt 'sitrPar'
		elseif $loc = 'sitrPar':
			minut += 15

			gs 'stat'

			'Kolka catches his breath, then says, "Thank you, <<$pcs_nickname>>, You saved me , now I can finally sleep.", and goes to sleep.'
			act 'Leave': gt 'sitrPar'
		else
			'Kolka says, "Thanks for everything, Sis. Well, I''m off.", and leaves.'

			act 'Continue':gt $loc, $metka
		end
	end
end

if $ARGS[0] = '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

end

if $ARGS[0] = 'brother_go_away':
	cla
	cls
	gs'stat'
	pcs_horny += RAND(5,10)
	minut += RAND(5,10)
	npc_rel['A34'] -= 10
	pcs_dom += 1
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/b (13).jpg"></center>'
	'You hide your pussy with your hands and shout at your brother:'
	'"Kolka! What the fuck? Get the fuck out of here, you 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'
	pcs_horny += RAND(5,10)
	minut += RAND(5,10)
	picrand = RAND(1,2)
	npc_rel['A34'] += 5
	pcs_mood += 10
	pcs_willpwr = pcs_willpwr + 10
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/b (end<<picrand>>).jpg"></center>'
!--- Need to expand
!	if npc_QW['A34'] < 5
		'Confused, surreptitiously looking at your brother, You take a towel and wrap around your flushed, steamed body.'
		'You shudder at the realization this is wrong. Kolka quietly closes the door and tiptoes out.'
		'You feel uncomfortable and ashamed, but smile at recalling his wide open eyes, his flushed face and red ears and how they increased the more you decided to tease him.'
!	else
!	end
	act 'Exit the bathroom':mirror_steam = hour & gt $locM, $metkaM
end

if $ARGS[0] = 'brother_voyeur_ev1':
	cla
	cls
	gs'stat'
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	picrand = RAND(2,7)
	npc_rel['A34'] += 5
	if npc_QW['A34'] < 1: npc_QW['A34'] = 1
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/b (<<picrand>>).jpg"></center>'
	'You continue to wash as if nothing has happened, glancing at your brother. You carefully wash 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 pcs_horny >= 40:
		act 'Play with your tits':gt 'brother','brother_voyeur_ev2'
	end
end

if $ARGS[0] = 'brother_voyeur_ev2':
	cla
	cls
	gs'stat'
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	picrand = RAND(1,7)
	npc_rel['A34'] += 5
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/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 immersed in a fantasy, your heart flutters and you elicit a light moan.'
	act 'Wash':gt 'brother','brother_voyeur_end'
	if pcs_horny >= 90:
		act 'Direct the water at your pussy':gt 'brother','brother_voyeur_ev3'
		if npc_QW['A34'] >= 4 and npc_rel['A34'] > 60:act 'Invite him in':gt 'brother','brother_voyeur_ev3_2'
	end
end

if $ARGS[0] = 'brother_voyeur_ev3':
	cls
	gs'stat'
	if npc_QW['A34'] <= 1: npc_QW['A34'] = 2
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	picrand = RAND(1,2)
	npc_rel['A34'] += 5
	pcs_horny = 0
	orgasm = orgasm + 1
	stat['mast'] += 1
	pcs_mood += 15
	pcs_willpwr += 15
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/d (<<picrand>>).jpg"></center>'
	'You Set your feet a little wider and channel water from a hose on to your pussy. From the surging pleasure you start breathing heavily and moaning softly. Soon you feel warm waves covers your whole body and you began to shudder in orgasm.'
	act 'Wipes':gt 'brother','brother_voyeur_end'
end

if $ARGS[0] = 'brother_voyeur_ev3_2':
	cls
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	brother += 15
	brotherConfidence += 5
	if pcs_vag < npc_dick['A34']: pcs_vag += 1
	pcs_horny = 0
	orgasm += 1
	stat['vaginal'] += 1
	pcs_mood += 15
	pcs_willpwr += 15
	gs 'cum_call', '', 'A34', 1
	gs'stat'
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/broShower.gif"></center>'
	'After you gesture for Kolka to enter the room he closes the latch on the door.'
	if brother_knows_not_virgin = 1:
		'"I dreamt about this, you know," he says, quickly shedding his clothing before stepping into the shower.'
		'You turn your ass to Kolka as he pulls out his <<npc_dick[''A34'']>> cm long member, sliding into your pussy.'
	else
		'"Are you, you know,..."'
		'"A virgin?" you ask him smiling.'
		'"Yeah," he says with a red head and an embarrassed expression on his face.'
		if stat['vaginal'] = 1:
			'"Yes, I am. You will be my first, little brother."'
			'He gulps, then quickly shedding his clothing he steps into the shower.'
			'You turn your ass to Kolka as he pulls out his <<npc_dick[''A34'']>> cm long member, sliding into your pussy.'
			if stat['hidden_vaginal'] > 0:
				'To your surprise his entry in your pussy does not cause you any pain. Of course you have heard about stories that say it didn''t hurt, but you always thought it fake. You feel lucky to be wrong about that.'
			else
				'You feel a small, sharp pain between you legs, like a needle, but it quickly fades, as you look back at Kolka, his expression pure rapture.'
			end
		elseif npc_dick['A34'] > pcs_vag:
			'You turn your ass to Kolka as he pulls out his <<npc_dick[''A34'']>> cm long member, sliding into your pussy.'
			'Kolka''s dick causes you to flinch a little as your pussy stretches to accept his size.'
		else
			'You turn your ass to Kolka as he pulls out his <<npc_dick[''A34'']>> cm long member, sliding into your pussy.'
			'Kolka''s dick causes you to groan a little as your pussy readily accepts him into your depth.'
		end
		brother_knows_not_virgin = 1
	end
	'You brother starts to move in your body and you soon feel the oncoming waves of an orgasm. You suddenly grab his hands on your hip, gripping it strongly as you are overtaken by the hot waves of pleasure, your body doing its best to milk him dry.'
	'Suddenly Kolka groans as he cums inside, spurt after spurt of sperm shooting deep, while your still spasming body makes sure that nothing is left in him.'
	gs 'cuminsidereact'
	'Kolka''s breathing starts to settle as he says, "Thank you <<$pcs_nickname>>. You made me very happy right now."'
	'After a few seconds he withdraws, kisses you on the cheek and towels himself. He looks at you, still under the shower as he quickly dresses up.'
	'"That was one of the best thing I have ever done. Thank you!" he says, then he quitely listens at the door for any movement outside, opens the door and leave you alone.'
	act 'Finish showering':gt 'brother','brother_sex_end'
end

if $ARGS[0] = 'brother_sex_end':
	cls
	$risk_boy = ''
	gs'stat'
	pcs_horny += RAND(5,10)
	minut += RAND(2,5)
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/shower/shower.gif"></center>'
	'You stay under the shower for a while, touching yourself, remembering Kolka inside of you.'
	if brothersex > 10:
		'You really enjoyed this little thirst, and in secret you are hoping in a repeat.'
	elseif brothersex > 0:
		'You are a little bevilded that you just had sex with your own brother, in the shower, not the least, but you can''t deny that you enjoyed it, maybe more so because it is taboo.'
 	else
		'You can''t believe that you just had sex with your little brother. You are in a small shock, but also feel a strange glow too, even knowing that this is fundamentally wrong.'
	end
	act 'Exit the bathroom':mirror_steam = hour & gt $locM, $metkaM
end

if $ARGS[0] = 'brother_voyeur_ev4':
	cla
	cls
	gs'stat'
	npc_rel['A34'] += 5
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (1).jpg"></center>'
	if npc_QW['A34'] <= 4:
		npc_QW['A34'] = 4
		'You check whether the door is closed to the hall, then silently and quickly removed your clothes and sit down on the chair next to the sofa, you feel a little embarrassed and cover your breasts with your hands:'
		'"Well Kolka, what do you need explained?" You ask, feeling like the whole situation is unreal.'
		'"Umm..." was the only noise Kolka was able to squeeze out while staring at you goggle-eyed.'
		'"Kolka, are you just going to stare or do you really need help?" You say harshly, noting the growing bump in his pants.'
		'"No-no, I need help!"'
		'"Good, the faster start we start - the quicker we finish"'
		'"Erm.. yeah."'

		act'Further':gt 'brother','brother_voyeur_ev5'
	elseif npc_QW['A34'] >= 4:
		'You check whether the door is closed to the hall, then silently and quickly removed your clothes and sit down on the chair next to the sofa, you slightly cover your breasts with your hands hands:'
		'"They say repetition is the mother of learning." Your brother says.'
		'"Something like that" you smile as you reply.'

		act'Further':gt 'brother','brother_voyeur_ev5'
	end
end

if $ARGS[0] = 'brother_voyeur_ev5':
	cla
	cls
	gs'stat'
	npc_rel['A34'] += 5
	pcs_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/characters/pavlovsk/resident/kolka/event/homework/f (2).jpg"></center>'
	if npc_QW['A34'] = 4:
		if analplugIN = 1:
			'You turn your booty towards your brother and lean forwards, resting your elbows on the chair, revealing your <<$vaginatipe2>> pussy and <<$anustipe>> anus, which has a anal plug inserted into it:'
			gs 'brother', 'anus_check'
		else
			'You turn your booty towards your brother and lean forwards, resting your elbows on the chair, revealing your <<$vaginatipe2>> pussy and <<$anustipe>> anus:'
			gs 'brother', 'anus_check'
		end
		'"Ohh....." Kolka says after a short pause.'
		'"Are you just going to stare?"'
		'"N..no, Let''s start."'
		'You begin to explain to your brother all the differences between the male and female body, why a woman has breasts , etc., simultaneously struggling with excitement and shame knowing that you are naked in front of your brother.'
		'"Does it hurt?" Kolka interrupts.'
		'"Does what hurt?"'
		'"When a boy puts it in?"'
		if pcs_vag > 0:
			brother_knows_not_virgin = 1
			'"Only the first time or two"'
			'"Have you tried?"'
			if stat['vaginal'] = 0:
				'"Never mind..."'
				'"Well, tell me!"'
				'"No, I have not tried."'
			elseif stat['vaginal'] < 10:
				'"Never mind..."'
				'"Well, tell me!"'
				'"I have a few times you answer.'
			elseif stat['vaginal'] < 20:
				'"Never mind..."'
				'"Well, tell me!"'
				'"Yes, I have tried it" you answer.'
				'"How many times?"'
				'"Enough times."'
			else
				'"Never mind..."'
				'"Well, tell me!"'
				'"Yes, I have tried it" You answer.'
				'"How many times?"'
				'"A lot."'
			end
		else
			'"I don''t know, I haven''t tried it."'
			'"Oh..."'
		end
		act'Further':gt 'brother','brother_voyeur_ev6'
	elseif npc_QW['A34'] > 4:
		if analplugIN = 1:
			'You turn your booty towards your brother and lean forwards, resting your elbows on the chair, revealing your <<$vaginatipe2>> pussy and <<$anustipe>> anus, which has a anal plug inserted into it:'
			gs 'brother', 'anus_check'
		else
			'You turn your booty towards your brother and lean forwards, resting your elbows on the chair, revealing your <<$vaginatipe2>> pussy and <<$anustipe>> anus:'
			gs 'brother', 'anus_check'
		end
		'"Wow, Nice view!" Kolka says after a short pause.'
		'"Are you just going to stare?"'
		'"No.., Let''s start."'
		'You begin to explain to your brother all the differences between the male and female body, why a woman has breasts , etc., simultaneously struggling with excitement and shame knowing that you are naked in front of your brother.'
		'"Does it hurt?" Kolka interrupts.'
		'"Does what hurt?"'
		'"When a boy puts it in?"'
		if pcs_vag > 0:
			brother_knows_not_virgin = 1
			'"Only the first time or two"'
			'"Have you tried?"'
			if stat['vaginal'] = 0:
				'"Never mind..."'
				'"Well, tell me!"'
				'"No, I have not tried."'
			elseif stat['vaginal'] < 10:
				'"Never mind..."'
				'"Well, tell me!"'
				'"I have tried it a few times" You answer.'
			elseif stat['vaginal'] < 20:
				'"Never mind..."'
				'"Well, tell me!"'
				'"Yes, I have tried it." You answer.'
				'"How many times?"'
				'"Enough times."'
			else
				'"Never mind..."'
				'"Well, tell me!"'
				'"Yes, I have tried it" You answer.'
				'"How many times?"'
				'"A lot."'
			end
		else
			'"I don''t know, I haven''t tried it."'
			'"Oh..."'
		end
		act'Further':gt 'brother','brother_voyeur_ev6'

	end
end

if $ARGS[0] = 'anus_check':
	if analplugIN = 1:
		if brother_saw_analplug = 0:
			brother_saw_analplug = 1
			'"Wow, what is that and why?" Kolka is perplexed referring to sex-toy in your ass.'
			'"I like it and it feels good"'
			'"Wow! Really?"'
			'"Well yes..." You answered a little embarrassed.'
			'"And how does it feel?"'
			'"Do you want to try?"'
			'"Em... No, thank you. <<$pcs_nickname>>, do all girls like it?"'
			'"I don''t know... I haven''t asked them all" you blush as the conversation continues.'
		elseif brother_saw_analplug = 1:
			'"There it is again with this thing in your ass?" asked Kolka, obviously referring to sex-toy in your ass.'
			'"Aha..." you coquettishly answer.'
			if  brotherSex > 0:
				'"Maybe you should take it out and put it back in?" He asks.'
				'"Maybe next time, Kolka"'
			else
				'"Pervert!"'
			end
		end
	else
		if brother_anus_mem < anpic:
			'"<<$pcs_nickname>>, I think your hole is wider?"'
			'"What?"'
			'"I''m serious, it''s different then before!"'
			'"Don''t lie, Nothing there has changed, and it is not necessary for you to stare at it!" You say embarrassed.'
			'"It has changed! Before it was smaller! <<$pcs_nickname>>, do you give up your ass?"'
			'"What!? No of course not!" you blush.'
			'"Just tell me!"'
			'"Kolka, fuck off!" you say angrily'
			'"Okay-okay, I will be quiet..."'
		end
	end
end

if $ARGS[0] = 'brother_voyeur_ev6':
	cla
	cls
	gs'stat'
	npc_rel['A34'] += 5
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (3).jpg"></center>'
	'You sit down on your heels and turn your booty towards Kolka, You notice that he has a large bump in his pants, which is very noticeable through light clothes and his face red with excitement.'
	if npc_QW['A34'] = 4:
		'"<<$pcs_nickname>>, can you show me up close?"'
		'"Show you what up close?"'
		'"You know." Kolka points towards your vagina'
		'"I don''t know, I think this has gone too far already." you answer indignantly.'
		'"Please show me!" Kolka pleads'
		if sub < 30:
			act'Refuse and dress':gt $loc, $metka
		end
		act'Show':gt 'brother','brother_voyeur_ev7'
	elseif npc_QW['A34'] > 4:
		'"<<$pcs_nickname>>, how about closer?"'
		'"Closer again?"'
		'"Again." He grins "Please?"'
		if sub < 30:
			act'Refuse and dress':gt $loc, $metka
		end
		act'Show':gt 'brother','brother_voyeur_ev7'
	end
end


if $ARGS[0] = 'brother_voyeur_ev7':
	cla
	cls
	gs'stat'
	npc_rel['A34'] += 5
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (4).jpg"></center>'
	if npc_QW['A34'] = 4:
		npc_QW['A34'] = 5
		'You sit in the chair and spreads your legs wide. Using the tips of your fingers you part your labia slightly revealing your <<$vaginatipe2>> pussy:'
		'"Oh..." Your brother says in a trembling voice.'
		'"That''s Everything? Are you Satisfied?"'
		'"Wait-wait, more please!"'
		'"That was Everything, that''s enough." You remove your hands and get up.'
		'"Wait, <<$pcs_nickname>>!"'
		'"I said enough!" You say in a harsh tone and dress.'
		act 'Move away':gt $loc, $metka
	elseif npc_QW['A34'] > 4:
		'You sit in the chair and spreads your legs wide. Using the tips of your fingers you part your labia slightly revealing your <<$vaginatipe2>> pussy:'
		'"Wow!" Your brother exclaims.'
		'"Satisfied now?" You ask.'
		'"Nearly..."'
		ivrand = RAND (1,2)
		if brother_knows_not_virgin = 1 and pcs_vag > 0 and ivrand = 1:
			'"What else?"'
			'"<<$pcs_nickname>>, can you poke a finger inside?"'
			'"Why?"'
			'"I''m curious to see."'
			act'Refuse':
				cla
				'"No, of course not!"'
				'"Why?" he asks in bewilderment.'
				'"No fucking way, you are my brother." you get up and start to dress.'
				act 'Move away':gt $loc, $metka
			end
			act'Insert':
				cla
				cls
				gs'stat'
				'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (5).jpg"></center>'
				minut += RAND(5,10)
				'Not saying a word, you push one finger into your vagina and then add a second finger. Your other hand instinctively reaches for your clitoris.'
				if pcs_vag < 5:
					pcs_horny += RAND(2,5)
					'The slippery walls of your pussy are very tightly clasped your fingers.'
					elseif pcs_vag >= 5 and pcs_vag < 10:
					pcs_horny += RAND(5,10)
					'You feel your pussy''s slippery walls around your fingers.'
				elseif pcs_vag >= 10:
					pcs_horny += RAND(2,5)
					'Your pussy is quite spacious for a couple of fingers when you move your fingers you feel slippery walls of your pussy.'
				end
				'Burning with desire and without even realizing, You begin masturbating right in front the of your brother.'
				'Horniness has completely clouded your mind and you have stopped paying attention to Kolka. As he stands in front of you staring.'
				act'Further':gt 'brother','brother_voyeur_ev8'
			end
		else
			if npc_QW['A34'] = 5:
				'"Anything else?"'
				'"Can you help me relieve some tension?" Kolka asks.'
				'"How?"'
				'"Just don''t get dressed and stay there, I will do everything myself."'
				if sub < 30:
					act'Refuse and dress':gt $loc, $metka
				end
				act'Help':gt 'brother','brother_voyeur_ev8'
			elseif npc_QW['A34'] > 5:
				'"Anything else?"'
				'"Same as last time? I really liked it" Kolka asks.'
				if sub < 30:
					act'Refuse and dress':gt $loc, $metka
				end
				act'Help':gt 'brother','brother_voyeur_ev8'
			end
		end

	end
end

if $ARGS[0] = 'brother_voyeur_ev8':
	cla
	cls
	npc_rel['A34'] += 5
	pcs_horny += RAND(10,15)
	minut += RAND(5,10)
	ivrand = RAND(1,2)
	brotherConfidence += 4
	if brotherConfidence < 10 and brotherSex < 1:
		gs 'cum_call', 'stomach', 'A34', 1, 0, 0, rand(20,30)
		gs 'cum_call', 'breasts', 'A34', 1, 0, 0, rand(10,20)
		gs 'cum_call', 'labia', 'A34', 1, 0, 0, rand(10,20)
		gs'stat'
		if sound = 0:PLAY 'sound/Moaning<<ivrand>>.mp3',30
			picrand = RAND(1,2)
		'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (6.<<picrand>>).jpg"></center>'
		'Getting down from the chair and onto the carpet, You are overcome with excitement and desire, lying under your brother you begin to caress your pussy.'
		if pcs_vag > 0:'You slip your fingers inside while softly moaning and panting.'
		'You spot your brother''s member and you closely follow his every move, you feel warmth and excitement build up in your abdomen, you start to feel an orgasm coming, not paying attention to what your brother doing he groans and jets of his warm sperm cover your stomach while you begin writhing in orgasm smearing the cum over your body with your hands.'
		act'Further':
			cls
			cla
			CLOSE ALL
			gs'stat'
			picrand = RAND(1,2)
			'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (7.<<picrand>>).jpg"></center>'
			if npc_QW['A34'] = 5:
				if npc_QW['A34'] = 5:npc_QW['A34'] = 6
				'Recovering from your orgasm you are now aware of what has happened:'
				'"Oh!" He exclaims almost too loudly while looking at the cum on your stomach.'
				'"Aha..." Kolka said, out of breath.'
				'"Whore... You... NO WORDS!"'
				'"And I liked it..." He grins.'
				'"Not a word to anyone!"'
				'"Yes, I know and don''t shout our mother might hear you!"'
			elseif npc_QW['A34'] > 5:
				'You look at your brother who is smiling:'
				'"Aha..." Kolka says, out of breath.'
				'"Lucky no one caught us"'
				'"Come on... <<$pcs_nickname>> it was fun!"'
			end
			act'Dress':gt $loc, $metka
		end
	elseif brotherSex > 0:
		cls
		minut += 5
		pcs_horny += 10
		stat['bj'] += 1
		gs 'boyStat', 34
		spafinloc = 12
		sexpartkno = 1
		gs 'cum_manage'
		swallow += 1
		brotherSex += 1
		brotherSexCount -= 1
		brotherEvSex = daystart
		gs 'stat'
		picrand = RAND(1,2)
		'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (6.<<picrand>>).jpg"></center>'
		'Getting down from the chair and onto the carpet, You are overcome with excitement and desire, lying under your brother you begin to caress your pussy.'
		if pcs_vag > 0:'You slip your fingers inside while softly moaning and panting.'
		'You spot your brother''s member and you closely follow his every move, he moves it towards your mouth, you open you lips and take it in greedily. You feel warmth and excitement build up in your abdomen, you start to feel an orgasm coming, focusing on your brother''s member it begins to twitch, he groans and jets of his warm sperm fill your mouth you begin writhing as your orgasm washes over you at the same time.'
		act'Further':
			cls
			cla
			CLOSE ALL
			gs'stat'
			'<center><img src="images/shared/sex/cum/mouth/cum46.jpg"></center>'
			'Recovering from your orgasm you are now aware of what has happened:'
			'You slowly move your mouth away from you brother''s member.'
			'Kolka catches his breath, then says, "Nice one <<$pcs_nickname>>, good job, just remember this is our little secret!", He continues to go about his business.'
			'You don''t say anything as you get dressed.'
			act'Dress':gt $loc, $metka
		end
	elseif brotherConfidence > 10 and brotherSex = 0:
		cls
		minut += 5
		pcs_horny += 10
		stat['bj'] += 1
		gs 'boyStat', 34
		spafinloc = 12
		sexpartkno = 1
		gs 'cum_manage'
		swallow += 1
		brotherSex += 1
		brotherSexCount -= 1
		brotherEvSex = daystart
		gs 'stat'
		picrand = RAND(1,2)
		'<center><img src="images/characters/pavlovsk/resident/kolka/event/homework/f (6.<<picrand>>).jpg"></center>'
		'Getting down from the chair and onto the carpet, You are overcome with excitement and desire, lying under your brother you begin to caress your pussy.'
		if pcs_vag > 0:'You slip your fingers inside while softly moaning and panting.'
		'You spot your brother''s member and you closely follow his every move, slowly he moves it towards your mouth, you open you lips and take it in. You feel warmth and excitement build up in your abdomen, you start to feel an orgasm coming, focusing on your brother''s member it begins to twitch, he groans and jets of his warm sperm fill your mouth you begin writhing as your orgasm washes over you at the same time.'
		act'Further':
			cls
			cla
			CLOSE ALL
			gs'stat'
				'<center><img src="images/shared/sex/cum/mouth/cum47.jpg"></center>'
				'Recovering from your orgasm you are now aware of what has happened:'
				'You slowly move your mouth away from you brother''s member.'
				'Kolka signs contently, clearly out of breath.'
				'Slowly you get up not making eye contact. The room suddenly feels very quiet.'
				'You don''t say anything as you get dressed.'
			act'Dress':gt $loc, $metka
		end
	end
end

if $ARGS[0] = 'pregreact':
	if pregTalkbrother = 0 and knowpreg = 1:
		if $clothingworntype = 'nude' and pregchem > 2000 and brotherSex = 0 and kid = 0:
			'Surprised, your brother looks at your tummy. "<<$pcs_nickname>>, are you pregnant? Mom and dad are going to be pissed!" After a moments pause he adds "You do still look good pregnant, though."'
			pregTalkbrother = 1

			act 'Continue' :gt 'sitrPar'
		exit

		elseif $clothingworntype ! 'nude' and pregchem > 3460 and brotherSex = 0 and kid = 0:
			'Surprised, your brother looks at your tummy, "<<$pcs_nickname>>, why didn''t you tell me I''m going to be an uncle? '
			pregTalkbrother = 1

			act 'Continue' :gt 'sitrPar'
		exit

		elseif brotherSex > 0 and kid = 0 and pregTalkMom = 0 and (($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
			cla
			'"Are you really pregnant? It''s.. It''s not mine, is it?"'
			*nl
			if $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
				act 'Yes (Happy)':gt 'brother', 'brotherknows1'
				act 'Yes (Angry)':gt 'brother', 'brotherknows2'
			elseif $wombthfath = '':
				act 'Maybe (Happy)':gt 'brother', 'brotherknows3'
				act 'Maybe (Angry)':gt 'brother', 'brotherknows4'
			else
				act 'No':gt 'brother', 'brotherknows5'
			end
		exit

	
		elseif ($clothingworntype = 'nude' and pregchem > 2000) or ($clothingworntype ! 'nude' and pregchem > 3460) and brotherSex = 0 and kid > 0:
			'"You''re already pregnant again? This is starting to look like a new hobby," he laughs.'
			'"You know what? Maybe it is," you joke back. "Some girls play sports; I get serially impregnated."'
			'"Well, congratulations on taking home the gold in getting knocked up."'
			'"Thanks, I''m glad someone is proud of me," you reply.'
			'Kolka takes a serious tone. "<<$pcs_nickname>>, I am always proud of you. You''re my sister and I''ll love you no matter what."'
			'You''re briefly taken aback by his uncharacteristic sincerity. "Thanks, really. I love you, too."'
			'You leave your brother to what he was doing before, glad that the two of you have the relationship that you do.'			

			act 'Continue' :pregTalkbrother = 1 & gt 'sitrPar'
		
		elseif brotherSex > 0 and pregTalkMom = 0 and kid > 0 and (($clothingworntype = 'nude' and pregchem >= 2000) or ($clothingworntype ! 'nude' and pregchem >= 3460) or ($clothingworntype = 'nude' and pregchem < 2000) or ($clothingworntype ! 'nude' and pregchem < 3460)):
			cla
			'"Wow, you''re pregnant again? Is it mine this time?"'
			*nl
			if $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
				act 'Yes':gt 'brother', 'brotherknows6'
			elseif $wombthfath = '':
				act 'Maybe':gt 'brother', 'brotherknows7'
			else
				act 'No':gt 'brother', 'brotherknows8'
			end
		end
	end
end

if $ARGS[0] = 'brotherknows1':
	cla
	pregTalkbrother = 1
	*nl
	'Yeah, this baby is yours," you say, rubbing your belly. "And after it''s born, I might let you help me make another one," you add before giving your brother a kiss. You start to leave your brother alone, still visibly erect. '
	'"Wait! You''re not going to tell mom I got you pregnant, are you?"'
  
	act 'No':
		cla
		'"Don''t worry, I''ll think of something to tell her. I''ll probably just say I was raped on the way home from the disco. This''ll just be our little secret." You wink and blow a kiss to your brother before finally walking away.'
		
		act 'Continue' :brotherSecret = 1 & gt 'sitrPar'
	end
	
	act 'No (Blackmail him)':
		cla
		'"I don''t know. I might need some... incentive to keep this secret. I''ll let you know what I think of later." Your brother is clearly nervous as you walk away.'
		
		act 'Continue' :brotherSecret = 1 & brotherBlackmail = l & gt 'sitrPar'
	end	
	
	act 'Yes':
		cla
		'"Oh, I definitely am. She has a right to know and just thinking about the look on her face when I tell her turns me on so much. I want everyone to know my own brother put this baby in me." Your brother is clearly dealing with a mixture of panic and arousal as you leave.'
		
		act 'Continue' :gt 'sitrPar'
	end
end	

if $ARGS[0] = 'brotherknows2':
   cla
   pregTalkbrother = 1
   *nl
	'"Yes, it is and you''re going to take responsibility. I am not going to be a single mother raising this child on my own."'
	'Kolka stares at you in shock. "But I don''t know anything about raising children."'
	'"Then you should have thought of that before knocking me up! You''re going to have to figure it out." Your brother is clearly crestfallen as you walk away.'
	'"Wait!" Kolka yells after you. "You''re not going to tell mom I got you pregnant, right?"'
	
	act 'No (Blackmail him)':
		cla
		'You glare at Kolka. "Fuck you! I told you that you got me pregnant, and you''re still worried about yourself? Fine, I''ll keep it a secret, but you''d better fall in line! If you don''t do everything I say, I''ll end you!"'
		'You storm away from Kolka, leaving him to squirm in discomfort.'
		
		act 'Continue' :brotherSecret = 1 & brotherBlackmail = l & gt 'sitrPar'
	end
		
	act 'Yes':
		cla
		'You glare at Kolka. "Fuck off! Can you think about anything other than yourself for one second? I''m not protecting you. Mom is going to find out, and you''ll just have to deal with that!"'
		'You storm away from Kolka, leaving him to squirm in discomfort.'

		act 'Continue' :gt 'sitrPar'
	end
end	
		
if $ARGS[0] = 'brotherknows3':
	cla
	pregTalkbrother = 1
	*nl
	'"It could be, I''m still not sure yet. I just wanted to give you a heads up." You then add with a wink "Honestly, I''m kind of hoping it is."'
	'"Me too," he states just a little too eagerly. He then quickly moves his lips to yours and you share a passionate kiss.'
	
	act 'Continue' :gt 'sitrPar'
end

if $ARGS[0] = 'brotherknows4':
	cla
	pregTalkbrother = 1
	*nl
	'"I''m still not sure, but if it is, you had better take responsibility."' 
	'"Then I really hope it''s someone else''s problem."'
	'"Fuck off! If it''s yours then I''ll make sure you take responsibility!" You then storm away, leaving Kolka to stew.'
	
	act 'Continue' :gt 'sitrPar'
end

if $ARGS[0] = 'brotherknows5':
	cla
	pregTalkbrother = 1
	*nl
	'"No, you got lucky this time. It''s actually <<$wombthfath>>''s, I just wanted to share the news with my little brother."'
	'"Oh, well congratulations!" He tries to sound happy, but you detect a note of disappointment in his voice.'
	  
	act 'Continue':gt 'sitrPar'
end

!Once pregnancy fetish is added, these will be expanded
if $ARGS[0] = 'brotherknows6':
	cla
	pregTalkbrother = 1
	*nl
	if $ChildThFath - 1 = 'Kolka' and BrotherHappy = 1:
		cla
		'"Yeah, you knocked me up again." You smile at him. "I think you''re doing this on purpose." You walk closer to your brother and straddle his lap. You affectionately wrap your arms around his neck and lean your face close to his.' 
		'"You like knocking up your sister, don''t you? You just love that this belly shows the whole world that I let my own brother fuck me, huh?"'
		'Kolka stares into your <<$pcs_eyecol>> eyes, his face bright red and a bulge growing in his pants.' 
		'"Well?" you inquire. His face grows brighter as he realizes that those weren''t rhetorical questions and that you actually expect an answer. Sweat runs down his face as he considers what to say and you find that you enjoy watching your little brother squirm. '
		'He finally gathers his courage and says "Yes, I love getting you pregnant. Every time we fuck, I have to fight the urge to just unload inside you, and every time I give in is the best moment of my life.' 
		'Knowing that every rope I shoot into your wonderful pussy could knock you up turns me on more than anything else. Even before we had sex for the first time, I would fantasize about knocking you up every time I masturbated.' 
		'I love knowing that I put that baby in you and that your body will tell everyone else. I want to impregnate you over and over, keeping you pregnant for as long as I can."'
		'As he finishes, you stare in silence. You were hoping for a confession, but that was way beyond what you were expecting. Unable to bear the silence any longer, Kolka breaks the tension by gripping your ass and kissing you as passionately as he can. This snaps you back to reality and you return the kiss.' 
		'After several minutes, you pull back and lick your lips. Still sitting in Kolka''s lap, you say'
		'"Every moment that we’re together is fantastic, and I love that this baby is yours, but I don''t know if I want any more children after this. So, when we have sex after this baby is born, please try to control yourself." He nods.'
		if momKnowsKolka = 1 and ParHomeBlock = 0:
			cla
			'"Since mom already knows I''ve gotten you pregnant before, we probably don''t need to keep this one secret, do we?"'
			'"No, I don''t think we do. Even though she freaked she fuck out the first time, I''m actually looking forward to her reaction this time. She''s had plenty of time to come to terms with our… special relationship."'
			'"God, I hope you''re right. I don''t think I could handle that again. I didn''t know she could be so scary." You both laugh.' 
			'You never dreamed that you would be building a family with your own brother, but now you wouldn''t want it any other way.'
			'You kiss your brother one more time before getting up from his lap. Now that you''ve told him the news, it''s time to tell your mother. You really hope your right about her reaction…'

			act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
		elseif momKnowsKolka = 1 and ParHomeBlock = 1:
			cla
			'"Since mom already knows I''ve gotten you pregnant before, we probably don''t need to keep this one secret, do we?"' 
			'You scowl. "I don''t give a fuck what mom knows. She''s not speaking to me and I really don''t care to say anything to her"'
			'Kolka softly caresses your cheek. "Sorry, I shouldn''t have brought her up. I wasn''t thinking."'
			'You smile. "It''s alright. The only thing that matters right now is us and our baby."' 
			'Once you''re finished speaking, your brother covers your <<$liptalk3>> with his own and you joyfully reciprocate his kiss.' 
			'You never dreamed that you would be building a family with your own brother, but now you wouldn''t want it any other way.'

			act 'Continue':minut += 10 & gt 'sitrPar'
		elseif momKnowsKolka = 0 and brotherBlackmail = 0:
			cla
			'"Since mom still doesn''t know I’ve gotten you pregnant before, we''re going to keep it a secret still, right?"'
			'"Don''t worry, I''m not going to tell her the truth. I don''t want my little brother to face any consequences for something that we both enjoyed. I don''t think the same lie will work more than once, but I''ll think of something."'
			'Kolka sighs in relief. "Thanks, sis, you''re the best."'
			'"I know." You smile and kiss your brother one more time before getting up from his lap. Now you just need to decide what to tell your mother.'

			act 'Continue':minut += 10 & gt 'sitrPar'
		elseif momKnowsKolka = 0 and brotherBlackmail = 1:
			cla
			'"Don’t worry, I won''t tell her. Assuming, of course, that you keep up your end of the bargain. I just need to figure out what to tell her. I don''t think the same lie will work more than once, but I''ll think of something."'
			'Kolka sighs in relief. "Thanks, sis, you''re the best."'
			'"I know." You smile and kiss your brother one more time before getting up from his lap. Now you just need to decide what to tell your mother.'

			act 'Continue':minut += 10 & gt 'sitrPar'
		end
	elseif $ChildThFath - 1 = 'Kolka' and BrotherAngry = 1:
		cla
		'"Yeah, it''s yours. I can''t believe you got me pregnant again. I don''t know why the hell I thought you''d be more careful after the first time."' 
		'"You thought I''d be more careful? It takes two, sweetheart. And I didn''t hear you complaining while we were fucking."'
		'"You shut your god damn mouth. You don''t have to walk around with a baby inside you. I do. So yeah, I have every right to be pissed and you’re just going to sit back and deal with it."' 
		if momKnowsKolka = 1 and ParHomeBlock = 0:
			cla
			'"Mom already knows you got me pregnant before. I am not looking forward to telling her about this."'

			act 'Continue':minut += 10 & gt 'KatjaHomeTalk'
		elseif momKnowsKolka = 1 and ParHomeBlock = 1:
			cla
			'"God, I was already kicked out of our parent''s apartment thanks to you. I should''ve known you''d only make my life worse"'

			act 'Continue':minut += 10 & gt 'sitrPar'
		elseif momKnowsKolka = 0 and brotherBlackmail = 1:
			cla
			'"Now I''m going to keep it a secret that you''re the father, but you''d better work extra hard if you want it to stay a secret."'

			act 'Continue':minut += 10 & gt 'sitrPar'
		end
	elseif $ChildThFath - 1 ! 'Kolka' and BrotherHappy = 1:
		cla
		act 'Happy':gt 'brother', 'brotherknows1'
		act 'Angry':gt 'brother', 'brotherknows2'
	end
end

if $ARGS[0] = 'brotherknows7':
   cla
   pregTalkbrother = 1
   *nl
   if $ChildThFath - 1 = 'Kolka' and BrotherHappy = 1:
		'"It could be, I''m still not sure yet. I just wanted to give you a heads up." You then add with a wink "Honestly, I''m kind of hoping it is. I would love to be carrying another one of my brother''s children."'
		'"I hope so, too," he states just a little too eagerly. He then quickly moves his lips to yours and you share a passionate kiss.'
		
		act 'Continue' :gt 'sitrPar'
	elseif $ChildThFath - 1 = 'Kolka' and BrotherAngry = 1:	
		'"I''m still not sure, but if you knocked me up again, you had better take responsibility."' 
		'"Then I really hope it''s someone else''s problem."'
		'"Fuck off! If it''s yours then I''ll make sure you take responsibility!" You then storm away, leaving Kolka to stew.'

		act 'Continue' :gt 'sitrPar'
	elseif $ChildThFath - 1 ! 'Kolka':
		act 'Happy':gt 'brother', 'brotherknows3'
		act 'Angry':gt 'brother', 'brotherknows4'
	end
end	
		
if $ARGS[0] = 'brotherknows8':
	cla
	pregTalkbrother = 1
	*nl
	if $ChildThFath = 'Kolka':
		'"Not this time. It''s actually <<$wombthfath>>''s. Why, were you hoping you''d give me more children? Sorry, but this body is just too good to limit myself to one man, even if that man is my cute younger brother." You giggle.'
		'"Well, you do have a great body, so I''ll concede that point."'
		'"You know I love you, but please don''t take this as an invitation to try to get me pregnant again. I don''t know if I''m ready for more kids." Your brother nods, clearly disappointed. "Hey, you can still fuck me, you just have to be careful."'

		act 'Continue' :gt 'sitrPar'
	elseif $ChildThFath - 1 ! 'Kolka':
		'"No, not this time either. It''s actually <<$wombthfath>>''s."'
		'"Oh, congratulations again, then." You still catch disappointment in his voice.'
		'"You weren''t trying to get me pregnant, were you?"'
		'"Wh-what? No, of course not. I''m really happy for you." You''re pretty sure he''s lying, but you''re not going to push the subject. He''s lucky he''s cute.'
		'"Hey, you''re my brother and I''ll love you no matter what happens."'
		'"But don''t try to get me pregnant after I give birth this time. I am really not ready for more children." He nods in agreement.'

		act 'Continue' :gt 'sitrPar'
	end
end	

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