glife/locations/NatBelHome

# NatBelHome
CLOSE ALL
if BeInNatBelHome = 0:BeInNatBelHome = 1

gs 'stat'
'<center><b><font color="maroon"><<$npcName[16]>> <<$npcSurName[16]>></font></b></center>'
if (daystart-natpregday) > 84 and natpregday > 0:
	if (daystart-natpregday) < 200:
		'<center><img src="images/qwest/alter/npc/16(2).jpg" width="356"></center>'
	else
		'<center><img src="images/qwest/alter/npc/16(3).jpg" width="356"></center>'
	end
	'The state of the room and the whole apartment shows, that the occupant is very poor.'
	'Looking at Natasha it is obvious that she is pregnant, and you have a strong suspicion that she carries your niece or nephew.'
	''
	act 'Touch her belly':
		if nataskedbaby = 1:
			delact 'Touch her belly'
			nataskedbaby = 0
		end
		''
		'She looks at you with a strange smile.'
		'"Yes, your little brother has actually knocked me up. I hope you are happy with it, since we can''t afford to abort it."'
		nataskedbaby = 1
	end
else 
	'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
	'The state of the room and the whole apartment shows, that the occupant is very poor.'
end

if lernHome ! 0:
	'Natasha arranges her books on the table.'

	act 'Study with Natasha':
		cls
		minut += 60
		!grupNPC[16] += 10
		lernHome = 0
		lern += rand(3, 6)
		intel += rand(1, 2)
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
		'You spend an hour studying with Natasha and get your homework done.'

		act 'Next':gt $curloc
	end
