25 Commits 7c2f7932f3 ... 510c34585b

Author SHA1 Message Date
  KevinSmarts 510c34585b [fixed] wrong npc number in display field 5 years ago
  KevinSmarts 43a4b5d564 Merge remote-tracking branch 'CroWke/master' 5 years ago
  CroWke 8a681d1ee1 [added] This was needed to take "park" selfies 5 years ago
  julzor e97965d6e6 [fixed] moncheri/boutique purses couldn't be chosen at game start 5 years ago
  KevinSmarts 8f3dd84cf8 Merge remote-tracking branch 'KeyMasterOfGozer/master' 5 years ago
  KevinSmarts beaea9f222 Merge remote-tracking branch 'sovietmercader/master' 5 years ago
  KevinSmarts af4d656cd1 Merge remote-tracking branch 'CroWke/master' 5 years ago
  KevinSmarts c0a8f8f4ff [fixed] Errors found and sollutions posted to forum by rachels 5 years ago
  KeyMasterOfGozer 14faaa128d Rearrange the way spells are cast. Now each spell has it's own location "spell_<spell name>". This will be called from the castSpell location. 5 years ago
  sovietmercader 73b1f1af72 [fixed] remove calls to huntersex which no longer exists in gadforest_event 5 years ago
  CroWke a9dd10882f [edit] working in nutluck's latest revision 5 years ago
  CroWke 7f683df496 [fixed] c/p error 5 years ago
  sovietmercader 5577b08edd [fixed] exhibitionist levels in cikl did not match their description in traits, also fixed small typo in their description as well 5 years ago
  KevinSmarts bbcca8f9d9 Merge remote-tracking branch 'KeyMasterOfGozer/master' 5 years ago
  KevinSmarts 0ae3183a43 Merge remote-tracking branch 'CroWke/master' 5 years ago
  Mike Greene 9c7ee39b7d Made Circle only show up in Magic game 5 years ago
  KevinSmarts 915656db0c Merge remote-tracking branch 'CroWke/master' 5 years ago
  KevinSmarts e0090062e1 Merge remote-tracking branch 'julzor/master' 5 years ago
  KevinSmarts d7fb963615 [fixed] old fragment and incorrect chunk for rape 5 years ago
  CroWke 34034de273 [edit] Let it burn! 5 years ago
  CroWke 2fa2ea414a Merge branch 'master' of https://git.catrenelle.com/Kevin_Smarts/glife 5 years ago
  julzor 77fe830b02 [fixed] made it more clear in which park you go on a date in parksvid and fixed the return action 5 years ago
  julzor 6d67badde0 [fixed] leaving fit wearing only swimwear 5 years ago
  julzor ef966490c5 [text edit] wrong name in LCporn 5 years ago
  CroWke 6cdd451296 [edit] Reworked the striptease action. 5 years ago

+ 2 - 1
glife.qproj

@@ -1101,9 +1101,10 @@
 	<Location name="BanSexType"/>
 	<Folder name="Magic">
 		<Location name="castSpell"/>
-		<Location name="spellTeleport"/>
+		<Location name="spell_teleport"/>
 		<Location name="treeCircle"/>
 		<Location name="treeCircActs"/>
+		<Location name="treeCircEntry"/>
 	</Folder>
 	</Structure>
 </QGen-project>

+ 1 - 1
locations/Cheatmenu_din.qsrc