elseif lernHome = 0:
	'Natasha is sitting on her bed.'

	act 'Chat with Natasha':
		cls
		minut += 15
		NatBelBestFrend += 1
		gs 'stat'
		'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
		'You talk with Natasha about things that interest you both.'

		if NatBelBestFrend = 1:'Natasha knows that she lives in a very poor family. She has no father and her mother works for a pittance at the garment factory.'
		if NatBelBestFrend >= 2:'Natasha is envious that other girls can dress smartly and buy cosmetics while she has to wear her mother''s things.'

		act 'further':gt $curloc
	end

	if NatDolg <= 0 and money >= 2000 and natsub > 0:
		'Hesitantly, Natasha asks you, "<<$name>>, can you lend me a couple of thousand <b>₽</b>? I''ll pay you back, I promise."'

		act 'Give Natasha the money':
			cls
			minut += 15
			NatDolg = 2000
			money -= 2000
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
			'You get your purse and give Natasha the money knowing that she will not be able to repay it and that you would prefer to play with her.'

			act 'Next':gt $curloc
		end
	elseif NatBelBestFrend >= 3 and NatDolg = 0 and money >= 5000 and natsub = 0:
		'Natasha looks down in embarrassment, "<<$name>>, you have lots of money. Could you lend me 5000 <b>₽</b>? I will pay it back, I give you my word."'

		act 'Lend Natasha':
			cls
			minut += 15
			NatDolg = 5000
			money -= 5000
			NatDolgDay = daystart+30
			NatBelBestFrend += 1
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
			'You get your purse and lend Natasha the money. Natasha is delighted and says that she will pay it back in a month.'

			act 'rest':gt $curloc
		end
	elseif NatDolg>0 and NatDolgDay > daystart:
		'Natasha promises you to repay the <<NatDolg>> <b>₽</b> in <<NatDolgDay-daystart>> days.'
	elseif NatDolg > 0 and NatDolgDay <= daystart:
		'Natasha looks at the floor, "<<$name>>, I have no money to pay you."'

		act 'Forgive Natasha''s debt':
			cls
			minut += 15
			NatDolg = 0
			NatDolgDay = 0
			NatBelBestFrend += 10
			gs 'stat'
			'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
			'You decide to forgive the Natasha''s debt. She is delighted and thanks you with all her heart.'

			act 'rest':gt $curloc
		end

		if dom >= 10 and natotrab = 0:
			act 'Demand repayment':
				cls
				minut += 15
				gs 'stat'
				'<center><img src="images/qwest/alter/npc/16.jpg"></center>'
				'You decide not to reduce Natasha''s debt. You angrily confront her, demanding the return of the money. Natasha curls up into a ball on her bed "<<$nickname>>, dear, please forgive me. I will do anything you say." Natasha looks at you with fearful eyes and comes up with a couple of ideas on how you can use this chicken. You snarl at her with an evil hiss, "You''re my creature until you''ve worked off every last kopeck."'

				act 'On your knees! And open your mouth!':
					cls
					minut += 5
					natotrab += 1
					natsub += 1
					dom += 1
					!!natknee
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/natknee.jpg"></center>'
					'You bark at Natasha to get on her knees. She immediately kneels down at your feet and obediently opens her mouth.'

					act 'Spit in her face':
						cls
						minut += 5
						natsub += 1
						dom += 1
						NatDolg -= 500
						!!natknee
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/natknee.jpg"></center>'
						'You collect the saliva in your mouth and, with relish spit in Natasha''s face. She jerks and squeezes her eyes shut but makes no move to wipe the spittle away.' 
						'You smile, "Fair enough, you are forgiven."'
						'Natasha opens her eyes and asks in disbelief, "It''s forgiven?"' 
						'You laugh, "500 <b>₽</b> of debt is forgiven, fool. You will do everything I tell you until the entire debt is gone."'

						act 'Next':gt $curloc
					end
				end
			end
		
		elseif natotrab > 0 and NatDolg > 0:
			'Natasha still doesn''t  have the <<NatDolg>> <b>₽</b>.'

			act 'On your knees! And open your mouth!':
				cls
				minut += 5
				natotrab += 1
				natsub += 1
				dom += 1
				!!natknee
				gs 'stat'
				'<center><img src="images/qwest/alter/ev2/natknee.jpg"></center>'
				'You bark at Natasha to get on her knees. She immediately kneels down at your feet and obediently opens her mouth.'

				act 'Spit in her face':
					cls
					minut += 5
					natsub += 1
					dom += 1
					NatDolg -= 500
					!!natknee
					gs 'stat'
					'<center><img src="images/qwest/alter/ev2/natspit.jpg"></center>'
					'You collect the saliva in your mouth and, with relish spit in Natasha''s face. She jerks and squeezes her eyes shut but makes no move to wipe the spittle away.'

					act 'Next':gt $curloc
				end
				if natsub >= 4:
					act 'Make her lick':
						cls
						minut += 5
						natsub += 1
						dom += 1
						NatDolg -= 500

						if npcSex[16] = 0:npcSex[16] = 1 & girl += 1

						lesbian += 1
						!!horny = 0
						!!orgasm += 1
						natlesb += 1
						!!natknee
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/natlick.jpg"></center>'
						'You force Natasha to undress you and then watch as she undresses herself before she returns to kneeling at your feet. You pull her face into your pussy and snarl at her, "Now lick!". Natasha fearfully starts to work.'

						if natsub < 10:
							'This useless cunt can''t even find your clitoris and only sluggishly works her mouth on your pussy without any enthusiasm.'

							if dom >= 20 and NatDolg >= 500:
								act 'Piss in her mouth':
									cls
									minut += 5
									natsub += 1
									dom += 1
									NatDolg -= 500
									natpee += 1
									!!natknee
									gs 'stat'
									'<center><img src="images/qwest/alter/ev2/natpee.jpg"></center>'
									'You are angry at this bitch so you release your urine in Natasha''s face. She closes her eyes and bows her head down but does not recoil and silently accepts your golden shower until the very end.'
									
									act 'Next':gt $curloc
								end
							else 
								act 'Make her stop':
									cls
									minut += 5
									horny -= 10
									money -= 50
									
									gs 'stat'
									$ImageNeededPlaceholder
									'<center><img src="images/etogame/icecreem.jpg"></center>'
									'You get tired of her lackluster attempts to get you off, in fact, she is doing such a bad job that it is actually turning you off.'
									'"You are hopeless. Here, go buy an icecream and practice licking. You''d better do better next time, bitch." You throw a 50 ruble note at her as she stops licking you.'
									
									act 'Next':gt $curloc
								end
							end
						else
							orgasm += 1
							horny = 0
							gs 'stat'
							'Natasha enthusiastically goes to work on your pussy, using her mouth and tongue. She fucks you with her tongue then switches to sucking on your now engorged clitoris. You grab her head and roughly grind your pussy on her face as your orgasm rolls over your body.'
						end

						act 'Next':gt $curloc
					end
				end
			
				if hour >= 18 and hour < 21 and natsub >= 6 and natfuckday < daystart:
					act 'Call your brother':
						cls
						minut += 15
						natsub += 1
						dom += 1
						NatDolg -= 500
						natbj += 1
						natbro += 1
						natfuckday = daystart
						gs 'stat'
						'<center><img src="images/qwest/alter/ev2/natbj.jpg"></center>'
					
						'You call your brother and he quickly comes up to Natasha''s apartment. You briefly explain the situation to your brother.'
						'"And you, bitch, you''re going to use that mouth of yours to make Kolka feel good, you got it?" you hiss at Natasha, grabbing her jaw and staring in the eyes.'
						'Natasha jerkily nods and kneels at Kolka''s feet. She reaches up with trembling hands to unfasten Kolka''s pants and pulls out his semi-hard dick. She tentatively begins to lick it and after a moment takes the now fully hard shaft into her mouth. Kolka starts fucking her in the mouth.'

						if natsub >= 10 and brotherSex > 0 and NatDolg > 0 and natbro > 0:
							act 'Make her fuck your brother for 500':
								cls
								cla
								dom += 2
								NatDolg -= 500
								minut += 15
								natsub += 1
								natfuck += 1
								bother += 5
								gs 'stat'
								'<center><img src="images/qwest/alter/ev2/natfuck.gif"></center>'
								'In a few minutes your brother is hard and panting, but you stop him, and pull away Natasha to whisper into her ear.'
								'"I let go another 500 of your debt if you fuck him."'
								'Natasha stares at you, then nods her head without a glance at Kolka, then she gets in doggie pose. Still staring at you, she says "He can fuck me."'
								'You smile at your brother, and playfully slap her very nice ass to incite him. "She is yours, bro. Fuck her hard!"'
								'He pushes inside her pussy, insistently but patiently, then stars to fuck her fast and hard. As Natasha''s body moves with the thrusts, you lean forward and start kissing her.'
								if natcp = 0:
									'She responds eagerly, and you keep kissing until Kolka says, "I''m coming!"'
									'Natasha suddenly tries to pull away from Kolka, saying "Pull out, not inside! I don''t want to end up pregnant!"'
								elseif natpregday > 0 and (daystart-natpregday) > 20:
									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t seems to bother her that Kolka may knock her up.'
								elseif natpregday > 0 and (daystart-natpregday) >= 84:
									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t really matter now, since Kolka has already knocked her up.'
								else
									'Natasha looks at you questioningly, whether will you let him cum inside of her and risking her getting pregnant with your niece or nephew, or letting her pull away from you brother.'
								end
								if natsub >= 20 and dom > 20 and natcp > 0:
									act 'Let him cum inside her':
										cla
										natcp += 1
										natsub += 1
										dom += 3
										'<center><img src="images/qwest/alter/ev2/natcp.gif"></center>'
										'You grab her head, and say to her, "He will not pull out. The deal was a fuck, so that''s what he gets."'
										'She looks at you submissively then nods, just as Kolka groans and fills her womb with his semen.'
										if rand(1,100) >= 93 and natpregday = 0:natpregday = daystart
										gs 'stat'
										act 'Next':gt $curloc
									end
								end
								act 'Let her pull away':
									cla
									if rand(0,9) = 0:
										natcp += 1
										'You let her pull away from your brother, but it appears Kolka was really close, and before anyone could do anything, your brother pumps his seed in Natasha''s body.'
										'<center><img src="images/qwest/alter/ev2/natcp.gif"></center>'
										'"Fuck, I really am sorry, Nat!", he says apologetically. "It is just, you are so hot!"'
										'Natalia doesn''t even listen to him, just looks at you with a strange expression on her face. You can''t really decide whether she is scared that Kolka came in her pussy, or enjoyed it. Maybe both at the same time?'
										'You quitely signal your brother to dress up and leave while you kiss her deeply. "I hope you enjoyed it, pet. We may repeat it."'
										if rand(1,100) >= 95 and natpregday = 0:natpregday = daystart
									else
										'You let her pull away from your brother, so that you brother''s dick slips out of her just in time. His seed sprays Natasha''s ass, back and hair, and it even reaches your face and hair.'
										'<center><img src="images/qwest/alter/ev2/NatKolFacial.jpg"></center>'
										'"Nice shot, bro!", you say laughing, wiping his seed away from your eyelid. "That was quite the distance!"'
										'"That was close," whispers Nat, with a strange look in her face. You actually can''t decide whether she is relieved or disappointed that Kolka didn''t cum in her pussy.'
										'You quitely signal your brother to dress up and leave while you kiss her deeply. "I hope you enjoyed it, pet. We may repeat it."'
										$boy = 'Kolka'
										spafinloc = 11
										sexpartkno = 1
										gs 'cum_manage'
										spafinloc = 16
										sexpartkno = 1
										gs 'cum_manage'
									end
									gs 'stat'
									act 'Next':gt $curloc
								end
							end
						end

						act 'Continue':
							cls
							minut += 5
						
							gs 'stat'
							'<center><img src="images/qwest/alter/ev2/bscum.jpg"></center>'
						
							'Kolka holds Natasha by the hair as he pistons his cock into he mouth rapidly. Natasha''s chin is covered with her drool and it is soaking the front of her shirt. With a grunt, Kolka pulls his dick from Natasha''s mouth and she automatically opens her mouth and sticks out her tongue. Kolka pumps his dick a few times then shoots his cum into Natasha''s waiting mouth.'
							'"Swallow it, slut." You command when Kolka is done before Natasha can spit out the sperm.'
							'Natasha grimaches but complies, swallowing Kolka''s load then opening her mouth to show that it is gone.'
					
							act 'Next':gt $curloc
						end
					end	
				end
			end	
		end
	end
end
act 'go home':gt 'pod_ezd','etaj_4'

--- NatBelHome ---------------------------------