@@ -1205,7 +1205,7 @@ $cheatmenu['reputation'] = {
 			'Irina: <<npc_rel[''A93'']>>  <a href="exec:npc_rel[''A93''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A93''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		if npc_rel['A43'] >= 0:
-			'Tamara: <<npc_rel[''A93'']>>	<a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'Tamara: <<npc_rel[''A43'']>>	<a href="exec:npc_rel[''A43''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A43''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		if alla >= 0:
 			'Alla: <<alla>>	<a href="exec:alla += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:alla -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'

+ 1 - 1
locations/LCporn.qsrc

@@ -91,7 +91,7 @@ if $ARGS[0] = 'sex':
 		randlcpic = rand(1, 4)
 		'<center><img <<$set_imgh>> src="images/locations/city/industrial/bbq/sex/anal<<randlcpic>>.jpg"></center>'
 		if analplugin = 1:
-			'<<$boy>> pulls the plug out of your narrow and tight ass.'
+			'Eugen pulls the plug out of your narrow and tight ass.'
 			analplugin = 0
 			analplugout = 1
 		end

+ 1 - 1
locations/MagEncounterFairy.qsrc

@@ -260,7 +260,7 @@ if $ARGS[0] = 'fairychattopic':
 			$tpRand[1]='PushkinPark'
 			$tpRand[2]='Village'
 
-			gt 'treeCircle', $tpRand[rnd(0,2)]
+			gt 'treeCircle', $tpRand[rand(0,2)]
 
 			killvar $tpRand
 		end

+ 34 - 13
locations/castSpell.qsrc

@@ -2,8 +2,12 @@
 ! Used to cast a spell.  Use as a function.  Returns 1 OR 0 for Success or Failure.
 !
 ! ARGS[0] is the spell being cast
-!	Valid Spells are
+!	Valid Spells are listed below
 !		teleport
+! ARGS[1-n] are any parameters that need to be passed to the Spell
+!
+!	Example:
+!		gs 'castSpell', 'teleport', 'CentralPark'
 
 !teleport
 spellMana['teleport'] = 1000
@@ -18,38 +22,49 @@ spellDiff['glamour'] = 30
 
 spellSuccess = 0
 
-if spellKnown[$ARGS[0]] = 1:
+$SpellName = $ARGS[0]
+$SpellArgs = ""
+i=1
+:ArgLoop
+if i < arrsize('$ARGS'):
+	i += 1
+	$SpellArgs = $SpellArgs + ", '<<$ARGS[i - 1]>>'"
+	jump 'ArgLoop'
+end
+killvar 'i'
+
+if spellKnown[$SpellName] = 1:
 	!Make a Skill Check to see if the Spell succeeds
-	spellRoll = pcs_splcstng - spellDiff[$ARGS[0]] - (pcs_horny/5) + rand(1,100)
+	spellRoll = pcs_splcstng - spellDiff[$SpellName] - (pcs_horny/5) + rand(1,100)
 	if spellRoll > 50:
 		!Critical Success
 		spellSuccess = 2
-		splcstng_exp += rand(1,spellDiff[$ARGS[0]]) + rand(0,5)
+		splcstng_exp += rand(1,spellDiff[$SpellName]) + rand(0,5)
 	elseif spellRoll > 10:
 		!Success
 		spellSuccess = 1
-		splcstng_exp += rand(1,spellDiff[$ARGS[0]])
+		splcstng_exp += rand(1,spellDiff[$SpellName])
 	elseif spellRoll > -20:
 		!Failure
 		spellSuccess = 0
-		splcstng_exp += rand(1,spellDiff[$ARGS[0]]) / 2
+		splcstng_exp += rand(1,spellDiff[$SpellName]) / 2
 	else:
 		!Critical Failure
 		spellSuccess = -1
-		splcstng_exp += rand(1,spellDiff[$ARGS[0]]) / 2
+		splcstng_exp += rand(1,spellDiff[$SpellName]) / 2
 	end
 	killvar 'spellRoll'
 
 	!Incur the costs of casting the spell
 	if spellSuccess = 2:
-		manaCost = spellMana[$ARGS[0]] / 2
+		manaCost = spellMana[$SpellName] / 2
 	elseif spellSuccess = -1:
-		manaCost = spellMana[$ARGS[0]] * 2
+		manaCost = spellMana[$SpellName] * 2
 	else:
-		manaCost = spellMana[$ARGS[0]]
+		manaCost = spellMana[$SpellName]
 	end
 	pcs_manna -= manaCost
-	!pcs_willpwr -= spellWill[$ARGS[0]]
+	!pcs_willpwr -= spellWill[$SpellName]
 	arouseVal = manaCost / 50
 	gs 'arousal', 'voyeur', arouseVal
 	minut -= arouseVal
@@ -58,10 +73,16 @@ if spellKnown[$ARGS[0]] = 1:
 
 end
 
-minut += spellTime[$ARGS[0]]
+minut += spellTime[$SpellName]
 
 gs 'stat'
 
-result = spellSuccess
+$SpellExec = "gs 'spell_<<$SpellName>>', '<<spellSuccess>>'<<$SpellArgs>>"
+
+dynamic $SpellExec
+
+killvar '$SpellName'
+killvar '$SpellArgs'
+killvar '$SpellExec'
 
 --- castSpell ---------------------------------

+ 3 - 3
locations/cikl.qsrc

@@ -200,11 +200,11 @@ snapshotY = 0
 if pcs_exhib > 0 or exhibitionist_lvl > 0:
 	if pcs_exhib < 10:
 		pcs_exhib -= 1
-	elseif pcs_exhib < 20:
+	elseif pcs_exhib < 50:
 		exhibitionist_lvl = 1
-	elseif pcs_exhib < 30:
+	elseif pcs_exhib < 100 or exhibitionQW < 3:
 		exhibitionist_lvl = 2
-	else
+	elseif exhibitionQW = 3:
 		exhibitionist_lvl = 3
 	end
 end

+ 1 - 6
locations/etoexhib.qsrc

@@ -215,12 +215,7 @@ if $ARGS[0] = 'pos6':
 		act 'Leave':gt 'dachi'
 	end
 
-	! Setup for teleport circle
-	if tpKnown['Village'] = 1:
-		act 'Enter the hidden circle of trees': gt 'treeCircle', 'Village'
-	else:
-		act 'Investigate a mysterious copse of trees': gt 'treeCircle', 'Village'
-	end
+	gs 'treeCircEntry', 'Village'
 end
 
 if $ARGS[0] = 'pos7':

+ 1 - 1
locations/fit.qsrc

@@ -160,7 +160,7 @@ if $ARGS[0] = 'dressing room':
 	end
 
 	act 'Exit the locker room':
-		if $clothingworntype ! 'nude':
+		if $clothingworntype ! 'nude' and $clothingworntype ! 'swimwear':
 			gt 'fit', 'start'
 		else
 			cla

+ 1 - 6
locations/gadforest.qsrc

@@ -120,12 +120,7 @@ if $ARGS[0] = '1':
 		end
 	end
 
-	! Setup for teleport circle
-	if tpKnown['GadForest'] = 1:
-		act 'Enter the hidden circle of trees': gt 'treeCircle', 'GadForest'
-	else:
-		act 'Investigate a mysterious copse of trees': gt 'treeCircle', 'GadForest'
-	end
+	gs 'treeCircEntry', 'GadForest'
 
 	! can only be naked if successfully complete Mira gadforest_event, nude_event
 	if $clothingworntype ! 'nude' and clothesAtLocation = 0 and temper >= 15 and sunWeather = 1 and hour>=6 and hour<=20 and miratalkforest > 1 and MiraLoc ! 3 and (pcs_inhib >= 25 or exhibitionist_lvl > 1):

+ 5 - 9
locations/gadforest_event.qsrc

@@ -2501,13 +2501,11 @@ if $ARGS[0] = 'forest_hunters':
 					act 'Go with them':hunters = 1 & minut += 60 & gt 'swamp_yard'
 				else
 					act 'Go with them':
-						temp_gadf = rand(1,3)
+						temp_gadf = rand(1,2)
 						temphunt = rand(1,3)
 						hunters = 1
 						if temp_gadf = 1:
 							forest_huntersex = 1 & gt 'hunters', 'start'
-						elseif temp_gadf = 2:
-							forest_huntersex = 2 & gt 'huntersex', 'doublelovesex'
 						else
 							forest_huntersex = 3 & gt 'hunters', 'start'
 						end
@@ -2586,11 +2584,10 @@ if $ARGS[0] = 'forest_hunters':
 						act 'Go with them':hunters = 1 & minut += 60 & gt 'swamp_yard'
 						act 'Stay in the woods':gt $loc, $metka
 					else
-						temp_gadf = rand(1,3)
+						temp_gadf = rand(1,2)
 						temphunt = rand(1,3)
 						if temp_gadf = 1:hunters = 1 & forest_huntersex = 1 & gt 'hunters', 'start'
-						if temp_gadf = 2:hunters = 1 & forest_huntersex = 2 & gt 'huntersex', 'doublelovesex'
-						if temp_gadf = 3:hunters = 1 & forest_huntersex = 3 & gt 'hunters', 'start'
+						if temp_gadf = 2:hunters = 1 & forest_huntersex = 3 & gt 'hunters', 'start'
 					end
 				end
 			end
@@ -2630,11 +2627,10 @@ if $ARGS[0] = 'forest_hunters':
 				if pcs_horny >= 40 and pcs_horny < 70:'"It must be this way." you thought as you followed the guys, knowing where they were taking you and why.'
 				if pcs_horny >= 70:'"Well, that''s exactly what you need right now." you thought, feeling your pussy screaming with desire. You went with the guys, you were so eager, you almost lead the way.'
 
-				temp_gadf = rand(1,3)
+				temp_gadf = rand(1,2)
 				temphunt = rand(1,3)
 				if temp_gadf = 1:hunters = 1 & forest_huntersex = 1 & gt 'hunters', 'start'
-				if temp_gadf = 2:hunters = 1 & forest_huntersex = 2 & gt 'huntersex', 'doublelovesex'
-				if temp_gadf = 3:hunters = 1 & forest_huntersex = 3 & gt 'hunters', 'start'
+				if temp_gadf = 2:hunters = 1 & forest_huntersex = 3 & gt 'hunters', 'start'
 			end
 		end
 	end

+ 1 - 0
locations/gskver.qsrc

@@ -8,6 +8,7 @@ if $ARGS[0] = 'start':
 	$location_type = 'public_outdoors'
 	$menu_loc = 'gskver'
 	$menu_arg = 'start'
+	$locclass = 'park'
 	menu_off = 0
 	gs 'stat'
 

+ 1 - 1
locations/igorhome.qsrc

@@ -300,7 +300,7 @@ if $ARGS[0] = 'sisterroom':
 					'"It''s the holidays so I wanted to spend some time with the family before heading back to the University."'
 					act 'So you''re Igor''s sister?':
 						*clr & cla
-						'Looking wide-eyed at her you ask if she''s Ivan''s sister.'
+						'Looking wide-eyed at her you ask if she''s Igor''s sister.'
 						'"Yeah, my name is Galina and who might you be?"'
 						'"My name is <<$pcs_nickname>>. And I''m one of Igor''s classmates..." you say trying to be as vague as possible as you still don''t know how Galina will react.'
 						'"That''s great news!" Galina exclaims. "I''m so glad that Igor got a female friend. Finally I''ve been waiting for this day for a long time." she grins.'

+ 2 - 2
locations/lake.qsrc

@@ -979,11 +979,11 @@ if $ARGS[0] = 'stasValera4':
 			pose = 1
 			gs 'dinsex','sexcum'
 			act 'Finish Valera off':
-				'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/stas/sex<<cum(1,4)>>.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/locations/city/residential/lake/sex/stas/sex<<rand(1,4)>>.jpg"></center>'
 				'Valera groans and his cock shudders in your mouth.'
 				swallow += 1
 				gs 'boyStat', 'A48'
-				gs 'cum_call', 'mouth' 'A48', 1
+				gs 'cum_call', 'mouth', 'A48', 1
 				gs 'arousal', 'bj', 5
 				gs 'dinsex','dinrandswallow'
 

+ 5 - 879
locations/natbelapt.qsrc

@@ -438,7 +438,7 @@ if $ARGS[0] = 'natroom':
 		
 	if NatashaLoc = 2 and hour > 6 and hour < 23:
 		if natseethroughwearing = 0:
-			'Natasha is sitting on the bed, looking at you with interest.'
+			'Natasha is sitting on the bed, looking at some fashion magazines.'
 			
 			act 'Let''s go to the living room':
 				NatNoTV = 1
@@ -481,14 +481,14 @@ if $ARGS[0] = 'natroom':
 				act 'Make her lick your pussy': gs 'natbelapt', 'lick_pussy'
 			end
 			if NatashaQW > 8 and hour >= 18 and hour < 21 and natsub >= 6 and natfuckday < daystart and kolkawantsnat = 1:
-				act 'Make her fuck Kolka': gs 'natbelapt', 'kolkabj'
+				act 'Make her fuck Kolka': gt 'natkolev', 'kolkabj'
 			end
 !! nutluck pulled this for now
 			!if NatashaQW > 9 and hour >= 17 and hour < 21 and natsub >= 6 and natfuckday < daystart and natsub >= 10 and pcs_dom >=20 and strapon = 1 and JuliaNatSexProposed = 1:
 			!	act 'Fuck her with Julia': gs 'natbelapt', 'Nat_Julia_3some'
 			!end
 			if NatashaQW > 10 and olufirst = 3 and oluuosegunday ! daystart:
-				act 'Take her to see Olu': gs 'natbelapt', 'go_see_olu'
+				act 'Take her to see Olu': gt 'natpimp', 'go_see_olu'
 			end
 		end
 	elseif NatashaShower = 1 and NatashaLoc ! 2:
@@ -504,7 +504,7 @@ if $ARGS[0] = 'natroom':
 				*clr & cla
 				'<center><img src="images/characters/pavlovsk/school/girl/natasha/natdressing2.jpg"></center>'
 				if hotcat => 6:
-					'Natasha drops the towel and heads over to the closet to grab some clothes. "What to wear." She sighs as she rummages through the bottom of her closet. Wiggling her ass at you the entire time.'
+					'Natasha drops the towel and heads over to the closet to grab some clothes. "What to wear." She sighs as she rummages through the bottom of her closet. With her ass wiggling the entire time.'
 					'When she''s decided on what to wear she steps right in front of you and slowly starts putting her clothes on. Clearly trying to get a reaction out of you.'
 				else
 					'Natasha drops the towel and heads over to the closet to grab some clothes. "What to wear." She sighs as she rummages through her closet. Which gives you a nice view of her naked ass the entire time.'
@@ -637,6 +637,7 @@ if $ARGS[0] = 'study_together':
 	'"Let''s do our homework." You tell Natasha as you start taking your things from your bag.'
 	'"Sure, let me grab an extra chair from the kitchen." She says as you sit down at her desk and open your textbook.'
 	'Moments later Natasha returns and places her chair next to yours before grabbing her own homework and sitting down next to you.'
+	*nl
 	'"Ok, let''s see..." She says as the two of you start on the first task.'
 	'You spend the better part of an hour working through all of your homework. Occasionally explaining things to eachother when one of you doesn''t understand something.'
 	'When you''re done you are confident you''ll get a good grade on your homework.'
@@ -1025,881 +1026,6 @@ if $ARGS[0] = 'straddleface':
 	act 'Continue': gt 'natbelapt', 'natroom'
 end
 
-if $ARGS[0] = 'kolkabj':
-	*clr & cla
-	natfuckday = daystart
-	if NatashaQW = 8: NatashaQW = 9
-	gs 'stat'
-	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natnudebed.jpg"></center>'
-	if NatKolkaSex = 0:
-		'"Today I want you to do something different for me Natasha. You did promise to do anything I wanted, remember?"'
-		'"Y-Yes <<$pcs_nickname>>."'
-		'"Good, then undress and I''ll arrange for a special guest. Don''t worry, it''ll stay between the three of us."'
-		'You take out your phone and call your brother while you watch as Natasha undresses. After a couple of rings your bother picks up. "Hello <<pcs_nickname>> whats up?" He asks.'
-		*nl
-		'You tell him. "Hey Kolka come up to apartment #, I got a special surprise for you."'
-		'He pauses a moment obviously wonder what it might be. "What is it?" He asks.'
-		'You giggle slightly as you look at Natasha now naked. "I promise you will like it."'
-		'"Ok, I''ll be up in a couple of minutes." He tells you before hanging up.'
-	else
-		'"Today we are going to train my brother some more, you would like that wouldn''t you?" You ask her.'
-		'Her eyes drop a bit and she nods. "Y-Yes <<$pcs_nickname>>." She starts to get undressed without you even asking.'
-		'You take out your phone and call your brother while you watch as Natasha undresses. After a couple of rings your bother picks up. "Hello <<pcs_nickname>>, whats up?" He asks.'
-		*nl
-		'You tell him. "Hey Kolka come up to Natasha''s, we have another lesson for you."'
-		'"Ok, I''ll be right up." He tells you eagerly before hanging up, you can just imagine him running up the stairs.'
-	end
-	act 'Wait for him':
-		*clr & cla
-		minut += 5
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natnudebed.jpg"></center>'
-		'A few minutes later you hear the front door open and close and then Kolka call out. "Hello?"'
-		'"In the bedroom!" You call out to him.'
-		'When Kolka enters the room Natasha immediately tries to cover herself with her hands. He stops dead, when he see''s Natasha naked and stares at her.'
-		'"Don''t you dare hide Natasha. Show him your pretty body." You order her, to which she drops her hands allowing Kolka a good look at her exposed tits.'
-		'Kolka''s eyes are glued to Natasha''s body. He has a noticeable bulge in his pants.'
-		if NatKolkaSex = 0:
-			if brotherSex > 6:
-				'"You like Natasha more than me brother?" You ask him with mock hurt in your voice.'
-				'"I-I..." He starts stammering. "I didn''t expect her to have a body like this."'
-				'"So, who''s pussy do you think is tighter, hers or mine?" You say, enjoying the look of confusion in his eyes as he tries to come up with an answer that will please you.'
-				'"I''m just teasing you bro, I''m pretty sure there isn''t a single boy on the planet who can think past a naked girl in front of him."'
-				'"Just remember, we''re here so that we can teach you how to do this properly. So you''re going to obey my directions."'
-			elseif npc_rel['A34'] >= 80:
-				'"She''s pretty isn''t she?" You ask him.'
-				'"I-I..." He starts stammering, but manages to nod. "Yes."'
-				'"So, who''s body is hotter, hers or mine?" You say, seeing the shocked and confused look in his eyes, as he blushes scarlet red.'
-				'"I''m just teasing you bro, I''m pretty sure there isn''t a single boy on the planet who can think past a naked girl in front of him."'
-				'He smiles bit at that, but doesn''t answer. As he stares at Natasha with obvious lust in his eyes.'
-				'"How would you like to fuck her bro?" You ask him.'
-				'He looks at you shocked at the question, then starts nodding. "I would love to."'
-			else
-				'"I can clearly see that you want her." You tell your brother, indicating the bulge in his pants which causes him to blush.'
-				'"How would you like to fuck her bro?" You ask him.'
-				'He looks at you shocked at the question, then starts nodding. "I would love to."'
-				'"Good we''re going to teach you how to treat a girl, at least once you get to her bedroom." You say with a laugh.'
-			end
-		else
-			'"I see that you''re ready for your next lesson bro."'
-		end
-		act 'Blowjob':
-			*clr & cla
-			natsub += 1
-			pcs_dom += 1
-			NatDolg -= 500
-			natbj += 1
-			natbro += 1
-!!I added it for 3 but I would suggest just having 2 to cut down on the size of the number of mp4''s
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbj' + rand(1,3) + '.mp4"></center>'
-			'"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 into her eyes.'
-			'Natasha jerkily nods and motions him over to the side of the bed. She reaches up with trembling hands to unfastens 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.'
-			'"Get her hair out of the way Kolka. I want to see this properly." You tell Kolka and he gathers her hair in his hand and keeps hold of it to guide her mouth up and down his shaft.'
-			'After a few more minutes Kolka says "I''m going to cum."'
-			gs 'arousal', 'voyeur', 5, 'dom'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Let Kolka cum': gt 'natbelapt', 'kolkacum', 0
-			if NatKolkaSex > 5: act 'Continue': gt 'natbelapt', 'softsex'
-		end
-		
-		act '69':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natbj4.mp4"></center>'
-			'"Kolka you need to learn how to pleasure a girl, if you want to keep one. I want you to eat Natasha''s pussy while she sucks you dick. Now lie back on the bed" He eagerly lays down on the bed, on his back, pulling his clothes off as he does.'
-			'"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 into her eyes. "Don''t worry, you''re going to enjoy this too."'
-			*nl
-			'Natasha jerkily nods and starts undressing. "Now lie down on top of Kolka so he can lick you while you suck his dick."'
-			'Natasha positions herself on top of Kolka and reaches up with trembling hands to grab hold of his semi-hard dick. She tentatively begins to lick it and after a moment takes the now fully hard shaft into her mouth.'
-			'"Don''t just look at it Kolka, lick her." You order Kolka and he obediently starts licking Natasha''s pussy, occasionally sucking on her clit, making Natasha moan around his cock.'
-			'After a few more minutes Kolka says "I''m going to cum."'
-			gs 'arousal', 'voyeur', 5, 'dom'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Let Kolka cum': gt 'natbelapt', 'kolkacum', 0
-			if NatKolkaSex > 5: act 'Continue': gt 'natbelapt', 'softsex'
-		end
-	end
-end
-
-if $ARGS[0] = 'softsex':
-	*clr & cla
-	act 'Give him a titjob':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/nattitjob.mp4"></center>'
-		'"I want you to finish him off with your tits today Natasha." You order her.'
-		'Natasha obediently kneels between his legs and presses her tits around Kolka''s dick. She starts to move them up and down his shaft slowly at first, then rapidly picking up speed as her saliva lubricates the motion.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natfacial.mp4"></center>'
-			'After a few more minutes Kolka says "I''m going to cum."'
-			'"Jerk him off on your tits Natasha."'
-			'Natasha leans over Kolka''s cock and squeezes her tits together with one hand. With the other she rapidly strokes his cock. With a grunt Kolka shoots his cum onto Natasha''s tits. By the time he''s done Natasha''s chest is covered in cum.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			NatKolkaSex += 1
-			gs 'arousal', 'voyeur', 5, 'dom'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-	end
-	act 'Give him a assjob':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natassjob.mp4"></center>'
-		'"I want you to finish him off with your asscheeks today Natasha." You order her.'
-		'Natasha obediently lies down on her stomach and presenting her ass for Kolka to use. Kolka takes his time rubbing his dick over Natasha''s asshole and pussy before he presses his dick between her cheeks and starts hammering away.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natassjobcum.mp4"></center>'
-			'After a few minutes Natasha gets on all fours so she can fuck Kolka back. Soon after he says "I''m going to cum."'
-			'"Shoot your load on her back brother."'
-			'Kolka groans and shoots his cum onto Natasha''s back. By the time he''s done Natasha''s back is covered in cum.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			NatKolkaSex += 1
-			gs 'arousal', 'voyeur', 5, 'dom'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-	end
-	act 'Give him a thighjob':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natthighjob01.mp4"></center>'
-		'"That''s enough of a warmup. Lie down on your back and put your legs in the air Natasha. You are going to fuck Kolka with your thighs."'
-		'Natasha obediently lays back and positions Kolka''s dick between her thighs so that it rubs against her pussy as she slowly moves up and down.'
-		'You can see Kolka''s dick getting wet from Natasha''s juices.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natthighjob02.mp4"></center>'
-			'When Natasha starts to tire Kolka takes over and starts thrusting his dick against Natasha''s pussy, making her moan in pleasure.'
-			act 'Continue':
-				*clr & cla
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natthighjob03.mp4"></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				'"Cum on her pussy Kolka." You tell him.'
-				'Natasha pulls her legs up against her chest while Kolka holds his dick against her pussy with one hand as he keeps thrusting. With a grunt Kolka shoots his cum onto Natasha''s wet pussy. By the time he''s done her pussy is covered in his sperm.'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-				NatKolkaSex += 1
-				gs 'arousal', 'voyeur', 5, 'dom'
-				gs 'arousal', 'end'
-				gs 'stat'
-				act 'Continue': gt 'natbelapt', 'natroom'
-			end
-		end		
-	end	
-	act 'Give him a footjob':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natfootjob.mp4"></center>'
-		if NatKolkaFootjob = 0:
-			NatKolkaFootjob = 1
-			'"Have you ever had a footjob Kolka? I bet Natasha''s feet feel great."'
-			'"No, but you know I''m open to these new kind of things." Kolka says with a grin.'
-		end
-		'"Well Natasha, lie back and use those soft feet of yours to get him off."'
-		'The two of them get comfortable on the bed and Natasha takes Kolka''s dick between her feet and gently starts playing with him.'
-		'"So, do her feet feel as soft as they look Kolka?"'
-		'"Y-Yeah, this is amazing." He lets out in a low groan.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natfootjobcum.mp4"></center>'
-			'After a few more minutes Kolka says "I''m going to cum."'
-			'"Pick up the pace Natasha." You tell her.'
-			'Natasha wraps her toes around his cock and starts moving more rapidly. With a grunt Kolka shoots his cum on his belly. By the time he''s done his belly and Natasha''s feet are covered in sperm.'
-			'"That''s all for today Kolka. You can clean up and get dressed. I have a few things I want to discuss with Natasha."'
-			NatKolkaSex += 1
-			gs 'arousal', 'voyeur', 5, 'dom'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end		
-	end	
-	if NatKolkaSex > 10:
-		act 'More': gt 'natbelapt', 'penetration'
-	end
-end
-
-if $ARGS[0] = 'penetration':
-	*clr & cla
-	'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natfinger.mp4"></center>'
-	'You kneel down behind Natasha and put your hand between her legs, caressing her pussy for a few seconds before putting a finger in her, feeling how wet she is. When you pull it out again your finger is covered in her juices.'
-	'"Do you want Kolka''s dick in your pussy?" You whisper in her ear.'
-	'Natasha looks at you and then nods her head slowly.'
-	act 'Missionary':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natmissionary01.mp4"></center>'
-		'"Then ask him, better yet, beg him to make your pussy feel good. Let him know how much you want it." You tell her as you push her down on her back.'
-		'Natasha immediately opens her legs, giving Kolka an inviting view of her soaking pussy. "P-Please fuck my pussy Kolka... I-I need it. I want you inside me now."'
-		'Kolka looks at you and grins before turning his attention back to Natasha. He guides his cock in Natasha''s eager pussy and starts fucking her gently, causing her to moan out in pleasure.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natmissionary02.mp4"></center>'
-			'"Fuck her harder Kolka. She can take it."'
-			'Kolka first looks at you and then at Natasha, searching for confirmation of what you just said.'
-			'"F-Faster... Please." She begs him.'
-			'Kolka doesn''t need any further urging on and starts to fuck Natasha hard, causing her tits to bounce up and down each time he thrusts into her.'
-			act 'Continue':
-				*clr & cla
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natmissionary03.mp4"></center>'
-				'You can see that Natasha is getting right on the edge. "She''s almost there Kolka. Just grab her and fuck her hard. I want to see her cum on your dick."'
-				'Kolka grabs hold of Natasha, lifting her up and starts fucking her as fast as he can. Within a few minutes you can see Natasha''s eyes roll back in her head while she moans loudly as her orgasm hits her.'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				gt 'kolkacum', 1
-			end
-		end
-	end
-	act 'Cowgirl':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natride01.mp4"></center>'
-		'"Maybe I''ll let you fuck him." You tell Natasha as you push Kolka down on the bed.'
-		'"Grind your pussy on his cock Natasha. And you better start begging or I won''t let him put it inside."'
-		'Natasha immediately starts rubbing her soaked pussy on Kolka''s dick. "P-Please put it in... I-I need it. I want you inside me now."'
-		'You run your hand over Natasha''s body and give Kolka a nod "Ok Kolka, put it in, you should never leave a girl hanging when she needs it this bad."'
-		'"I won''t <<$pcs_nickname>>. She can ride my dick all she wants." He tells you as he guides his dick inside.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natride02.mp4"></center>'
-			'As you step back Natasha needs no further encouragement . She places her hands on Kolka''s chest and starts riding his dick, letting out a moan from time to time.'
-			'"Your tight pussy feels great." Kolka tells her. "Keep going." To which she starts riding him even faster.'
-			act 'Continue':
-				*clr & cla
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natride03.mp4"></center>'
-				'You can see that Natasha is getting right on the edge. "She''s almost there Kolka. Just grab her and fuck her hard. I want to see her cum on your dick."'
-				'Kolka grabs Natasha by the ass, holding her in place and starts fucking her as fast as he can. Within a few minutes you can see Natasha''s eyes roll back in her head while she moans loudly as her orgasm hits her.'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				gt 'kolkacum', 2
-			end
-		end
-	end
-	act 'Doggystyle':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natonbelly.mp4"></center>'
-		'"Then ask him, better yet, beg him to make your pussy feel good. Let him know how much you want it." You tell her as you push her down on her belly.'
-		'Natasha immediately pushes her ass up, giving Kolka an inviting view of her soaking pussy. "P-Please fuck my pussy Kolka... I-I need it. I want you inside me now."'
-		'Kolka looks at you and grins before turning his attention back to Natasha. He guides his cock in Natasha''s eager pussy and starts fucking her gently, causing her to moan out in pleasure.'
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natdoggy01.mp4"></center>'
-			'After a while you see that Kolka is starting to tire and you decide to give him a little bit of rest.'
-			'"Time for you to do some work too Natasha. Get on all fours and fuck Kolka''s dick."'
-			'Kolka grabs Natasha by the hips and pulls her up until she''s sitting on her hands and knees. Keeping his dick inside of her pussy all the time.'
-			'Once she''s positioned properly he urges her on. "Come on Natasha, you heard <<$pcs_nickname>>."'
-			'Not skipping a beat Natasha starts to fuck Kolka''s dick as hard as she can. Each time she bottoms out she moans in pleasure.'
-			act 'Continue':
-				*clr & cla
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natdoggy02.mp4"></center>'
-				'You can see that Natasha is getting right on the edge. "She''s almost there Kolka. Just grab her and fuck her hard. I want to see her cum on your dick."'
-				'Kolka grabs Natasha by the hips, holding her in place and starts fucking her even faster. Within a few minutes you can see Natasha''s eyes roll back in her head while she moans loudly as her orgasm hits her.'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				gt 'kolkacum', 3
-			end
-		end
-	end
-	
-	if NatKolkaSex > 20:		
-		act 'Anal sex': gt 'natbelapt', 'natkolkaanalprep'
-	end
-end
-
-if $ARGS[0] = 'natkolkaanalprep':
-	*clr & cla
-	'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalfinger.mp4"></center>'
-	if natanal < 5:
-		natanal += 1
-		if natanal = 0:
-			'"Natasha has a cute little ass doesn''t she Kolka? Would you like to fuck it?"'
-			'"W-Wait... I''ve never had anal sex before." She whimpers.'
-		else
-			'"Would you like to fuck Natasha''s cute little asshole again?" You ask Kolka.'
-			'"W-Wait... It really hurt last time we did that." She whimpers.'
-		end
-		'"Present your ass to him. You just need to get used to it Natasha."'
-		'Natasha hesitantly gets on all fours and Kolka immediately starts playing with her asshole, testing it with a finger.'
-		'"Wow. That''s really tight. How does it feel, having my finger up there Natasha?" He asks her.'
-		'"I-It''s weird." She stammers.'
-		'"You''ll learn to love it." You tell her. "You know what, how about a deal? If Kolka manages to get you off with his mouth you''ll let him try fucking your ass."'
-		if natanal = 0:
-			'Natasha looks at you and you can clearly see that she''s not sure she wants this. "You''ll never know if you like it if you don''t try it at least once Natasha." You try to persuade her.'
-			'"Ok, I guess I can give it a try."'
-		else
-			'Natasha looks at you and you can clearly see that she''s not sure she wants this again. "You never gave yourself the chance to get into it Natasha." You try to persuade her.'
-			'"Ok, I guess I can give it a try again."'
-		end
-	else
-		'"Would you like to fuck Natasha''s cute little asshole again?" You ask Kolka.'
-		'"Ofcourse <<$pcs_nickname>>" He says with a big grin on his face at the prospect of fucking her tight asshole again.'
-		'"Present your ass to him. Time for some more training, Natasha."'
-		'Natasha hesitantly gets on all fours and Kolka immediately starts playing with her asshole, testing it with a finger.'
-		'"Wow. It''s always so tight. You like having my finger up there, don''t you, Natasha?" He asks her.'
-		'"Y-Yeah." She stammers. "But would you... Would you lick me again first please?"'
-	end
-	act 'Kolka licks her':
-		*clr & cla
-		natkolkadeal = 1
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcuni.mp4"></center>'
-		'Natasha lies back on the bed and opens her legs for Kolka.'
-		'"Come on Kolka. Earn your reward." You eagerly urge him on.'
-		'He doesn''t waste a second and places his mouth on her pussy. Licking it gently first, then gradually putting more passion into it.'
-		'You enjoy the sound of Natasha''s moans as Kolka keeps working her pussy, switching between sucking on her clit and fucking her pussy with his tongue.'
-		'After a few minutes Natasha suddenly grabs his head and keeps it pressed firmly in her pussy.'
-		'"P-Please." She begs him, right before her entire body starts to shake in an intense orgasm.'
-		'"It looks like Kolka earned a reward." You say, looking in Natasha''s eyes.'
-		if natanal = 0:
-			'"Y-Yeah, I''ll try it <<$pcs_nickname>>." She says, still out of breath.'
-		elseif natanal < 5:
-			'"Y-Yeah, he can fuck my ass again." She says, still out of breath.'
-		else
-			'"Y-Yeah, please take my ass again Kolka." She says, still out of breath.'
-		end
-		act 'Anal sex': gt 'natbelapt', 'natkolkaanalsex'
-	end
-	if natanal >= 5:
-		act 'Skip straight to anal': gt 'natbelapt', 'natkolkaanalsex'
-	end
-end
-
-if $ARGS[0] = 'natkolkaanalsex':
-	act 'Missionary anal':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalmissionary01.mp4"></center>'
-		'"Move over to the edge of the bed and spread that ass, Natasha." You order her.'
-		if natanal = 0:
-			'"Ok, but please be gentle Kolka. I''ve never done this before." She begs him as she does as you instructed.'
-		elseif natanal < 10:
-			'"Ok, but please be gentle Kolka." She begs him as she does as you instructed.'
-		else
-			'"I want you in my ass, Kolka." She begs him as she does as you instructed.'
-		end
-		'Kolka doesn''t waste any time and presses the tip of his dick against her sphincter.'
-		if natkolkadeal = 1:
-			'"Time for my reward." He tells her as he slowly starts pushing himself into Natasha''s ass.'
-		else
-			'"I love your tight asshole." He tells her as he slowly starts pushing himself into Natasha''s ass.'
-		end
-		if natanal < 5:
-			'The moment his tip pops inside Natasha lets out a groan of pain. "I-It hurts... Aah... I don''t know if I... Please... Gently..." She begs him in pained gasps.'
-		elseif natanal < 10:
-			'The moment his tip pops inside Natasha lets out a groan of mixed pleasure and pain. "Aah... Be gentle with my ass." She begs him.'
-		else
-			'The moment his tip pops inside Natasha lets out a groan of pleasure. "Aah... Please take my ass. I want it." She begs him.'
-		end
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalmissionary02.mp4"></center>'
-			if natanal = 0:
-				'"I''m going to start moving now Natasha." Kolka says as he slowly pushes deeper into her ass, making her cry out again.'
-				'"Please do it gently. I-It hurts." Natasha pleads again as she uses her hands to keep Kolka from going too deep.'
-				'"Jesus your ass is tight Natasha. You''re nearly crushing me." He pants as he slowly pushes in and out, making her wince and gasp with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing great for your first time."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 4
-			elseif natanal < 5:
-				'"I''m going to start moving now Natasha." Kolka says as he slowly pushes deeper into her ass, making her moan.'
-				'"Ok, just go slow so I can adjust." Natasha pleads again as she uses her hands to keep Kolka from going too deep.'
-				'"Relax your ass. I won''t go too fast." He pants as he slowly pushes in and out, making her gasp with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing a lot better than last time."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 4
-			elseif natanal < 10:
-				'"You like it, don''t you?" Kolka asks as he slowly pushes himself deep into her ass, making her moan.'
-				'"Y-Yeah but don''t go too fast. I need to adjust a bit." Natasha says as she uses her hands to keep Kolka from going too deep.'
-				'"Relax your ass. I won''t go too fast." He pants as he slowly pushes in and out, making her moan with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing great."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 4
-			else
-				'"How much do you want it?" Kolka asks as he slowly pushes himself deep into her ass, making her moan.'
-				'"Y-Yeah i love how you feel in my ass." Natasha says as she uses her hands to keep Kolka from going too deep right away.'
-				'"I love fucking your tight ass Natasha." He pants as he slowly pushes in and out, making her moan with each stroke.'
-				'"Harder, I-I want it harder." She pleads with him.'
-				act 'Continue':
-					*clr & cla
-					'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalmissionary03.mp4"></center>'
-					'Kolka lifts Natasha''s ass off the bed, giving him better access to her asshole and really starts to pound away, making her cry out for even more.'
-					'The thought of having turned Natasha into a buttslut makes your pussy so wet that you can feel it running down your inner thighs.'
-					'It doesn''t take much of Kolka''s relentless pounding before she starts to shake in orgasm.'
-					'After a few more strokes Kolka says "I''m going to cum."'
-					gt 'kolkacum', 4
-				end
-			end	
-		end
-	end
-	act 'Cowgirl anal':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalride01.mp4"></center>'
-		'"You''re going to ride him with that ass of yours, Natasha." You order her.'
-		if natanal = 0:
-			'"Ok, but please let me take it slow. I''ve never done this before." She begs as she does as you instructed.'
-		elseif natanal < 10:
-			'"Ok, but please let me take it slow." She begs as she does as you instructed.'
-		else
-			'"I want you in my ass again." She says to Kolka as she does as you instructed.'
-		end
-		if natkolkadeal = 1:
-			'"Time for my reward." He tells her as she slowly starts pushing his dick into her ass.'
-		else
-			'"I love your tight asshole." He tells her as she slowly starts pushing his dick into her ass.'
-		end
-		if natanal < 5:
-			'The moment his tip pops inside Natasha lets out a groan of pain. "I-It hurts... Aah... I don''t know if I..." She begs in pained gasps.'
-			'"Just hold it there Natasha. Give your ass a moment to adjust." You order her.'
-		elseif natanal < 10:
-			'The moment his tip pops inside Natasha lets out a groan of mixed pleasure and pain. "Aah... I have to take this slow." She tells him.'
-			'"Just go slow Natasha. Give your ass a moment to adjust." You order her.'
-		else
-			'The moment his tip pops inside Natasha lets out a groan of pleasure. "Aah... I love it in my ass." She tells him as she takes his dick as deep as she can.'
-		end
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalride02.mp4"></center>'
-			'"Turn around and put your feed on his knees. Let him fuck your ass." You order Natasha.'
-			'Natasha obediently turns around and slowly puts his dick in her ass again before placing her feet on his knees.'
-			if natanal = 0:
-				'"I''m going to start moving now Natasha." Kolka says as he slowly pushes deeper into her ass, making her cry out again.'
-				'"Please do it gently. I-It hurts." Natasha pleads again.'
-				'"Jesus your ass is thight Natasha. You''re nearly crushing me." He pants as he slowly pushes in and out, making her wince and gasp with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing great for your first time."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 5
-			elseif natanal < 5:
-				'"I''m going to start moving now Natasha." Kolka says as he slowly pushes deeper into her ass, making her moan.'
-				'"Ok, just go slow so I can adjust." Natasha pleads again.'
-				'"Relax your ass. I won''t go too fast." He pants as he slowly pushes in and out, making her gasp with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing a lot better than last time."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 5
-			elseif natanal < 10:
-				'"You like it, don''t you?" Kolka asks as he slowly pushes himself deep into her ass, making her moan.'
-				'"Y-Yeah but don''t go too fast. I need to adjust a bit." Natasha says.'
-				'"Relax your ass. I won''t go too fast." He pants as he slowly pushes in and out, making her moan with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing great."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 5
-			else
-				'"How much do you want it?" Kolka asks as he slowly pushes himself deep into her ass, making her moan.'
-				'"Y-Yeah i love how you feel in my ass." Natasha says.'
-				'"I love fucking your tight ass Natasha." He pants as he slowly pushes in and out, making her moan with each stroke.'
-				'"Harder, I-I want it harder." She pleads with him.'
-				act 'Continue':
-					*clr & cla
-					'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanalride03.mp4"></center>'
-					'Kolka grabs Natasha''s legs and lays her on top of his chest, giving him better access to her asshole and really starts to pound away, making her cry out for even more.'
-					'The thought of having turned Natasha into a buttslut makes your pussy so wet that you can feel it running down your inner thighs.'
-					'It doesn''t take much of Kolka''s relentless pounding before she starts to shake in orgasm.'
-					'After a few more strokes Kolka says "I''m going to cum."'
-					gt 'kolkacum', 5
-				end
-			end	
-		end
-	end
-	act 'Doggystyle anal':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanaldoggy01.mp4"></center>'
-		'"Lie down and spread that ass, Natasha." You order her.'
-		if natanal = 0:
-			'"Ok, but please be gentle Kolka. I''ve never done this before." She begs him as she does as you instructed.'
-		elseif natanal < 10:
-			'"Ok, but please be gentle Kolka." She begs him as she does as you instructed.'
-		else
-			'"I want you in my ass, Kolka." She begs him as she does as you instructed.'
-		end
-		'Kolka doesn''t waste any time and presses the tip of his dick against her sphincter.'
-		if natkolkadeal = 1:
-			'"Time for my reward." He tells her as he slowly starts pushing himself into Natasha''s ass.'
-		else
-			'"I love your tight asshole." He tells her as he slowly starts pushing himself into Natasha''s ass.'
-		end
-		if natanal < 5:
-			'The moment his tip pops inside Natasha lets out a groan of pain. "I-It hurts... Aah... I don''t know if I... Please... Gently..." She begs him in pained gasps.'
-		elseif natanal < 10:
-			'The moment his tip pops inside Natasha lets out a groan of mixed pleasure and pain. "Aah... Be gentle with my ass." She begs him.'
-		else
-			'The moment his tip pops inside Natasha lets out a groan of pleasure. "Aah... Please take my ass. I want it." She begs him.'
-		end
-		act 'Continue':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanaldoggy02.mp4"></center>'
-			'"Get on all fours now Natasha." You order her.'
-			'Natasha obediently gets up on her hands and knees and presents her ass to Kolka, allowing him to insert his dick again.'
-			if natanal = 0:
-				'"I''m going to start moving now Natasha." Kolka says as he slowly pushes deeper into her ass, making her cry out again.'
-				'"Please do it gently. I-It hurts." Natasha pleads again.'
-				'"Jesus your ass is thight Natasha. You''re nearly crushing me." He pants as he slowly pushes in and out, making her wince and gasp with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing great for your first time."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 4
-			elseif natanal < 5:
-				'"I''m going to start moving now Natasha." Kolka says as he slowly pushes deeper into her ass, making her moan.'
-				'"Ok, just go slow so I can adjust." Natasha pleads again.'
-				'"Relax your ass. I won''t go too fast." He pants as he slowly pushes in and out, making her gasp with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing a lot better than last time."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 4
-			elseif natanal < 10:
-				'"You like it, don''t you?" Kolka asks as he slowly pushes himself deep into her ass, making her moan.'
-				'"Y-Yeah but don''t go too fast. I need to adjust a bit." Natasha says.'
-				'"Relax your ass. I won''t go too fast." He pants as he slowly pushes in and out, making her moan with each stroke.'
-				'You sit down on the bed next to Natasha and whisper in her ear. "Keep your asshole relaxed. You''re doing great."'
-				'After a few more minutes of slowly fucking her ass Kolka says "I''m going to cum."'
-				gt 'kolkacum', 4
-			else
-				'"How much do you want it?" Kolka asks as he slowly pushes himself deep into her ass, making her moan.'
-				'"Y-Yeah I love how you feel in my ass." Natasha says.'
-				'"I love fucking your tight ass Natasha." He pants as he slowly pushes in and out, making her moan with each stroke.'
-				'"Harder, I-I want it harder." She pleads with him.'
-				act 'Continue':
-					*clr & cla
-					'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natanaldoggy03.mp4"></center>'
-					'Kolka grabs Natasha by the hips and really starts to pound away, making her cry out for even more.'
-					'The thought of having turned Natasha into a buttslut makes your pussy so wet that you can feel it running down your inner thighs.'
-					'It doesn''t take much of Kolka''s relentless pounding before she starts to shake in orgasm.'
-					'After a few more strokes Kolka says "I''m going to cum."'
-					gt 'kolkacum', 4
-				end
-			end	
-		end
-	end
-end
-	
-if $ARGS[0] = 'kolkacum':
-!! ARGS[1] is used to determine where Kolka can cum.
-!!	0	should be used when there is no vaginal or anal penetration
-!!	1 	if there is vaginal penetration, missionary
-!!	2 	if there is vaginal penetration, cowgirl
-!!	3	if there is vaginal penetration, doggy
-!!	4	if there is anal penetration, missionary
-!!	5 	if there is anal penetration, cowgirl
-!!	6	if there is anal penetration, doggy
-	NatKolkaSex += 1
-	gs 'arousal', 'voyeur', 5, 'dom'
-	gs 'arousal', 'end'
-	gs 'stat'
-	act 'Cum on her face':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natfacial.mp4"></center>'
-		'"Do it on her face."'
-		'Natasha kneels down at Kolka''s feet and jerks his cock over her face rapidly. With a grunt Kolka shoots his cum onto Natasha''s face. By the time he''s done Natasha''s face and chest are covered in the cum that she didn''t manage to catch in her mouth.'
-		'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-		act 'Continue': gt 'natbelapt', 'natroom'
-	end
-	act 'Cum in her mouth':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcummouth.mp4"></center>'
-		'"Cum in her mouth."'
-		'Kolka holds Natasha by the hair as he pistons his cock into her mouth rapidly. Natasha''s chin is covered with her drool and it is dripping down everywhere. 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.'	
-		act 'Swallow':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natswallow2.mp4"></center>'
-			'"Swallow it, slut." You command, when Kolka is done, before Natasha can spit the sperm out.'
-			'Natasha grimaces but complies, swallowing Kolka''s load then opening her mouth to show that it is all gone.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-	end
-	act 'Cum down her throat':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natthroat.mp4"></center>'
-		'"Do it in her throat."'
-		'Natasha, sits down at the side of the bed starts deepthroating his cock rapidly. Natasha''s chin is covered with her drool and it is dripping down everywhere. "Here it comes." He says and Natasha''s forces herself down on his cock as far as she can go while Kolka releases his cum in her. Not a drop escapes her mouth.'
-		'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-		act 'Continue': gt 'natbelapt', 'natroom'
-	end
-	act 'Cum on her tits':
-		*clr & cla
-		'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natfacial.mp4"></center>'
-		'"Jerk him off on your tits Natasha."'
-		'Natasha leans over Kolka''s cock and squeezes her tits together with one hand. With the other she rapidly strokes his cock. With a grunt Kolka shoots his cum onto Natasha''s tits. By the time he''s done Natasha''s chest is covered in cum.'
-		'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-		act 'Continue': gt 'natbelapt', 'natroom'
-	end
-	if ARGS[1] = 1:
-		NatKolkaSex += 1
-		gs 'arousal', 'voyeur', 15, 'dom'
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Cum on her belly':
-			*clr & cla
-			if rand(0,9) = 0:
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampiemissionary.mp4"></video></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'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.'
-				'"Fuck, I really am sorry, Natasha!", he says apologetically. "It is just, you are so hot!"'
-				'Natasha 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 quietly 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
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcumbelly.mp4"></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'"Cum on her belly."'
-				'With a grunt Kolka''s pulls his cock out of Natasha at the last second and starts jerking it over her pussy, shooting his load all over Natasha''s belly and pussy. By the time he''s done Natasha''s belly is covered in cum, some even reached her tits.'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			end
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-		act 'Cum on her pussy':
-			*clr & cla
-			if rand(0,9) = 0:
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampiemissionary.mp4"></video></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'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.'
-				'"Fuck, I really am sorry, Natasha!", he says apologetically. "It is just, you are so hot!"'
-				'Natasha 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 quietly 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
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcumpussy.mp4"></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'"Cum on her pussy."'
-				'With a grunt Kolka''s pulls his cock out of Natasha at the last second and starts jerking it over her pussy, shooting his load all over Natasha''s her pussy. By the time he''s done Natasha''s pussy is covered in cum, some dripping down her ass.'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			end
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-		if natcp > 0:
-			act 'Cum inside':
-				*clr & cla
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampiemissionary.mp4"></video></center>'
-				'"Cum in her pussy Kolka, I want you to paint her insides with your cum."'
-				'With a grunt Kolka''s pushes himself deep in Natasha, shooting his load in her pussy. When he pulls out you can see some of it dripping out of her full pussy.'
-				'Natasha 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?'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-				if rand(1,100) >= 95 and natpregday = 0:natpregday = daystart
-				act 'Continue': gt 'natbelapt', 'natroom'
-			end		
-		end
-	end
-	if ARGS[1] = 2:
-		NatKolkaSex += 1
-		gs 'arousal', 'voyeur', 15, 'dom'
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Cum on her ass':
-			*clr & cla
-			if rand(0,9) = 0:
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampieride.mp4"></video></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'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.'
-				'"Fuck, I really am sorry, Natasha!", he says apologetically. "It is just, you are so hot!"'
-				'Natasha 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 quietly 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
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcumride.mp4"></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'"Cum on her ass."'
-				'With a grunt Kolka''s pulls his cock out of Natasha''s pussy at the last second and starts jerking it over her ass, shooting his load all over Natasha''s ass.  By the time he''s done Natasha''s ass is covered in cum, some even reached lower back.'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			end
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-		if natcp > 0:
-			act 'Cum inside':
-				*clr & cla
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampieride.mp4"></video></center>'
-				'"Cum in her pussy Kolka, I want you to paint her insides with your cum."'
-				'As if on command Kolka starts shooting his load in her pussy. When he pulls out you can see some of it dripping out of her full pussy.'
-				'Natasha 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?'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-				if rand(1,100) >= 95 and natpregday = 0:natpregday = daystart
-				act 'Continue': gt 'natbelapt', 'natroom'
-			end
-		end
-	end
-	if ARGS[1] = 3:
-		NatKolkaSex += 1
-		gs 'arousal', 'voyeur', 15, 'dom'
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Cum on her ass':
-			*clr & cla
-			if rand(0,9) = 0:
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampiedoggy.mp4"></video></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'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.'
-				'"Fuck, I really am sorry, Natasha!", he says apologetically. "It is just, you are so hot!"'
-				'Natasha 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 quietly 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
-				'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcumassdoggy.mp4"></center>'
-				'After a few more minutes Kolka says "I''m going to cum."'
-				gs 'natbelEv', 'natcumresponse'
-				'"Cum on her ass."'
-				'With a grunt Kolka''s pulls his cock out of Natasha''s pussy at the last second and starts jerking it over her ass, shooting his load all over Natasha''s ass  By the time he''s done Natasha''s ass is covered in cum, some even reached her lower back.'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			end
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-		if natcp > 0:
-			act 'Cum inside':
-				*clr & cla
-				natcp += 1
-				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natcreampieride.mp4"></video></center>'
-				'"Cum in her pussy Kolka, I want you to paint her insides with your cum."'
-				'As if on command Kolka starts shooting his load in her pussy. When he pulls out you can see some of it dripping out of her full pussy.'
-				'Natasha 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?'
-				'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-				if rand(1,100) >= 95 and natpregday = 0:natpregday = daystart
-				act 'Continue': gt 'natbelapt', 'natroom'
-			end
-		end
-	end
-	
-	if ARGS[1] = 4:
-		natanal += 1
-		NatKolkaSex += 1
-		gs 'arousal', 'voyeur', 15, 'dom'
-		gs 'arousal', 'end'
-		gs 'stat'
-		
-		act 'Cum on her pussy':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcumpussy.mp4"></center>'
-			'After a few more minutes Kolka says "I''m going to cum."'
-			'"Cum on her pussy."'
-			'With a grunt Kolka''s pulls his cock out of Natasha at the last second and starts jerking it over her pussy, shooting his load all over Natasha''s her pussy. By the time he''s done Natasha''s pussy is covered in cum, some dripping down her ass.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-		act 'Cum inside':
-			*clr & cla
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natanalcreampiemissionary.mp4"></video></center>'
-			'"Cum in her ass Kolka, I want you to paint her intestines with your cum."'
-			'As if on command Kolka starts shooting his load in her ass. After a second he takes his dick out and shoots the rest of his load on her asshole.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-	end
-	
-	if ARGS[1] = 5:
-		natanal += 1
-		NatKolkaSex += 1
-		gs 'arousal', 'voyeur', 15, 'dom'
-		gs 'arousal', 'end'
-		gs 'stat'
-		
-		act 'Cum inside':
-			*clr & cla
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natanalcreampieride.mp4"></video></center>'
-			'"Cum in her ass Kolka, I want you to paint her intestines with your cum."'
-			'As if on command Kolka starts shooting his load in her ass. When he pulls out, Natasha rolls off him and you can see some of it dripping out of her full asshole.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-	end
-		
-	if ARGS[1] = 6:
-		natanal += 1
-		NatKolkaSex += 1
-		gs 'arousal', 'voyeur', 15, 'dom'
-		gs 'arousal', 'end'
-		gs 'stat'
-		
-		act 'Cum on her ass':
-			*clr & cla
-			'<center><video <<$set_imgh>> src="images/characters/pavlovsk/school/girl/natasha/sex/natcumassdoggy.mp4"></center>'
-			'After a few more minutes Kolka says "I''m going to cum."'
-			'"Cum on her ass."'
-			'With a grunt Kolka''s pulls his cock out of Natasha''s ass at the last second and starts jerking it, shooting his load all over Natasha''s ass  By the time he''s done Natasha''s ass is covered in cum, some even reached her lower back.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-		act 'Cum inside':
-			*clr & cla
-			'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/natasha/sex/natanalcreampiedoggy.mp4"></video></center>'
-			'"Cum in her ass Kolka, I want you to paint her intestines with your cum."'
-			'As if on command Kolka starts shooting his load in her ass. When he pulls out you can see some of it dripping out of her full ass.'
-			'He pushes his dick back into her ass a few more times. Each time he takes it out his cum seeps out as well.'
-			'"That''s all for today Kolka. You can get dressed. I have a few things I want to discuss with Natasha."'
-			act 'Continue': gt 'natbelapt', 'natroom'
-		end
-	end
-end
-	
-!!I pulled the nat/julia stuff for now. Lets first work on getting Natasha''s story fully fleshed out first. Then we can work on Julia, getting her story fully fleshed out as well. Then we can work on combination between the two, since the 3some stuff you have here should really require both those stories to be so far along to trigger. Plus this file is getting pretty big and likely the nat julia stuff will need to be in a ev file or it''s own file depending how much of it there is.
-
-if $ARGS[0] = 'go_see_olu':
-	act 'Take her to see Olu for 500':
-		oluuosegunday = daystart
-		gs 'boystat', 'A55'
-		*clr & cla
-		pcs_dom += 2
-		NatDolg -= 500
-		minut += 5
-		natsub += 1
-		natfuck += 1
-		if NatashaQW = 11: NatashaQW = 12
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/16.jpg"></center>'
-		'You know you need to help out with Olu soon, but your ass is still too sore. Then you get a great idea, kill two birds with one stone. Have Natasha have sex with him, she owes you anyways, besides it might be fun to make the little bitch squeal.'
-		'"Since I know you don''t have my money, I have a way you can help me out and pay off some of that debt. We are going to see my Aunt''s boyfriend Olu, he has a massive... sex drive and she can''t keep up and I need a break too."'
-		'Natasha seems a little unsure about this and perhaps a bit confused but she nods her head, you smile to her and lead her across the hall to your Aunts place.'
-		act 'Introduce Olu':
-			*clr & cla
-			minut += 5
-			'<center><b><font color=maroon>Apartment Aunt</font></b></center>'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/olu.jpg"></center>'
-			'You take off your shoes and go straight to the living room, where you find Olu resting on the couch.'
-			'He looks at you, that perpetual smile still on his face. "Hi, <<$pcs_nickname>>! Who''s your friend?" He says in badly accented Russian'
-			'"Hello, Olu! This is my friend Natasha, she wants you to fuck her." You say to him, pointing at his crotch and then slapping Natasha on the ass. He seems to understand quickly and nods with a huge grin holding up the bottle of lube.'
-			'You glance at Natasha. "Well take off your clothes." She nods and does as you ask.'
-			act 'Undress Natasha':
-				*clr & cla
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/sex/olu4.jpg"></center>'
-				'You can''t help but smile, when you glance over and see Olu already naked with his massive dick swinging. She looks up and catches sight of his huge dick and freezes looking at you with a slightly panicked look.'
-				'You smile at her. "Yep it''s huge I know, my ass needs a break and you need to pay me back so..." you trail off, it only takes a moment for Natasha to understand and then it hits her you said ass.'
-				'She squeaks a reply. "You want him to fuck me in the ass with that thing?" she says in disbelief.'
-				'"Yes I do, my ass could use a break and you owe me..."'
-				'After a moment she lowers her gaze and then nods her head. You pat her shoulder. "Good girl and it won''t be too bad, we have plenty of lube."'
-				gs 'arousal', 'voyeur', 5, 'dom'
-				gs 'stat'
-				act 'Let the fun begin':
-					*clr & cla
-					natanal += 1
-					pcs_horny += 10
-					Olu_pay += 1
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/sex/olu2.jpg"></center>'
-					'You help Natasha get undressed and then get her down on all fours in front of Olu, while he lubes up his dick and her ass, you get undressed as well. No reason he should have all the fun. You knee down beside Natasha and grab her butt cheeks with your hands and spread them wide for Olu. Not needing any more invitation than that, he kneels down behind her and lines his cock up, she squeals loudly as he forces <<dick>>cm <<$dick_girth>> cock in her ass.'
-					'He starts fucking her slowly at first but you encourage him to go faster and deeper, pulling on her hips. You feel your pussy getting wet listening to Natasha cry out and watching the <<dick>>cm <<$dick_girth>> cock rip up her ass. You start rubbing your clit as you watch.'
-					gs 'arousal', 'voyeur', 5, 'dom'
-					gs 'stat'
-					act 'Eat me':
-						*clr & cla
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/olu/sex/olunat.jpg"></center>'
-						'Getting up, you move to sit in front of Natasha and spread your legs, you pull her face to your pussy and she wastes no time and starts licking your pussy. You''re loving it, grinding your pussy into her face, her muffled cries as she eats you, while Olu pounds her ass. You keep encouraging Olu to fuck her harder. The more she squeals the more turned on you get. Before long you are cumming, apparently seeing this is a turn on for Olu as well. As he shoots his load deep in her ass with in a few moments of watching you cum.'
-						*nl
-						'With that you all get cleaned up and start getting dressed again. Once you are dressed you help Natasha back to her apartment, as she seems to be having a little trouble walking. You feel a little bad for her. "You did great, it gets better I promise. Next time it won''t hurt as much, I promise." Then you give her a passionate kiss on the lips. She gives you a smile at that and nods her head and goes back into her apartment walking quite painfully.'
-						gs 'arousal', 'voyeur', 5, 'dom'
-						gs 'arousal', 'cuni', 5, 'dom', 'lesbian'
-						minut - 5
-						gs 'arousal', 'end'
-						gs 'stat'
-						act 'Finish':gt 'pod_ezd','etaj_4'
-					end
-				end
-			end
-		end
-	end
-end
-
 if $ARGS[0] = 'chat':
 	menu_off = 1
 	*clr & cla

+ 0 - 14
locations/npcstaticdefaults.qsrc

@@ -1,20 +1,6 @@
 # npcstaticdefaults
 
 if $ARGS[0] = 'defaults':
-	npc_run['A<<npctemp>>'] = rand(1,10)
-	npc_vball['A<<npctemp>>'] = rand(1,10)
-	npc_shoot['A<<npctemp>>'] = rand(1,10)
-	npc_sewing['A<<npctemp>>'] = rand(1,10)
-	npc_serving['A<<npctemp>>'] = rand(1,10)
-	npc_chess['A<<npctemp>>'] = rand(1,10)
-	npc_dance['A<<npctemp>>'] = rand(1,10)
-	npc_danceero['A<<npctemp>>'] = rand(1,10)
-	npc_jab['A<<npctemp>>'] = rand(1,10)
-	npc_punch['A<<npctemp>>'] = rand(1,10)
-	npc_kick['A<<npctemp>>'] = rand(1,10)
-	npc_def['A<<npctemp>>'] = rand(1,10)
-	npc_vokal['A<<npctemp>>'] = rand(1,10)
-	npc_teach['A<<npctemp>>'] = rand(1,10)
 	$npc_dad['A<<npctemp>>'] = 'U'
 	$npc_mom['A<<npctemp>>'] = 'U'
 	$npc_pic['A<<npctemp>>'] = 'xPICx'

+ 2 - 6
locations/park.qsrc

@@ -8,6 +8,7 @@ if $ARGS[0] = 'start':
 	$loc = 'park'
 	$menu_loc = 'park'
 	$menu_arg = 'start'
+	$locclass = 'park'
 	menu_off = 0
 	if sound = 0:
 		if month >=11 and month <= 12 or month >=1 and month <=3:
@@ -84,12 +85,7 @@ if $ARGS[0] = 'start':
 
 	act 'Walk around the park (1:00)': gt 'parkdin'
 
-	! Setup for teleport circle
-	if tpKnown['CentralPark'] = 1:
-		act 'Enter the hidden circle of trees': gt 'treeCircle', 'CentralPark'
-	else:
-		act 'Investigate a mysterious copse of trees': gt 'treeCircle', 'CentralPark'
-	end
+	gs 'treeCircEntry', 'CentralPark'
 
 	if hour >= 10 and hour <= 22:
 		act 'Have some food in the cafe': minut += 5 & gt 'ParkKafe', 'start'

+ 7 - 2
locations/parksvid.qsrc

@@ -7,7 +7,8 @@ pcs_mood += 10
 gs 'stat'
 '<center><b>Park</b></center>'
 '<center><img <<$set_imgh>> src="images/characters/city/boyfriend/sex/event/park//0.jpg"></center>'
-'You go to the park with <<$telsob>>.'
+'You go to the park '+iif($home_town = 'pavlovsk', 'in pavlovsk', 'in Sankt Petersburg')+' with <<$telsob>>.'
+
 
 act 'Go for a walk':
 	if $telsob = 'Alla':
@@ -137,7 +138,11 @@ if $ARGS[0] = '2':
 	gs 'stat'
 	'After you finish your walk, <<$telsob>> says she needs to go, she gives you a kiss on the cheek and leaves.'
 
-	act 'Leave':gt 'park', 'start'
+	if $home_town = 'pavlovsk':
+		act 'Kiss her and say goodbye': gt 'gskver', 'start'
+	else
+		act 'Kiss her and say goodbye': gt 'park', 'start'
+	end
 end
 
 if $ARGS[0] = '3':

+ 1 - 6
locations/placer_gskver.qsrc

@@ -148,12 +148,7 @@ end
 !_________________Change the date/nights, seasons. End.___________________________
 
 
-!Setup for teleport circle
-if tpKnown['PavlovskPark'] = 1:
-	act 'Enter the hidden circle of trees': gt 'treeCircle', 'PavlovskPark'
-else:
-	act 'Investigate a mysterious copse of trees': gt 'treeCircle', 'PavlovskPark'
-end
+gs 'treeCircEntry', 'PavlovskPark'
 
 
 if soniaPS=5 and rand(1,10)=>9 and hour>14 and hour<20:

+ 6 - 2
locations/preSYS2.qsrc

@@ -215,7 +215,11 @@ if $ARGS[0] = 'modpur':
 	if $currentpursetype = '': 
 		'You do not own a purse.'
 	else
-		'<center><img <<$set_imgh>> src="images/pc/purses/<<$currentpursetype>>/<<currentpursenumber>>.jpg"></center>'
+		if $currentpursetype ! 'boutique':
+			'<center><img <<$set_imgh>> src="images/pc/purses/<<$currentpursetype>>/<<currentpursenumber>>.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/pc/purses/moncheri/<<currentpursenumber>>.jpg"></center>'
+		end
 		'Your current purse is <<$currentpursetype>>_<<currentpursenumber>>.'
 	end
 	act 'Get cheap':
@@ -268,7 +272,7 @@ if $ARGS[0] = 'modpur':
 			gt 'preSYS2','modpur'
 		else
 			bag = 1
-			$currentpursetype = 'moncheri'
+			$currentpursetype = 'boutique'
 			currentpursenumber = nbag
 			gt 'preSYS2','modpur'
 		end

+ 6 - 6
locations/spellTeleport.qsrc → locations/spell_teleport.qsrc

@@ -1,8 +1,10 @@
-#spellTeleport
+#spell_teleport
 ! Do the stuff of a Teleport
-!	ARGS[0] = the Target Location
+!	ARGS[0] = Success/Failure level
+!	ARGS[1] = the Target Location
 
-$NewLocation = $ARGS[0]
+didItWork = $ARGS[0]
+$NewLocation = $ARGS[1]
 
 :RandLocLoop
 $randomLoc = $tpLocations[rand(0,arrsize($tpLocations) - 1)]
@@ -10,8 +12,6 @@ if $randomLoc = $NewLocation or $randomLoc = $EntryPoint:
 	jump 'RandLocLoop'
 end
 
-didItWork = func("castSpell", "teleport")
-
 if didItWork > 0:
 	*nl
 	"The blur you see just outside the ring seems to shift."
@@ -38,4 +38,4 @@ killvar '$randomLoc'
 killvar '$NewLocation'
 killvar didItWork
 
--- spellTeleport ---------------------------------
+-- spell_teleport ---------------------------------

+ 4 - 2
locations/stripclub.qsrc

@@ -29,13 +29,13 @@ if $ARGS[0] = 'start':
 				*nl
 				'You still owe a 50,000 <b>₽</b> fine for your illegal actions. You cannot return to the club until you have paid them off.'
 			end
-		else
-			'The security guard stops you, looking you up and down, he asks to see your ID.'
+		else		
 			if age >= 18 or fakepassport = 1:
 				if stripwork = 1:
 					'"Welcome back <<$pcs_nickname>>, are you working tonight?" he asks.'
 					act 'Use the employee''s entrance':frost = 0 & gt 'stwork', 'start'
 				else
+					'The security guard stops you, looking you up and down, he asks to see your ID.'
 					'"OK, your ID checks out, you are free to enter." he tells you.'
 				end
 				if stripdolg = 0:
@@ -58,6 +58,8 @@ if $ARGS[0] = 'start':
 					end
 				end
 			else
+				'The security guard stops you, looking you up and down, he asks to see your ID.'
+				'You make a show of rummaging through your purse. "Sorry, I must have left my ID at home."'
 				'"You need to leave this establishment, be sure to come back when you are old enough." he tells you.'
 			end
 		end

+ 31 - 8
locations/stwork.qsrc

@@ -21,16 +21,39 @@ if $ARGS[0] = 'start':
 	'There are some stairs leading to the <a href="exec:gt ''stwork'', ''stripgirl''">stage</a> where you can head out to perform.'
 	'To the side there''s a <a href="exec:stripMir = 0 & gt ''stripclub'', ''start''">steel door</a> which overlooks the back yard and the staff uses as an entrance, to save them from meeting scummy customers. Standing by this entrance, there''s always <a href="exec:gt ''stwork'', ''guard''">security</a> keeping the talent safe.'
 	'Near the exit door is a vending machine selling '+iif(money >= 100,'<a href="exec:money -= 100 & gt ''food'', ''snack''">snacks</a>','snacks')+' and a <a href="exec:gt ''beverage'', ''bev_wat''">water cooler</a>, which is heavily used by staff after coming off stage'
-	'Behind a wooden door there''s the <a href="exec:gt ''stwork'', ''toilet''">staff bathroom</a>.'
+	'A wooden door leads to the <a href="exec:gt ''stwork'', ''toilet''">staff bathroom</a>.'
 
-	&! if tatlech > 0:stripKoef = rand(1, 3)
-	&! if tatback > 0:stripKoef2 = rand(1, 3)
-	&! if tatblly > 0:stripKoef3 = rand(1, 3)
-	&! if tatupb > 0:stripKoef4 = rand(3, 6)
-	&! if tatleg > 0:stripKoef5 = rand(1, 3)
-	&! if tatarm > 0:stripKoef6 = rand(1, 3)
-	&! if tatside > 0:stripKoef7 = rand(1, 3)
+	! Tattoos increase your desireability as a stripper
+	if tatlech > 0:stripKoef1 = rand(1, 3)
+	if tatback > 0:stripKoef2 = rand(1, 3)
+	if tatblly > 0:stripKoef3 = rand(1, 3)
+	if tatupb > 0:stripKoef4 = rand(3, 6)
+	if tatleg > 0:stripKoef5 = rand(1, 3)
+	if tatarm > 0:stripKoef6 = rand(1, 3)
+	if tatside > 0:stripKoef7 = rand(1, 3)
+	stripKoef = stripKoef1 + stripKoef2 + stripKoef3 + stripKoef4 + stripKoef5 + stripKoef6 + stripKoef7
 
+	!! Private dance available
+	if stprivatechance > 0:
+		stpriv = stripKoef + (pcs_apprnc / 3)
+		! Bonus for poledancing
+		if stprivatechance = 2:
+			stprive += 20
+		end
+		if stpriv > rand (0, 100):
+		*nl
+			'One of the bouncers walks up to you, telling you that a customer is waiting for you in one of the private rooms.'
+			act '<b>Go perform a private dance</b>': 
+				stprivatechance = 0
+				gt 'stwork2', 'privatdance'
+			end
+		end
+	end
+	if countmoney = 1:
+		countmoney = 0
+		gs 'stwork2', 'tipcalculator'
+	end
+	
 	if (kosmetica >= 3 or pcs_makeup >= 4) and (hour >= 11 or hour <= 2):
 		act '<b>Prepare for your show</b>':
 			*clr & cla

+ 227 - 67
locations/stwork2.qsrc

@@ -20,38 +20,158 @@ if $ARGS[0] = 'strip':
 	if hour >= 11 or hour <= 2:
 		if stpredmet = 3:lapdance = 0
 		if stpredmet > 0:
-			act 'Striptease 5 minutes (<<stpredmet>> items of clothing)':
-				*clr & cla
-				minut += 5
-				stpredmet -= 1
-				pcs_sweat += 5
-				fat -= 3
-				dancero_exp += rand(2, 4)
-				inhib_exp += rand(2,5)
-				city_stripping += rand(1,2)
-
-				if stpredmet = 1:pcs_sweat += 5
-				if stpredmet = 0:pcs_hairbsh = 0 & stripdancesum += 1
-
-				striptip = rand(pcs_dancero,100)
-				lapdance += striptip
-
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripclub2.jpg"></center>'
-				'You walk up on the stage and hear the music start. The effect is immediate, you start moving seductively on stage, teasingly undressing on stage...'
-
-				if pcs_weight > pcs_hgt - 90:
-					vesrand = rand(0, 100)
-
-					if vesrand >= 75:
-						striptip -= rand(5, 10)
-						'You overhear some of the customers right next to the stage, "Look at her fat hanging out. Her gut and ass shaking like jelly."'
+			if $pantyworntype ! 'none' and $braworntype ! 'none':
+				act 'Striptease 15 minutes':
+					*clr & cla
+					countmoney = 1
+					custbooing = 0
+					minut += 15
+					pcs_sweat += 15
+					fat -= 3
+					dancero_exp += rand(2, 4)
+					inhib_exp += rand(2,5)
+					city_stripping += rand(1,2)
+
+					if stpredmet = 1:pcs_sweat += 5
+					if stpredmet = 0:pcs_hairbsh = 0 & stripdancesum += 1
+
+					striptip = rand(pcs_dancero,100)
+					lapdance += striptip
+
+					gs 'stat'
+					
+					!You either start with underwear and clothes or in underwear. Each has a different picture set.
+					if $clothingworntype ! 'nude':
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripclo' + rand(1,3) + '.jpg"></center>'
+						'You walk up on the stage and hear the music start. The effect is immediate, you start moving seductively around the pole in the center of the stage...'
+						gs 'stwork2', 'custboo'
+						act 'Take off your top':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripclo' + rand(4,5) + '.jpg"></center>'
+							if custboo = 0:
+								pcs_mood += 5
+								'Urged on by the audience you take off your blouse and let it drop to the stage while you keep teasing them.'
+							else
+								pcs_mood -= 5
+								'Ignoring the comments from the audience you take off your blouse and let it drop to the stage while you keep teasing them.'
+							end
+							gs 'stwork2', 'custboo'
+							gs 'stat'
+							act 'Take off your skirt':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripclo' + rand(6,7) + '.jpg"></center>'
+								if custboo = 0:
+									pcs_mood += 5
+									'The positive responses make you smile even broader as you unzip your skirt and let it drop to your ankles before kicking it off and laying down on the stage, rolling around and looking several customers straight in the eyes. Some of them throw some bills your way and you take care to pay them some extra attention.'
+								else
+									pcs_mood -= 5
+									'The negative comments make you feel a bit uncomfortable as you unzip your skirt and let it drop to your ankles before kicking it off and laying down on the stage, rolling around and looking several customers straight in the eyes.'
+								end
+								gs 'stwork2', 'custboo'
+								gs 'stat'
+								if custbooing < 2:
+									act 'Show them more':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripclo' + rand(9,15) + '.jpg"></center>'
+										if custboo = 0:
+											pcs_mood += 5
+											'The men in the first row go wild when you take off your bra. Shouting "Show your pussy! Show your pussy!"'
+											'As you hook your fingers into your panties a few customers start throwing money on the stage. You walk over to one of them and bend over, giving him a great view of your ass as you pull your panties off.'
+											'After that you dance as seductively as you can, trying to spread your attention over the audience, but paying extra attention to the ones who give you more money.'
+										else
+											'The negative comments make you feel a bit uncomfortable as you take off your bra, but as soon as soon as they can see your tits the audience becomes a lot more appreciative.'
+											'This gives you the courage to take off your panties as well. Once you are naked some customers start throwing money on the stage.'
+											'You dance as seductively as you can, trying to spread your attention over the audience, but paying extra attention to the ones who give you more money.'
+										end
+										'When the music starts winding down you collect your tips and pick up your clothes, waving a few kisses to your audience before going backstage again.'
+										gs 'exhibitionism', 3
+										stprivatechance = 1
+										gs 'stat'
+										act 'Leave the stage': gt 'stwork', 'start'
+									end
+								else
+									act 'Show them more':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripclo8.jpg"></center>'
+										pcs_mood -= 5
+										'Not sure what you could do to please your audience you take off your bra and toss it with the rest of your clothes. Even this doesn''t seem to get any positive responses.'
+										'All you can hear is mockery as you try to ignore them and continue your act. The cutting remarks keep coming however and soon you are close to tears.'
+										'Before the music stops you start collecting your meager tips and clothes and flee backstage.'
+										gs 'exhibitionism', 1
+										stprivatechance = 0
+										gs 'stat'
+										act 'Leave the stage': gt 'stwork', 'start'
+									end
+								end
+							end
+						end
+					else
+						'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripund' + rand(1,3) + '.jpg"></center>'
+						'You walk up on the stage and hear the music start. The effect is immediate, you start moving seductively around the pole in the center of the stage...'
+						gs 'stwork2', 'custboo'
+						act 'Take off your bra':
+							*clr & cla
+							'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripund' + rand(4,8) + '.jpg"></center>'
+							if custboo = 0:
+								pcs_mood += 5
+								'Urged on by the audience you slowly take off your bra and let it drop to the stage while you keep teasing them.'
+							else
+								pcs_mood -= 5
+								'Ignoring the comments from the audience you slowly take off your bra and let it drop to the stage while you keep teasing them.'
+							end
+							'You even perform a few easy moves on the pole.'
+							gs 'stwork2', 'custboo'
+							gs 'exhibitionism', 1
+							gs 'stat'
+							act 'Take off your panties':
+								*clr & cla
+								'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripund' + rand(9,12) + '.jpg"></center>'
+								if custboo = 0:
+									pcs_mood += 5
+									'The positive responses make you smile even broader as you playfully drop your panties to your ankles before kicking them off. You look several customers straight in the eyes as you do so. Some of them throw some bills your way and you take care to pay them some extra attention.'
+								else
+									pcs_mood -= 5
+									'The negative comments make you feel a bit uncomfortable as you playfully drop your panties to your ankles before kicking them off. You look several customers straight in the eyes as you do so.'
+								end
+								gs 'stwork2', 'custboo'
+								gs 'exhibitionism', 2
+								gs 'stat'
+								if custbooing < 2:
+									act 'Dance some more':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripund' + rand(13,14) + '.jpg"></center>'
+										if custboo = 0:
+											pcs_mood += 5
+											'The men in the first row go wild as soon as you are fully nude. Shouting out their approval. Several of them are tipping generously.'
+											'You dance as seductively as you can, trying to spread your attention over the audience, but paying extra attention to the ones who give you more money.'
+										else
+											'The negative comments make you feel a bit uncomfortable. Not wanting to give up you put all your effort into your dancing. This seems to please some of them and they start tipping you after all.'
+											'You dance as seductively as you can, trying to spread your attention over the audience, but paying extra attention to the ones who give you more money.'
+										end
+										'When the music starts winding down you collect your tips and pick up your clothes, waving a few kisses to your audience before going backstage again.'
+										gs 'exhibitionism', 3
+										stprivatechance = 1
+										gs 'stat'
+										act 'Leave the stage': gt 'stwork', 'start'
+									end
+								else
+									act 'Flee the stage':
+										*clr & cla
+										'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/stripund' + rand(13,14) + '.jpg"></center>'
+										pcs_mood -= 5
+										'Even being completely naked doesn''t seem to get any positive responses.'
+										'All you can hear is mockery as you try to ignore them and continue your act. The cutting remarks keep coming however and soon you are close to tears.'
+										'Before the music stops you start collecting your meager tips and clothes and flee backstage.'
+										gs 'exhibitionism', 3
+										stprivatechance = 0
+										gs 'stat'
+										act 'Leave the stage': gt 'stwork', 'start'
+									end
+								end
+							end
+						end
 					end
 				end
-
-				gs 'stwork2', 'tipcalculator'
-
-				act 'Continue': gt 'stwork2', 'strip'
 			end
 
 			act 'Dance around the pole 5 minutes (<<stpredmet>> garments)':
@@ -106,9 +226,11 @@ if $ARGS[0] = 'strip':
 			if lapdance >= 150:
 				privatrand = rand(0, 100)
 				if privatrand >= 50:
-					'After you finish dance, the security guard approaches you and tells you that you have a customer wanting a private show.'
-					gs 'stwork2', 'privatdance'
-					exit
+					'After you finish dancing, a security guard approaches you and tells you that you have a customer wanting a private show.'
+					act '<b>Go perform a private dance</b>': 
+						stprivatechance = 0
+						gt 'stwork2', 'privatdance'
+					end
 				end
 			end
 		end
@@ -119,72 +241,110 @@ if $ARGS[0] = 'strip':
 	act 'Leave the stage':gt 'stwork', 'start'
 end
 
+if $ARGS[0] = 'custboo':
+	if pcs_weight > pcs_hgt - 90:
+		vesrand = rand(0, 100)
+		if vesrand >= 60:
+			striptip -= rand(5, 10)
+			custboo = 1
+			custbooing += 1
+			resprand = rand(0,3)
+			if resprand = 0:
+				'You overhear some of the customers right next to the stage, "Look at her fat hanging out. Her gut and ass shaking like jelly."'
+			elseif resprand = 1:
+				'You overhear some of the customers right next to the stage, "What a cow. Someone should roll her off the stage."'
+			elseif resprand = 2:
+				'You overhear some of the customers right next to the stage, "They should get that fat bitch off the stage and bring on a better looking stripper."'
+			elseif resprand = 3:
+				'You overhear some of the customers right next to the stage, "Looks like they cater to your tastes too. What was that last fat bitch called again? She weighed more than you, and this girl weighs as much as you two combined."'
+			end
+		else
+			custboo = 0
+			resprand = rand(0,1)
+			if resprand = 0:
+				'A few customers are catcalling. "Get those fat titties out!" You hear one of them yell.'
+			elseif resprand = 1:
+				'A few customers are catcalling. "Show us some flesh!" You hear one of them yell.'
+			end
+		end
+	else
+		custboo = 0
+		resprand = rand(0,1)
+		if resprand = 0:
+			'Several customers are catcalling. They want to see more.'
+		elseif resprand = 1:
+			'Most of the crowd seems to like what they are seeing. "Show us some more flesh!" You hear one of them yell.'
+		end
+	end
+end
+
 if $ARGS[0] = 'tipcalculator':
-	
+	!20% chance that tattoos increase tips
+	if rand (0, 4) = 0:
+		striptip += stripKoef
+	end
 	if striptip < 30:
 		'Nobody even noticed you or your efforts on the stage.'
 	elseif striptip < 60:
-		'A couple of people looked at you but nothing more than that, you didn''t receive a tip.'
+		'A couple of people looked at you but nothing more than that, you didn''t receive a single tip.'
 	elseif striptip < 70:
-		if payrand = 0: 'A couple of people looked at you but nothing more than that, you didn''t receive a tip.'
+		if payrand = 0: 'A couple of people looked at you but nothing more than that, you didn''t receive any tips.'
 	elseif striptip < 80:
 		if rand(0,5) = 0:
-			'The customers are pleased with your performance. No one tipped you.'
+			'The customers were pleased with your performance. No one tipped you however.'
 		else
 			paymoneyrand = rand(3,10) * 5
 			money += paymoneyrand
 			pcs_mood += rand(1,2)
-			'The customers are pleased with your performance. They give you <<paymoneyrand>> <b>₽</b> in tips.'
+			'The customers were pleased with your performance. They gave you <<paymoneyrand>> <b>₽</b> in tips.'
 		end
 	elseif striptip < 90:
 		if rand(0,10) = 0:
-			'The customers are following you move between their conversations. No one tipped you.'
+			'The customers followed your movements between their conversations. No one tipped you however.'
 		else
 			paymoneyrand = rand(10,50) * 5
 			money += paymoneyrand
 			pcs_mood += rand(1,2)
-		'The customers are following you move between their conversations. As you finish they give you <<paymoneyrand>> <b>₽</b> in tips.'
+		'The customers followed your movements between their conversations. After counting out your tips it amounts to <<paymoneyrand>> <b>₽</b>.'
 		end
 	else
 		if rand(0,15) = 0:
-			'The customers are paying their full attention to your dancing but no one tipped you.'
+			'The customers were mesmerized by your dancing but no one tipped you.'
 		else
 			paymoneyrand = rand(10,100) * 5
 			money += paymoneyrand
 			pcs_mood += rand(1,2)
-		'The customers are paying their full attention to your dancing and are tipped <<paymoneyrand>> <b>₽</b>.'
+			'The customers were mesmerized by your dancing and have tipped <<paymoneyrand>> <b>₽</b>.'
 		end
 	end
 end
 
 if $ARGS[0] = 'privatdance':
-	act 'Go and perform a lap dance':
-		*clr & cla
-		minut += 30
-		money += 400
-		if pcs_sweat < 30 : pcs_sweat += 10
-		pcs_hairbsh = 0
-		pcs_makeup = 0
-		fat -= 5
-		pcs_mood += rand(2,6)
-		dancero_exp += rand(2, 4)
-		stripdancesum += 1
-
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/privatstrip.jpg"></center>'
-		'You walk over to a smaller private room where you put on some music before the customer walks in. As the customer walks in you tell him to sit down and enjoy the show. You spend half an hour showing off your dancing skills, and every time you grind against him you can feel his rock hard cock.'
-
-		stprrand = rand(0,15)
-		if stprrand = 0:
-			gt 'stwork2', 'pr1'
-		elseif stprrand = 1:
-			gt 'stwork2', 'pr2'
-		elseif stprrand = 2:
-			gt 'stwork2', 'pr3'
-		end
+	*clr & cla
+	minut += 30
+	money += 400
+	if pcs_sweat < 30 : pcs_sweat += 10
+	pcs_hairbsh = 0
+	pcs_makeup = 0
+	fat -= 5
+	pcs_mood += rand(2,6)
+	dancero_exp += rand(2, 4)
+	stripdancesum += 1
 
-		act 'Return to the locker room':gt 'stwork', 'start'
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/stripclub/privatstrip.jpg"></center>'
+	'You walk over to a smaller private room where you put on some music before the customer walks in. As the customer walks in you tell him to sit down and enjoy the show. You spend half an hour showing off your dancing skills, and every time you grind against him you can feel his rock hard cock.'
+
+	stprrand = rand(0,15)
+	if stprrand = 0:
+		gt 'stwork2', 'pr1'
+	elseif stprrand = 1:
+		gt 'stwork2', 'pr2'
+	elseif stprrand = 2:
+		gt 'stwork2', 'pr3'
 	end
+
+	act 'Return to the locker room':gt 'stwork', 'start'
 end
 
 if $ARGS[0] = 'pr1':

+ 3 - 3
locations/traits.qsrc

@@ -50,12 +50,12 @@ if $ARGS[0] = 'menu':
 	elseif Exhibitionist_lvl = 1:
 		'You have this trait at level 1.'
 		'To increase this trait you must choose to expose your breasts and/or bare bottom in public.'
-		'This trait grants you a small amount or excitement from exposing yourself.'
+		'This trait grants you a small amount of excitement from exposing yourself.'
 		'You have <<pcs_exhib>> out of 50 points towards level 2.'
 	elseif Exhibitionist_lvl = 2:
 		'You have this trait at level 2.'
 		'To increase this trait you must choose to expose your breasts, bare bottom and/or pussy in public.'
-		'This trait grants you a moderate amount or excitement from exposing yourself.'
+		'This trait grants you a moderate amount of excitement from exposing yourself.'
 		if pcs_exhib < 100:
 			'You have <<pcs_exhib>> out of 100 points towards level 3.'
 		else
@@ -64,7 +64,7 @@ if $ARGS[0] = 'menu':
 	else
 		'You have this trait at level 3.'
 		'This is the highest level of this trait.'
-		'This trait grants you a large amount or excitement from exposing yourself.'
+		'This trait grants you a large amount of excitement from exposing yourself.'
 	end
 	*nl
 	'<center><b>Cumeater</b></center>'

+ 1 - 5
locations/treeCircActs.qsrc

@@ -2,10 +2,6 @@
 ! Handles making Action Entries for Different Tree Circle Entry Points
 !	Call as a GoSub with ARGS:
 !	ARGS[0] = Location Identifier	['CentralPark']
-!	ARGS[1] = Localtion Label		['Central Park']
-!	ARGS[2] = location leaving to	['park']
-!	ARGS[3] = parameter for prev	['start']
-
 
 
 if $EntryPoint = $ARGS[0]:
@@ -18,7 +14,7 @@ if $EntryPoint = $ARGS[0]:
 	end
 else:
 	if canTeleport = 1 and tpKnown[$ARGS[0]] = 1:
-		$dynAction = "act 'Will yourself to <<$treeCircName[$ARGS[0]]>>': gs 'spellTeleport', '<<$ARGS[0]>>'"
+		$dynAction = "act 'Will yourself to <<$treeCircName[$ARGS[0]]>>': gs 'castSpell', 'teleport', '<<$ARGS[0]>>'"
 		dynamic $dynAction
 	end
 end

+ 19 - 0
locations/treeCircEntry.qsrc

@@ -0,0 +1,19 @@
+#treeCircEntry
+! Use this to insert an Entry Point to the Tree Cicle
+!	ARGS[0] = the EntryPoint ID name from $tpLocations[]
+
+if MagikDostup = 0:
+
+	! Setup for teleport circle
+	if tpKnown[$ARGS[0]] = 1:
+		$EntryAction = "act 'Enter the hidden circle of trees': gt 'treeCircle', '<<$ARGS[0]>>'"
+	else:
+		$EntryAction = "act 'Investigate a mysterious copse of trees': gt 'treeCircle', '<<$ARGS[0]>>'"
+	end
+	dynamic $EntryAction
+
+	killvar '$EntryAction'
+
+end
+
+--- treeCircEntry ---------------------------------

+ 3 - 4
locations/willpower.qsrc

@@ -165,10 +165,10 @@ if $ARGS[0] = 'rape':
 	gs 'willpower', 'calc'
 	will_cost = 0
 	if missCum >= timeTresh: will_calc += 100
-	if stat['bj'] <= 90:
-		will_cost = ((100 - stat['bj']) + will_calc)/10
+	if rape = 0:
+		will_cost = (5 + will_calc)/10
 	else
-		will_cost = (10 + will_calc)/10
+		will_cost = (100 + rape + will_calc)/10
 	end
 end
 
@@ -201,7 +201,6 @@ end
 if $ARGS[0] = 'exhib':
 	gs 'willpower', 'calc'
 	will_cost = 0
-	if stat['bj'] <= 90:
 	if Exhibitionist_lvl = 3:
 		will_cost = (0 + will_calc)/10
 	elseif Exhibitionist_lvl = 2: