Merge branch 'master' into dev

Conflicts:
	locations/hotel_resep.qsrc
	locations/stat_sklattrib.qsrc

CONTRIBUTING.md

@@ -1,55 +0,0 @@
-# Girl Life - ECV: Contribution Guide
-
-## Branches
-
-*master*  - This is where we develop most of the game.
-
-*release* - Current release bug fix.
-
-## Remember
-
-- Try to keep the game playable ... always. Bugs will happen but obvious mistakes can be eliminated in a simple testing run.
-- **Be careful! Do not erase other people work.**
-    - Git offer some help with that but sometimes we have to resolve conflicts ourselves.
-- Try to make **meaningful** commit messages.
-    - You can use emojis like: :wrench:, :up:, :recycle:, :new:, :x:, :shower:. Just dont overload :smile:
-    - emoji cheat sheet: http://www.emoji-cheat-sheet.com/
-- Commit **often** and in **small** chunks. 
-    - If revert is needed we don't lose much.
-
-### How to contribute?
-
-- Fork our repository clicking that "fork" button near the star button above.
-- **Read the code** to see how we do things.
-    - There is a developer guide, a coding guide and a QSP reference in our wiki.
-- Make your changes.
-- Submit merge requests.
-
-## Instructions
-
-### SSH Keys
-
-#### Windows:
-
-To generate you SSH Key you may use **puttygen** (http://www.chiark.greenend.org.uk/~sgtatham/putty/download.html)  to generate them.
-
-Open the program and follow:
-
-- Make sure the middle option (SSH-2 RSA) in the bottom is marked.
-- Make sure the number of bits in a generated key is 2048 (just below those options).
-- Click generate and follow instructions.
-- Copy the content in the big rectangle there.
-- Go to your profile >> profile settings >> ssh keys and paste it in the key field (another big rectangle).
-- Save the public key in a file.
-- Save the private file.
-
-### Using SourceTree client to manage your fork.
-
-- Download and install SourceTree (https://www.sourcetreeapp.com/). Let it install everything.
-- Create your own fork of project if you haven't already. 
-- Go to the project tab of your fork and copy SSH/HTTP link there.
-- Run SourceTree and Clone/New button. Paste in the SSH/HTTP link of your fork. You will probably get a prompt to log into GitLab. Do so. Project files will be copied to your drive.
-- You search and edit files in working copy. 
-- Since files in /location have no extension its best to open them using custom actions. Tools/Options/Custom actions. Enter $FILE in parameters and link to your text editor of choice in scripts. Will need to restart SourceTree for new actions to become available.
-- Commits you make will not appear on your project web page until you Push them.
-- To sync your fork with main fork when there are new commits go to Repository/Repository Settings in SourceTree menu bar and click add. Enter ssh://[email protected]:9000/mjsmagalhes/girllife-ecv.git (or http://) into Url/Path. Name it whatever you want. Once that is done click Pull button and select it from the dropdown list. Your fork will be updated.

README.md

@@ -1,48 +0,0 @@
-# Girl Life (ЭТО) [English Community Version] - github edition
-
-## Formatting comments when posting commits
-Please use one of the following terms:
-* fixed
-* changed
-* added
-* removed
-* text edit
-Added and removed are for files being added or removed, fixed is for bug/code fixes, changed is for when events are changed and text edit is for changes to the text that'll appear on screen.
-These are for searching to aid those working on the files.
-Can you also include filenames (unless its a large number of files) and include any description you feel will help.
-If adding content that is disabled (due to being WIP) can you comment in the file that its disabled and include your name so that it doesn't get activated in error.
-
-## Quick start (for Unixy machines)
-* clone/fork the repo
-* make edits to the files in `locations`
-* run `./txtmerge.py locations glife.txt`
-* run `wine txt2gam.exe glife.txt glife.qsp`
-* test that it works
-* commit your changes
-* push and/or send a pull request
-
-## Quick start (for Windows machines)
-* Double click the MakeQSP.bat
-* Enjoy :)
-
-## What exactly is all this?
-In an effort to make editing the text of Girl Life easier, I set up this repo. This is based on the english community version. There are two branches: `master` and `releases`. On the `master` branch I will keep my version of the game as I make edits, merge pull requests, etc. while the `releases` is where you'd get things that you expect to actually work.
-
-## Where are the images?
-Not here. Shouldn't you know this already?
-
-## What is `glife.txt`?
-It turns out that `glife.qsp` is not the friendliest format for this game, but if you use `qgen` you can export the game in what they call `TXT2GAM` format. This is how `glife.txt` is obtained. Note that this is a large text file encoded in UTF-16, so git still has some trouble with it.
-
-## What are the python scripts?
-Since `glife.txt` is large and in UTF-16, I wrote two scripts, one that splits this file into one file per location, and puts them in `locations` after turning them to UTF-8, another that takes the UTF-8 files from `locations` and generates a UTF-16 file in `TXT2GAM` format.
-
-## I modified something in `locations`, ran the `txtmerge.py` script, now what?
-Assuming you ran something like
-    ./txtmerge.py locations glife.txt
-you now need to turn `glife.txt` into a `qsp` file. On my system, I use `wine` to run `txt2gam.exe`, works quite well:
-    wine txt2gam.exe glife.txt glife.qsp
-
-## Where do I get `qgen` and `txt2gam.exe`?
-* [qgen](http://qsp.su/index.php?option=com_content&task=view&id=46&Itemid=56)
-* [txt2gam](http://qsp.su/index.php?option=com_content&task=view&id=52&Itemid=56)

common_typos.license.md

@@ -1,5 +0,0 @@
-List of words uses material from the wikipedia article [List of common misspellings][1], which is released under [Creative Commons Attribution-Share-Alike License 3.0][2].
-
-
-[1]: https://en.wikipedia.org/wiki/Wikipedia:Lists_of_common_misspellings/For_machines
-[2]: https://creativecommons.org/licenses/by-sa/3.0/

glife.qproj

@@ -56,11 +56,13 @@
 		<Location name="food"/>
 		<Location name="food_menu"/>
 		<Location name="virginity_call"/>
+		<Location name="willpower"/>
 	</Folder>
 	<Folder name="Body">
 		<Location name="body"/>
 		<Location name="body_shape"/>
 		<Location name="lact_lib"/>
+		<Location name="lact_bp"/>
 	</Folder>
 	<Folder name="Stimulus">
 		<Location name="boyStat"/>
@@ -136,6 +138,11 @@
 		<Location name="$purse_image"/>
 		<Location name="sewing"/>
 	</Folder>
+	<Folder name="Phone">
+		<Location name="telefon"/>
+		<Location name="phone_selfies"/>
+		<Location name="$phone_theme"/>
+	</Folder>
 	<Folder name="Prostitution">
 		<Location name="street_walker"/>
 		<Location name="Prostitute"/>
@@ -176,6 +183,7 @@
 		<Location name="npcpreservec"/>
 		<Location name="npcrnamefile"/>
 		<Location name="npcbreeder"/>
+		<Location name="npcstaticdefaults"/>
 		<Location name="npcstatic1"/>
 		<Location name="npcstatic2"/>
 		<Location name="npcstatic3"/>
@@ -226,8 +234,6 @@
 		<Location name="webcam_site"/>
 		<Location name="mirror"/>
 		<Location name="stol"/>
-		<Location name="telefon"/>
-		<Location name="$phone_theme"/>
 		<Location name="kit_din"/>
 		<Location name="TV"/>
 		<Location name="vann"/>
@@ -512,8 +518,6 @@
 		<Location name="mitkabuh"/>
 		<Location name="mitkabuh_group"/>
 		<Location name="mitkasex"/>
-		<Location name="bandit"/>
-		<Location name="banditbreak"/>
 		<Location name="gadprostitutes"/>
 		<Location name="bicycle"/>
 		<Location name="gadfield"/>
@@ -538,8 +542,10 @@
 		<Location name="swampspring"/>
 		<Location name="backwater"/>
 		<Location name="hunters"/>
-		<Location name="huntersex"/>
-		<Location name="HunterLoveSex"/>
+		<Location name="hunter_favors"/>
+		<Location name="hunter_ambient"/>
+		<Location name="hunter_interactions"/>
+		<Location name="swamp_woods"/>
 		<Location name="AndreiHunter"/>
 		<Location name="IgorHunter"/>
 		<Location name="SergeiHunter"/>
@@ -626,6 +632,7 @@
 		<Location name="gschool_detention"/>
 		<Location name="gschool_randperson"/>
 		<Location name="gschool_socialchg"/>
+		<Location name="gschool_socialchg1"/>
 		<Location name="gschool_schedule"/>
 		<Location name="Sgrup1"/>
 		<Location name="Sgrup2"/>
@@ -718,7 +725,6 @@
 		<Location name="LariskaHome"/>
 	</Folder>
 	<Folder name="Pets">
-		<Location name="soba"/>
 		<Location name="krol"/>
 		<Location name="popu"/>
 		<Location name="qwlocdog"/>
@@ -1107,5 +1113,12 @@
 	</Folder>
 	<Location name="LBZhouse"/>
 	<Location name="BanSexType"/>
+	<Folder name="Magic">
+		<Location name="castSpell"/>
+		<Location name="spell_teleport"/>
+		<Location name="treeCircle"/>
+		<Location name="treeCircActs"/>
+		<Location name="treeCircEntry"/>
+	</Folder>
 	</Structure>
 </QGen-project>

insanity.sh

@@ -75,7 +75,7 @@ else
 fi
 
 _build_negative_match() {
-    _output=""
+    output=""
     for arg in "$@"
     do
         output+=" --and --not -e \"${arg}\""

locations/AleksandraGo.qsrc

@@ -0,0 +1,38 @@
+
+menu_off = 1
+if npc_QW['A231'] = 1:
+	gs 'stat'
+	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+	'You walk up to <<$npc_firstname[''A231'']>> and she asks you, "Are you ready to head to my house? Once I finish changing, we''ll head to the library."'
+	'You nod your head and say "Yes, I''m ready.  Let''s go."'
+	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'pre_library' & minut += 15
+elseif npc_QW['A231'] = 3:
+	gs 'stat'
+	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+	'You walk up to <<$npc_firstname[''A231'']>> and she asks you, "Are you ready to head to my house?"'
+	'You nod your head and say "Yes, I''m ready.  Let''s go."'
+	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'study_confront' & minut += 15
+elseif npc_QW['A231'] = 5:
+	gs 'stat'
+	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+	'You walk up to <<$npc_firstname[''A231'']>> and she asks you in a hesitant tone, "Are you ready to head to my house?"'
+	'You nod your head and say "Yes, I''m ready.  Let''s go."'
+	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'secret_confront' & minut += 15
+elseif npc_QW['A231'] > 5:
+	npc_rel[$static_num] += 5
+	npc_love[$static_num] += 2
+	npc_horny[$static_num] += 5
+	gs 'arousal', 'kiss', '5', 'futa'
+	gs 'stat'
+	'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+	'As you walk up to <<$npc_firstname[''A231'']>> and she smiles and says, "Hey <<pcs_nickname>>, there you are."'
+	'Once you finally meet up with each other, she leans in an gives you a brief kiss on the lips. Once you break off the kiss, she asks "Are you ready to head to my house?"'
+	'You nod your head and say "Yes, I''m ready.  Let''s go."'
+	act 'Go to <<$npc_firstname[''A231'']>>''s home':gt 'AleksandraHome', 'bedroom' & minut += 15
+end
+
+--- AleksandraGo ---------------------------------

locations/AleksandraHome.qsrc

@@ -0,0 +1,104 @@
+!!npc_QW['A231'] = -1: you outed alex to the school 
+!!npc_QW['A231'] = 0: initial
+!!npc_QW['A231'] = 1: library invite
+!!npc_QW['A231'] = 2: accidentally saw cock
+!!npc_QW['A231'] = 3: confront alex
+!!npc_QW['A231'] = 4: confirmed trans
+!!npc_QW['A231'] = 5: talk trans
+!!npc_QW['A231'] = 6: relationship started
+!!npc_QW['A231'] = 7: gave blowjob
+!!npc_QW['A231'] = 8: had sex
+!!npc_QW['A231'] = 9: had anal sex
+!!npc_QW['A231'] = 10: pregnant by alex
+
+$location_type = 'indoors'
+menu_off = 1
+gs 'stat'
+
+if $args[0] = 'pre_library':
+	'<center><b><font color="maroon">Home of <<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/aleksandra/apartment/living_room.jpg"></center>'
+	'When you finally arrive at <<$npc_firstname[''A231'']>>''s home, you take a moment to admire the decour.  It''s rather plain, but quite clean.'
+	'<<$npc_firstname[''A231'']>> turns to you and says "I''m going to head to my room to change. Please make your self at home in the meantime."'
+	'"No problem, I will just wait here on the sofa" you reply.'
+	act 'Wait for <<$npc_nickname[''A231'']>>':
+		*clr & cla
+		minut += 8
+		gs 'stat'
+		'<center><b><font color="maroon">Home of <<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/aleksandra/library_outfit.jpg"></center>'
+		'After about 5 or so minutes, <<$npc_firstname[''A231'']>> finally returns from her room. She has ditched her school uniform for a crop top and denim skirt, a stark contrast to what she normally wears.'
+		'"Sorry about the outfit. I really need to do laundry and I didn''t have many options available. It''s so warm today that I needed to wear something cooler than our uniform. Shall we head to the library now?" <<$npc_firstname[''A231'']>> says.'
+		'Caught a little off guard by her outfit, it takes you a couple of seconds to collect your thoughts.  You eventually do and reply "Sure, let''s go."'
+		act 'Go to the library': gt 'AleksandraHome', 'library' & minut += 10
+	end	
+end
+if $args[0] = 'library':
+	$loc = 'gdkbibl'
+	$location_type = 'public_indoors'
+	$menu_loc = 'gdkbibl'
+	$menu_arg = ''
+	gs 'stat'
+	gs 'themes', 'indoors'
+	'<center><b><font color="maroon">Community center library</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/library/gdkbibl.jpg"></center>'
+	'You arrive at the library and you can see <<$npc_firstname[''A231'']>>''s face light up. It becomes very obvious that this is her favorite place to be. You walk through the stacks, with her occasionally pulling out a book that she thinks would be good.'
+	'Being rather indecisive, you can''t make up your mind and keep answering with a maybe. Eventually <<$npc_nickname[''A231'']>> starts to get a little annoyed, but continues on none the less with her suggestions.'
+	act 'Continue looking':
+		cla
+		minut += 20
+		'After about 20 minutes of searching, <<$npc_firstname[''A231'']>> finally pulls a romance novel off the shelf that captures your interest. You agree that this is the book you want and start heading towards the desk to check it out of the library.'
+		act 'Check out the romance novel':
+			cla
+			minut += 5
+			w_book += 1
+			gs 'stat'
+			'You finish checking out the novel and start heading towards the exit. <<$npc_firstname[''A231'']>> mentions that she has to use the bathroom before heading home, and you say that you might as well go as well.'
+			act 'Go to the bathroom':
+				minut += 5
+				$metka = 'womens'
+				$loc = 'gdktoilet'
+				$metkaM = 'womens'
+				$locM = 'gdktoilet'
+				$menu_loc = 'gdktoilet'
+				$menu_arg = 'womens'
+				$location_type = 'bathroom'
+				*clr & cla
+				gs 'stat'
+				'<center><b><font color="maroon">Women''s Room</font></b></center>'
+				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/bathroom/womens/bathroom_women.jpg"></center>'
+				'You both arrive at the bathroom and briefly split up into your separate stalls to take care of your business. You didn''t have to go that bad, so you finish first and exit the stall to begin washing your hands.'
+				'While you''re washing your hands, you hear a screech come from <<$npc_nickname[''A231'']>>''s stall. Thinking that there could be something wrong, you knock on the door and ask her if everything is alright. She opens the door and points to a hole in the wall.'
+				'"Some guy stuck his dick through that hole and asked if there was someone here that could give him a good time."'
+				act 'Look back at <<$npc_firstname[''A231'']>>':
+					*clr & cla
+					'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/aleksandra/skirt-bulge.jpg"></center>'
+					npc_QW['A231'] = 2
+					'When you look back at <<$npc_nickname[''A231'']>> to confirm that she should ignore the glory hole, you realize that she hadn''t finished putting her skirt back on. As a result, you think you see a dick sticking out of the bottom of the skirt.'
+					'Caught completely off guard, you quickly look away without saying anything. You turn to the glory hole and yell through it, calling the guy on the other side a pervert and to grow up. You then both exit the bathroom and start getting ready to leave.'
+					act 'Say goodbye':
+						*clr & cla
+						minut += 10
+						gs 'stat'
+						'<center><b><font color="maroon"><<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>></font></b></center>'
+						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/aleksandra/library_outfit.jpg"></center>'
+						'You both stand near the door to leave the community center after leaving the bathroom. <<$npc_firstname[''A231'']>> says "Thanks for coming to check on me when I screamed. You''re a really good friend <<$pcs_nickname>>."'
+						'"No problem <<$npc_nickname[''A231'']>>, you would do the same for me right?" you reply.'
+						if week = 5: 
+							$day_temp = 'Monday'
+						else
+							$day_temp = 'tomorrow'
+						end
+						'"Definitely. I''m going to start walking home now. I''ll see you in school <<$day_temp>> <<$pcs_nickname>>." she replies'
+						'"See you <<$day_temp>> <<$npc_nickname[''A231'']>>."'
+						killvar $day_temp
+						act 'Stay at the Commuity Center': gt 'gdk'
+					end
+				end
+			end
+		end
+	end
+end
+
+--- AleksandraHome ---------------------------------

locations/BurgerTip.qsrc

@@ -1012,7 +1012,7 @@ if $ARGS[0] = 'ivan_work2':
 				spafinloc = 11
 				gs 'cum_manage'
 				facial += 1
-				boy += 1
+				guy += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/characters/city/ivan/sex/ivanfacial.jpg"></center>'
 				'You kneel with mouth open waiting for what comes next. Ivan gets his dick out, and starts to masturbate in front of your face, coldly staring down at you. He shouts, "I knew you''d be my whore!" as sperm flies out of his cock and splatters against your face. After he is finished coating your face, he puts his dick back in his pants saying, "OK, get out of my office slut, and don''t forget unless you want the boss finding out about those pictures I own your ass."'

locations/Cheatmenu_din.qsrc

@@ -196,36 +196,76 @@ $cheatmenu['bodyMod'] = {
 	''
 	'You may select from the following sizes:'
 	''
-	'starving (No, you may not select ''starving'', it''s here to show where the scale starts)'
-	''
-	if salocatnow ! 1:
-		'<a href="exec:salo = 20 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
-		''
-	end
-	if salocatnow ! 2:
-		'<a href="exec:salo = 40 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
-		''
-	end
-	if salocatnow ! 3:
-		'<a href="exec:salo = 60 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
-		''
-	end
-	if salocatnow ! 4:
-		'<a href="exec:salo = 80 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
-		''
-	end
-	if salocatnow ! 5:
-		'<a href="exec:salo = 100 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
-		''
-	end
-	if salocatnow ! 6:
-		'<a href="exec:salo = 120 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
-		''
-	end
-	if salocatnow ! 7:
-		'<a href="exec:salo = 140 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
+	if bodset ! 3:
+		'starving (No, you may not select ''starving'', it''s here to show where the scale starts)'
 		''
+		if salocatnow ! 1:
+			'<a href="exec:salo = 20 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
+			''
+		end
+		if salocatnow ! 2:
+			'<a href="exec:salo = 40 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
+			''
+		end
+		if salocatnow ! 3:
+			'<a href="exec:salo = 60 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
+			''
+		end
+		if salocatnow ! 4:
+			'<a href="exec:salo = 80 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
+			''
+		end
+		if salocatnow ! 5:
+			'<a href="exec:salo = 100 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
+			''
+		end
+		if salocatnow ! 6:
+			'<a href="exec:salo = 120 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
+			''
+		end
+		if salocatnow ! 7:
+			'<a href="exec:salo = 140 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
+			''
+		end
+	else
+		if (pregchem < 2688) = 0:
+			'<a href="exec:pregchem = 100 & pregtime = 4 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10))]>></a>'
+			''
+		end
+		if (pregchem >= 2688 and pregchem < 3192) = 0:
+			'<a href="exec:pregchem = 2688 & pregtime = 112 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 1)]>></a>'
+			''
+		end
+		if (pregchem >= 3192 and pregchem < 3696) = 0:
+			'<a href="exec:pregchem = 3192 & pregtime = 133 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 2)]>></a>'
+			''
+		end
+		if (pregchem >= 3696 and pregchem < 4200) = 0:
+			'<a href="exec:pregchem = 3696 & pregtime = 154 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 3)]>></a>'
+			''
+		end
+		if (pregchem >= 4200 and pregchem < 4704) = 0:
+			'<a href="exec:pregchem = 4200 & pregtime = 175 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 4)]>></a>'
+			''
+		end
+		if (pregchem >= 4704 and pregchem < 5208) = 0:
+			'<a href="exec:pregchem = 4704 & pregtime = 196 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 5)]>></a>'
+			''
+		end
+		if (pregchem >= 5208 and pregchem < 5712) = 0:
+			'<a href="exec:pregchem = 5208 & pregtime = 217 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 6)]>></a>'
+			''
+		end
+		if (pregchem >= 5712 and pregchem < 6216) = 0:
+			'<a href="exec:pregchem = 5712 & pregtime = 238 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 7)]>></a>'
+			''
+		end
+		if (pregchem >= 6216) = 0:
+			'<a href="exec:pregchem = 6216 & pregtime = 259 & gs ''body_shape'', ''softreset'' & gs ''stat'' & dynamic $cheatmenu[''bodyMod'']"><<$bodimgsets[((bodset * 10) + 8)]>></a>'
+			''
+		end
 	end
+
 	'</tr></table></b></center>'
 }
 
@@ -405,8 +445,8 @@ $cheatmenu['permanent'] = {
 	if cumeater_cheat = 1:$cheatcumtrait = 'Disabled'
 	if exhib_cheat = 0:$cheatexhib = 'Enabled'
 	if exhib_cheat = 1:$cheatexhib = 'Disabled'
-	if cheatConsole = 0:$cheatConsole = 'Disabled'
-	if cheatConsole = 1:$cheatConsole = 'Enabled'
+	if cheatConsole = 0:$cheatConsole = 'Visible'
+	if cheatConsole = 1:$cheatConsole = 'Hidden'
 	if cheatTime = 0:$cheatTime = 'Disabled'
 	if cheatTime = 1:$cheatTime = 'Enabled'
 
@@ -472,7 +512,7 @@ $cheatmenu['permanent'] = {
 		'No dream chance: <a href="exec:Enable_nodream=input(''Enter no dream chance (%)'') & dynamic $cheatmenu[''permanent'']">Currently OFF</a>'
 	end & !1.2.3 new function
 	*nl
-	'Console input in Objects window: <a href="exec:dynamic $cheatmenu[''consolecheat'']"><<$cheatConsole>></a>'
+	'Hide Console input in objects window: <a href="exec:dynamic $cheatmenu[''consolecheat'']"><<$cheatConsole>></a>'
 	'Time Cheat in Objects window: <a href="exec:dynamic $cheatmenu[''timecheat'']"><<$cheatTime>></a>'
 	*nl
 
@@ -511,20 +551,27 @@ $cheatmenu['state'] = {
 	
 	if lactation['active'] <= 0:
 		'You are not lactating'
-		'Your current prolactinlvl is <<prolactinlvl>>ng/ml.'
-		'<a href="exec:lactation[''active''] = 1 & lactation[''induced''] = 1 & total_milkinduce_growth = 8 & nbsize += 8 & prolactinlvl = 200 & lactaterate = 100 & lactatemv = 0 & lactatemm = func(''lact_lib'',''$calc_lactatemm'') & dynamic $cheatmenu[''state'']">Switch ON</a>'
+		'Your current prolactinlvl is <<lactation[''prolactinlvl'']>>ng/ml.'
+		'<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch ON</a>'
 	else
 		'You are lactating'
-		'<a href="exec:lactation[''active''] = 0 & lactation[''induced''] = 0 & total_milkinduce_growth = 0 & nbsize -= 8 & prolactinlvl = 0 & lactaterate = 0 & lactatemv = 0 & lactatemm = 0 & dynamic $cheatmenu[''state'']">Switch OFF</a>'
-		if lactaterate <= 0:
-			'Lactate Rate: <<lactaterate/10>>ml/h <a href="exec:lactaterate += 100 & dynamic $cheatmenu[''state'']">+10</a>'
-		elseif lactaterate >= 6000:
-			'Lactate Rate: <a href="exec:lactaterate -= 100 & dynamic $cheatmenu[''state'']">-10</a> <<lactaterate/10>>ml/h'
+		'<a href="exec: gs ''lact_lib'',''lact_switch'' & gs ''lact_lib'',''BreastGrowth'' & dynamic $cheatmenu[''state'']">Switch OFF</a>'
+		if lactation['milkprod_type'] = 1:
+			'The milk production is <a href="exec: lactation[''milkprod_type''] = 0 & dynamic $cheatmenu[''state'']">realistic</a>. <<$pcs_firstname>> will produce breast milk based on her body resources.'
+		elseif lactation['milkprod_type'] = 0:
+			'The milk production is <a href="exec: lactation[''milkprod_type''] = 1 & dynamic $cheatmenu[''state'']">permanent</a>. <<$pcs_firstname>> will produce breast milk disregarding her condition.'
+		else
+			lactation['milkprod_type'] = 1
+		end
+		if lactation['lactaterate'] <= 0:
+			'Lactate Rate: <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
+		elseif lactation['lactaterate'] >= 600000:
+			'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h'
 		else
-			'Lactate Rate: <a href="exec:lactaterate -= 100 & dynamic $cheatmenu[''state'']">-10</a> <<lactaterate/10>>ml/h <a href="exec:lactaterate += 100 & dynamic $cheatmenu[''state'']">+10</a>'
+			'Lactate Rate: <a href="exec:lactation[''lactaterate''] -= 10000 & dynamic $cheatmenu[''state'']">-10</a> <<lactation[''lactaterate'']/1000>>ml/h <a href="exec:lactation[''lactaterate''] += 10000 & dynamic $cheatmenu[''state'']">+10</a>'
 		end
-		'Milk in Breasts: <<lactatemv/10>>ml'
-		'Max Milk Storage: <<lactatemm/10>>ml'
+		'Milk in Breasts: <<lactation[''breastmv'']/1000>>ml'
+		'Max Milk Storage: <<lactation[''breastmm'']/1000>>ml'
 		'<font color="grey">Maximum milk storage changes with breast size, and if <<$pcs_firstname>> went through pregnancy</font>'
 		if lactation['induced'] <= 0:
 			'Is <<$pcs_firstname>>''s lactation Induced?: <a href="exec:lactation[''induced''] = 1 & dynamic $cheatmenu[''state'']">no</a>'
@@ -966,6 +1013,7 @@ $cheatmenu['stats'] = {
 	*p 'Kicks (<<kick_lvl>>) - Total (<<pcs_kick>>): ' & dynamic $cheatmenu['printStatLinks'], 'kick', 'Kicks'
 	*p 'Defence (<<def_lvl>>) - Total (<<pcs_def>>): ' & dynamic $cheatmenu['printStatLinks'], 'def', 'Defence'
 	*p 'Marksmanship (<<shoot_lvl>>) - Total (<<pcs_shoot>>): ' & dynamic $cheatmenu['printStatLinks'], 'shoot', 'Marksmanship'
+	*p 'Bushcraft (<<bushcraft_lvl>>) - Total (<<pcs_bushcraft>>): ' & dynamic $cheatmenu['printStatLinks'], 'bushcraft', 'Bushcraft'
 	*nl
 	*pl'<b>Craft:</b>'
 	*p 'Singing (<<vokal_lvl>>) - Total (<<pcs_vokal>>): ' & dynamic $cheatmenu['printStatLinks'], 'vokal', 'Singing'
@@ -1071,6 +1119,7 @@ $cheatmenu['reputation'] = {
 			'<<$npc_firstname[''A152'']>> <<$npc_lastname[''A152'']>>: <<npc_rel[''A152'']>>  <a href="exec:npc_rel[''A152''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A152''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 			'<<$npc_firstname[''A153'']>> <<$npc_lastname[''A153'']>>: <<npc_rel[''A153'']>>  <a href="exec:npc_rel[''A153''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A153''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 			'<<$npc_firstname[''A142'']>> <<$npc_lastname[''A142'']>>: <<npc_rel[''A142'']>>  <a href="exec:npc_rel[''A142''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A142''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
+			'<<$npc_firstname[''A231'']>> <<$npc_lastname[''A231'']>>: <<npc_rel[''A231'']>>  <a href="exec:npc_rel[''A231''] += 10 & dynamic $cheatmenu[''reputation'']">+10</a> <a href="exec:npc_rel[''A231''] -= 10 & dynamic $cheatmenu[''reputation'']">-10</a>'
 		end
 		*nl
 		'<i>Gopniks</i>'
@@ -1156,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>'
@@ -1611,9 +1660,9 @@ $cheatmenu['force_preg'] = {
 $cheatmenu['remove_preg'] = {
 	pregtime = 0
 	pregtalk = 0
-	pregTalkPC = 0
-	pregTalkNat = 0
-	pregTalkbrother = 0
+	pcs_pregtalk = 0
+	npc_pregtalk['A16'] = 0
+	npc_pregtalk['A34'] = 0
 	preg = 0
 	thinkpreg = 0
 	knowpreg = 0
@@ -2394,16 +2443,9 @@ $cheatmenu['bdimmain'] = {
 	*nl
 	'<a href="exec:chmbodset = 2 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[29]>></b></a>'
 	*nl
-	if bodsetcnt >= 3:
+	if bodsetcnt >= 4:
 		'You may edit aspects of a custom image set by clicking on their folder names below.'
 		*nl
-		'<a href="exec:chmbodset = 3 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[39]>></b></a>'
-		*nl
-	elseif bodsetcnt = 2:
-		'<a href="exec:dynamic $cheatmenu[''bdimcstadd'']"><b>Add new set</b></a>'
-		*nl
-	end
-	if bodsetcnt >= 4:
 		'<a href="exec:chmbodset = 4 & dynamic $cheatmenu[''bdimdisplay'']"><b><<$bodimgsets[49]>></b></a>'
 		*nl
 	elseif bodsetcnt = 3:
@@ -2463,10 +2505,15 @@ $cheatmenu['bdimdisplay'] = {
 		'<a href="exec:bdsetlock = 1 & bodset = chmbodset & fixbodset = chmbodset & dynamic $cheatmenu[''bdimdisplay'']"><b>Use this set only.</b></a>'
 	end
 	*nl
-	if chmbodset <= 2:
+	if chmbodset <= 3:
 		'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'
 		'Descriptors:'
-		'<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
+		*nl
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
+		else
+			'<a href="exec:view ''images/pc/body/shape/0.jpg''"><<$bodimgsets[((chmbodset * 10) + 0)]>></a>'
+		end
 		*nl
 		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/1.jpg''"><<$bodimgsets[((chmbodset * 10) + 1)]>></a>'
 		*nl
@@ -2478,9 +2525,21 @@ $cheatmenu['bdimdisplay'] = {
 		*nl
 		'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/5.jpg''"><<$bodimgsets[((chmbodset * 10) + 5)]>></a>'
 		*nl
-		'<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
+		else
+			'<a href="exec:view ''images/pc/body/shape/6.jpg''"><<$bodimgsets[((chmbodset * 10) + 6)]>></a>'
+		end
+		*nl
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
+		else
+			'<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
+		end
 		*nl
-		'<a href="exec:view ''images/pc/body/shape/7.jpg''"><<$bodimgsets[((chmbodset * 10) + 7)]>></a>'
+		if chmbodset = 3:
+			'<a href="exec:view ''images/pc/body/shape/<<$bodimgsets[((chmbodset * 10) + 9)]>>/8.jpg''"><<$bodimgsets[((chmbodset * 10) + 8)]>></a>'
+		end
 		*nl
 	else
 		'Folder: <<$bodimgsets[((chmbodset * 10) + 9)]>>'

locations/Cum_Manage.qsrc

@@ -124,6 +124,7 @@ if $ARGS[0] = '':
 
 	if cumprecheck = 1:
 		cumarrkno[cumarrtemp] = -1
+		dynamic $venerasiak
 	elseif sexunaware > 0:
 		cumarrkno[cumarrtemp] = -2
 	elseif sexpartkno = 1:
@@ -147,8 +148,17 @@ if $ARGS[0] = '':
 
 	if cumprecheck ! 1:
 
-!!{	Here it checks for vaginal deposit.}
+!!{	Here it checks for anal deposit and increments anal creampie variable.}
 
+		if spafinloc = 3:
+			if sexunaware = 1 or sexcontra = 6:
+				pcs_acp_unknown += 1
+			else
+				pcs_acp_known += 1
+			end
+		end
+
+!!{	Here it checks for vaginal deposit.}
 
 		if spafinloc <= 0:
 
@@ -337,8 +347,10 @@ if $ARGS[0] = '':
 
 			end
 
-	!! creampie statistics:
+	!! creampie vaginal statistics:
 			if spafinloc = 0:
+				!!STD checks
+				dynamic $venerasiak
 				!! safe creampie (if cycle > 3 or on pill or succubus):
 				if cycle > 3 or pillcon2 > 1000 or succubusflag = 1:
 					if sexunaware = 1 or sexcontra = 6:
@@ -361,16 +373,7 @@ if $ARGS[0] = '':
 						pcs_cp_risky_known += 1
 					end
 				end
-			elseif spafinloc = 3:
-				if sexunaware = 1 or sexcontra = 6:
-					pcs_acp_unknown += 1
-				else
-					pcs_acp_known += 1
-				end
-			end
-			
-			
-
+			end	
 			
 !!{	If you arent getting it in the vagina, and the boy isnt pumping it into a condom, a spatter is made and applied.
 !!	If you arent wearing any panties and it was called to hit your panties, it goes directly to your groin.
@@ -460,6 +463,11 @@ if $ARGS[0] = '':
 		if cumarrppt[cumarrtemp] < cumarrcpt[cumarrtemp]:cumarrcpt[cumarrtemp] = cumarrppt[cumarrtemp]
 	end
 
+	!!STD from anal check
+	if spafinloc = 3: dynamic $venerasiak
+	!!STD from oral check
+	if spafinloc = 12: dynamic $venerasiakOral
+
 	cumprecheck = 0
 	spafinloc = 0
 	sexvolume = 0

locations/FedorEv2.qsrc

@@ -410,7 +410,7 @@ if $ARGS[0] = 'Vaginal Sex':
 	menu_off = 1	
 	fedorKozlovQW = 20
 	gs 'boyStat', 'A5'
-	precumcheck = 1
+	cumprecheck = 1
 	gs 'cum_manage'
 	gs'stat'
 	'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/fedor/fedorev/home/vag.mp4"></video></center>'
@@ -454,7 +454,7 @@ if $ARGS[0] = 'Virgin Sex':
 	act 'Lose Virginity <b><h4><font color=#ff00cc>[Go steady]</font></h4></b>':
 		*clr & cla
 		gs 'boyStat', 'A5'
-		precumcheck = 1
+		cumprecheck = 1
 		gs 'cum_manage'
 		fedorKozlovQW = 20
 		gs'stat'

locations/FedorEv4.qsrc

@@ -114,7 +114,7 @@ if $ARGS[0] = '' or $ARGS[0] = 'Home':
 	end
 end
 
-if $ARGS[0] =  'Hall Sex':
+if $ARGS[0] = 'Hall Sex':
 	*clr & cla
 	menu_off = 1
 	gs 'boyStat', 'A5'
@@ -195,7 +195,7 @@ if $ARGS[0] =  'Hall Sex':
 	end
 end
 
-if $ARGS[0] =  '3Way':
+if $ARGS[0] = '3Way':
 	*clr & cla
 	menu_off = 1
 	minut -= 5
@@ -255,7 +255,7 @@ if $ARGS[0] =  '3Way':
 	end
 end
 
-if $ARGS[0] =  '3way1':
+if $ARGS[0] = '3way1':
 	*clr & cla
 	menu_off = 1
 	minut -= 5
@@ -375,7 +375,7 @@ if $ARGS[0] =  '3way1':
 	end
 end
 
-if $ARGS[0] =  '3way2':
+if $ARGS[0] = '3way2':
 	*clr & cla
 	menu_off = 1
 	minut -= 10
@@ -464,7 +464,7 @@ if $ARGS[0] =  '3way2':
 	end
 end
 
-if $ARGS[0] =  '3way3':
+if $ARGS[0] = '3way3':
 	*clr & cla
 	menu_off = 1
 	minut -= 5
@@ -596,7 +596,7 @@ if $ARGS[0] =  '3way3':
 		end
 	end
 end
-if $ARGS[0] =  'Home 2':
+if $ARGS[0] = 'Home 2':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -669,7 +669,7 @@ if $ARGS[0] = 'Popcorn':
 	end
 end
 
-if $ARGS[0] =  'Snacks':
+if $ARGS[0] = 'Snacks':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -708,7 +708,7 @@ if $ARGS[0] =  'Snacks':
 	end
 end
 
-if $ARGS[0] =  'Movie Action':
+if $ARGS[0] = 'Movie Action':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 15
@@ -721,7 +721,7 @@ if $ARGS[0] =  'Movie Action':
 	act 'Finish movie':gt 'FedorEv4', 'Home 3'
 end
 
-if $ARGS[0] =  'Movie Sports':
+if $ARGS[0] = 'Movie Sports':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 15
@@ -734,7 +734,7 @@ if $ARGS[0] =  'Movie Sports':
 	act 'Finish watching TV':gt 'FedorEv4', 'Home 3'
 end
 
-if $ARGS[0] =  'Movie Family':
+if $ARGS[0] = 'Movie Family':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 15
@@ -747,7 +747,7 @@ if $ARGS[0] =  'Movie Family':
 	act 'Finish movie':gt 'FedorEv4', 'Home 3'
 end
 
-if $ARGS[0] =  'Movie Porn':
+if $ARGS[0] = 'Movie Porn':
 	*clr & cla
 	menu_off = 1
 	pcs_mood += 10
@@ -761,7 +761,7 @@ if $ARGS[0] =  'Movie Porn':
 	act 'Finish movie':gt 'FedorEv4', 'Home 3'
 end
 
-if $ARGS[0] =  'Home 3':
+if $ARGS[0] = 'Home 3':
 	*clr & cla
 	menu_off = 1
 	EndMovie = 1
@@ -811,7 +811,7 @@ if $ARGS[0] =  'Home 3':
 	end
 end
 
-if $ARGS[0] =  'Random Sex':
+if $ARGS[0] = 'Random Sex':
 	VK = rand(1,8)
 	if VK <= 1:
 		gt 'FedorEv4', 'Livingroom 1'
@@ -834,7 +834,7 @@ if $ARGS[0] =  'Random Sex':
 	end
 end
 
-if $ARGS[0] =  'Livingroom 1':
+if $ARGS[0] = 'Livingroom 1':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -916,7 +916,7 @@ if $ARGS[0] =  'Livingroom 1':
 	end
 end
 
-if $ARGS[0] =  'Livingroom 2':
+if $ARGS[0] = 'Livingroom 2':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -999,7 +999,7 @@ if $ARGS[0] =  'Livingroom 2':
 	end
 end
 
-if $ARGS[0] =  'Livingroom 3':
+if $ARGS[0] = 'Livingroom 3':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1108,7 +1108,7 @@ if $ARGS[0] =  'Livingroom 3':
 	end
 end
 
-if $ARGS[0] =  'Bathroom 1':
+if $ARGS[0] = 'Bathroom 1':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -1124,7 +1124,7 @@ if $ARGS[0] =  'Bathroom 1':
 	act 'Walk to bathroom':gt 'FedorEv4', 'Bathroom'
 end
 
-if $ARGS[0] =  'Bathroom Cam':
+if $ARGS[0] = 'Bathroom Cam':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1164,7 +1164,7 @@ if $ARGS[0] =  'Bathroom Cam':
 	end
 end
 
-if $ARGS[0] =  'Bathroom Cam 2':
+if $ARGS[0] = 'Bathroom Cam 2':
 	*clr & cla
 	menu_off = 1
 	FedorCam += 1
@@ -1355,7 +1355,7 @@ if $ARGS[0] =  'Bathroom Cam 2':
 	end
 end
 
-if $ARGS[0] =  'Bathroom 2':
+if $ARGS[0] = 'Bathroom 2':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1424,7 +1424,7 @@ if $ARGS[0] =  'Bathroom 2':
 	end
 end
 
-if $ARGS[0] =  'Bathroom 3':
+if $ARGS[0] = 'Bathroom 3':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1482,7 +1482,7 @@ if $ARGS[0] =  'Bathroom 3':
 	end
 end
 
-if $ARGS[0] =  'Kitchen 1':
+if $ARGS[0] = 'Kitchen 1':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1544,7 +1544,7 @@ if $ARGS[0] =  'Kitchen 1':
 	end
 end
 
-if $ARGS[0] =  'Kitchen 2':
+if $ARGS[0] = 'Kitchen 2':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1602,7 +1602,7 @@ if $ARGS[0] =  'Kitchen 2':
 	end
 end
 
-if $ARGS[0] =  'Bedroom Cam':
+if $ARGS[0] = 'Bedroom Cam':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1802,7 +1802,7 @@ if $ARGS[0] =  'Bedroom Cam':
 	end
 end
 
-if $ARGS[0] =  'Bedroom 1':
+if $ARGS[0] = 'Bedroom 1':
 	*clr & cla
 	menu_off = 1
 	WithFedor = 0
@@ -1982,7 +1982,7 @@ if $ARGS[0] =  'Bedroom 1':
 	end
 end
 
-if $ARGS[0] =  'Bedroom 2':
+if $ARGS[0] = 'Bedroom 2':
 	*clr & cla
 	menu_off = 1
 	gs 'boyStat', 'A5'
@@ -2190,7 +2190,7 @@ if $ARGS[0] =  'Bedroom 2':
 	end
 end
 
-if $ARGS[0] =  'Bedroom 3':
+if $ARGS[0] = 'Bedroom 3':
 	*clr & cla
 	menu_off = 1
 	minut -= 5
@@ -2445,7 +2445,7 @@ if $ARGS[0] = 'Bathroom Wash':
 	act 'Join Fedor in the livingroom':gt 'FedorEv4', 'Home 2'
 end
 
-if $ARGS[0] =  'Quick Wash':
+if $ARGS[0] = 'Quick Wash':
 	*clr & cla
 	menu_off = 1
 	EndMovie = 0
@@ -2466,7 +2466,7 @@ if $ARGS[0] =  'Quick Wash':
 	act 'Dry off':gt 'FedorEv4', 'Bathroom'
 end
 
-if $ARGS[0] =  'Shower':
+if $ARGS[0] = 'Shower':
 	*clr & cla
 	menu_off = 1
 	EndMovie = 0
@@ -2481,7 +2481,7 @@ if $ARGS[0] =  'Shower':
 	act 'Dry off':gt 'FedorEv4', 'Bathroom'
 end
 
-if $ARGS[0] =  'Toilet':
+if $ARGS[0] = 'Toilet':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2509,7 +2509,7 @@ if $ARGS[0] =  'Toilet':
 	end
 end
 
-if $ARGS[0] =  'Toilet 2':
+if $ARGS[0] = 'Toilet 2':
 	*clr & cla
 	menu_off = 1
 	Potty_Daystart = daystart
@@ -2523,7 +2523,7 @@ if $ARGS[0] =  'Toilet 2':
 	act 'Walk away':gt 'FedorEv4', 'Bathroom'
 end
 
-if $ARGS[0] =  'Toilet 3':
+if $ARGS[0] = 'Toilet 3':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2534,7 +2534,7 @@ if $ARGS[0] =  'Toilet 3':
 	act 'NOO!':gt 'FedorEv4', 'Bathroom'
 end
 
-if $ARGS[0] =  'Kitchen':
+if $ARGS[0] = 'Kitchen':
 	$loc = 'FedorEv4'
 	$metka = 'Kitchen'
 	$locclass = 'kitr'
@@ -2544,30 +2544,33 @@ if $ARGS[0] =  'Kitchen':
 	*clr & cla
 	if hour >= 20 and hour <= 22 and ReginaIntro = 0:gt 'FedorEv4', 'Regina Intro'
 	minut += 5
+	gs 'kit_din'
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/fedorhome/kitchen.jpg"></center>'
 	*nl
 	'This kitchen is very clean. Fedor''s parents must be very neat people.'
 	*nl
 	'There is a sink, a microwave, a stove and a <a href="exec:gt ''FedorEv4'', ''Fridge''">refrigerator</a> stocked with food.'
-	'If you''re thirsty, you can pour yourself a glass of <a href="exec:gt ''beverage'', ''bev_wat''">water</a> from the tap.'
-	if week <= 5 and hour >= 19 and hour < 20 or week > 5 and hour >= 12 and hour < 14:
-		'<a href="exec:gt ''FedorEv4'', ''Fedor Kitchen''">Fedor</a> is sitting down, eating dinner.'
-	end
 
-	if week <= 5 and hour >= 20 and hour <= 22 or week > 5 and hour >= 14 and hour < 16:
+	if week <= 5 and hour >= 19 and hour < 20 or week > 5 and hour >= 12 and hour < 14: 
+		'<a href="exec:gt ''FedorEv4'', ''Fedor Kitchen''">Fedor</a> is sitting down, eating dinner.'
+	elseif week <= 5 and hour >= 20 and hour <= 22 or week > 5 and hour >= 14 and hour < 16:
 		'<a href="exec:gt ''FedorEv4'', ''Regina Chat''">Regina</a> is sitting at the table, eating dinner.'
 	elseif week > 5 and hour >= 16 and hour <= 20:
 		'<a href="exec:gt ''FedorEv4'', ''Regina Chat''">Regina</a> is cleaning the kitchen.'
-	elseif week <= 5 and hour <= 11 and hour > 10:
+	elseif week <= 5 and hour = 11:
 		'<a href="exec:gt ''FedorEv4'', ''Regina Chat''">Regina</a> is getting ready to leave for work.'
 	end
 
 	act 'Return to the hallway':gt 'FedorEv4', 'Hallway'
 	act 'Enter the living room':gt 'FedorEv4', 'Livingroom'
+	
+	dynamic $driwater
+	dynamic $dritea
+	dynamic $fill_bottle
 end
 
-if $ARGS[0] =  'Livingroom':
+if $ARGS[0] = 'Livingroom':
 	*clr & cla
 	$menu_loc = 'FedorEv4'
 	$menu_arg = 'Livingroom'
@@ -2591,7 +2594,7 @@ if $ARGS[0] =  'Livingroom':
 	act 'Step into the kitchen':gt 'FedorEv4', 'Kitchen'
 end
 
-if $ARGS[0] =  'Hallway':
+if $ARGS[0] = 'Hallway':
 	*clr & cla
 	$menu_loc = 'FedorEv4'
 	$menu_arg = 'Hallway'
@@ -2645,7 +2648,7 @@ if $ARGS[0] =  'Hallway':
 	end
 end
 
-if $ARGS[0] =  'Bedroom':
+if $ARGS[0] = 'Bedroom':
 	*clr & cla
 	$metka = 'Bedroom'
 	$loc = 'FedorEv4'
@@ -2673,7 +2676,7 @@ if $ARGS[0] =  'Bedroom':
 	act 'Leave bedroom':gt 'FedorEv4', 'Hallway'
 end
 
-if $ARGS[0] =  'Nude':
+if $ARGS[0] = 'Nude':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2683,7 +2686,7 @@ if $ARGS[0] =  'Nude':
 	act 'Return to the hallway':gt 'FedorEv4', 'Hallway'
 end
 
-if $ARGS[0] =  'Picture':
+if $ARGS[0] = 'Picture':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2694,7 +2697,7 @@ if $ARGS[0] =  'Picture':
 	act 'Step away':gt 'FedorEv4', 'Bedroom'
 end
 
-if $ARGS[0] =  'Solo':
+if $ARGS[0] = 'Solo':
 	*clr & cla
 	menu_off = 1
 	pcs_horny += 20
@@ -2707,7 +2710,7 @@ if $ARGS[0] =  'Solo':
 	act 'Finish':gt 'FedorEv4', 'Livingroom'
 end
 
-if $ARGS[0] =  'Solo Caught':
+if $ARGS[0] = 'Solo Caught':
 	*clr & cla
 	menu_off = 1
 	if ReginaKozQW < 2: ReginaKozQW = 2
@@ -2719,7 +2722,7 @@ if $ARGS[0] =  'Solo Caught':
 	act 'Walk away':gt 'FedorEv4', 'Livingroom'
 end
 
-if $ARGS[0] =  'Fridge':
+if $ARGS[0] = 'Fridge':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2760,7 +2763,7 @@ if $ARGS[0] =  'Fridge':
 	end
 end
 
-if $ARGS[0] =  'Fedor Sleeping':
+if $ARGS[0] = 'Fedor Sleeping':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2773,7 +2776,7 @@ if $ARGS[0] =  'Fedor Sleeping':
 	act 'Spend the night':gt 'bed2'
 end
 
-if $ARGS[0] =  'End Date':
+if $ARGS[0] = 'End Date':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2791,7 +2794,7 @@ if $ARGS[0] =  'End Date':
 	end
 end
 
-if $ARGS[0] =  'End Date 2':
+if $ARGS[0] = 'End Date 2':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -2811,7 +2814,7 @@ if $ARGS[0] =  'End Date 2':
 	act 'Walk home':gt 'korrPar'
 end
 
-if $ARGS[0] =  'TV':
+if $ARGS[0] = 'TV':
 	*clr & cla
 	menu_off = 1
 	pcs_willpwr += rand(5, 10)
@@ -2851,7 +2854,7 @@ if $ARGS[0] =  'TV':
 	end
 end
 
-if $ARGS[0] =  'TV Action':
+if $ARGS[0] = 'TV Action':
 	*clr & cla
 	menu_off = 1
 	pcs_willpwr += rand(15, 25)
@@ -2865,7 +2868,7 @@ if $ARGS[0] =  'TV Action':
 	act 'Change channel':gt 'FedorEv4', 'TV'
 end
 
-if $ARGS[0] =  'TV Geographic':
+if $ARGS[0] = 'TV Geographic':
 	*clr & cla
 	menu_off = 1
 	pcs_willpwr += rand(5, 10)
@@ -2879,7 +2882,7 @@ if $ARGS[0] =  'TV Geographic':
 	act 'Change channel':gt 'FedorEv4', 'TV'
 end
 
-if $ARGS[0] =  'TV Sports':
+if $ARGS[0] = 'TV Sports':
 	*clr & cla
 	menu_off = 1
 	pcs_willpwr += rand(5, 20)
@@ -2893,7 +2896,7 @@ if $ARGS[0] =  'TV Sports':
 	act 'Change channel':gt 'FedorEv4', 'TV'
 end
 
-if $ARGS[0] =  'TV Family':
+if $ARGS[0] = 'TV Family':
 	*clr & cla
 	menu_off = 1
 	pcs_willpwr += rand(15, 25)
@@ -2907,7 +2910,7 @@ if $ARGS[0] =  'TV Family':
 	act 'Change channel':gt 'FedorEv4', 'TV'
 end
 
-if $ARGS[0] =  'TV Porn':
+if $ARGS[0] = 'TV Porn':
 	*clr & cla
 	menu_off = 1
 	pcs_willpwr += rand(5, 10)
@@ -2922,7 +2925,7 @@ if $ARGS[0] =  'TV Porn':
 	act 'Change channel':gt 'FedorEv4', 'TV'
 end
 
-if $ARGS[0] =  'Porn Caught':
+if $ARGS[0] = 'Porn Caught':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -2934,7 +2937,7 @@ if $ARGS[0] =  'Porn Caught':
 end
 
 
-if $ARGS[0] =  'Regina Intro':
+if $ARGS[0] = 'Regina Intro':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -2951,7 +2954,7 @@ if $ARGS[0] =  'Regina Intro':
 	act 'Only if it''s no trouble':gt 'FedorEv4', 'Dinner 1'
 end
 
-if $ARGS[0] =  'Regina Chat':
+if $ARGS[0] = 'Regina Chat':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -2997,7 +3000,7 @@ if $ARGS[0] =  'Regina Chat':
 	end	
 end
 
-if $ARGS[0] =  'Regina Chat 2':
+if $ARGS[0] = 'Regina Chat 2':
 	*clr & cla
 	menu_off = 1
 	ReginaKozlov += 1
@@ -3026,7 +3029,7 @@ if $ARGS[0] =  'Regina Chat 2':
 	act 'Walk away':gt 'FedorEv4', 'Kitchen'
 end
 
-if $ARGS[0] =  'Dinner 1':
+if $ARGS[0] = 'Dinner 1':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -3040,7 +3043,7 @@ if $ARGS[0] =  'Dinner 1':
 	act 'Take a seat':gt 'FedorEv4', 'Dinner'
 end
 
-if $ARGS[0] =  'Dinner':
+if $ARGS[0] = 'Dinner':
 	*clr & cla
 	menu_off = 1
 	ReginaKoz_Daystart = daystart
@@ -3061,7 +3064,7 @@ if $ARGS[0] =  'Dinner':
 	act 'Finish':gt 'FedorEv4', 'Kitchen'
 end
 
-if $ARGS[0] =  'Check up':
+if $ARGS[0] = 'Check up':
 	*clr & cla
 	menu_off = 1
 	if pcs_health < 100:pcs_health = 150
@@ -3076,7 +3079,7 @@ if $ARGS[0] =  'Check up':
 	act 'Thank you':gt 'FedorEv4', 'Kitchen'
 end
 
-if $ARGS[0] =  'Fedor Livingroom':
+if $ARGS[0] = 'Fedor Livingroom':
 	*clr & cla
 	$metka = 'Fedor Livingroom'
 	$loc = 'FedorEv4'
@@ -3163,7 +3166,7 @@ if $ARGS[0] = 'Fedor Kitchen':
 	act 'Chat':gt 'FedorEv4', 'Fedor Kitchen Chat'	
 end
 
-if $ARGS[0] =  'Fedor Bedroom':
+if $ARGS[0] = 'Fedor Bedroom':
 	*clr & cla
 	$metka = 'Fedor Bedroom'
 	$loc = 'FedorEv4'
@@ -3222,7 +3225,7 @@ if $ARGS[0] =  'Fedor Bedroom':
 	end	
 end
 
-if $ARGS[0] =  'Fedor Bedroom 2':
+if $ARGS[0] = 'Fedor Bedroom 2':
 	*clr & cla
 	$metka = 'Fedor Bedroom 2'
 	$loc = 'FedorEv4'
@@ -3252,7 +3255,7 @@ if $ARGS[0] =  'Fedor Bedroom 2':
 	act 'Sure':gt 'FedorEv4', 'Fedor Bedroom Chat 2'
 end
 
-if $ARGS[0] =  'Love Talk':
+if $ARGS[0] = 'Love Talk':
 	*clr & cla
 	menu_off = 1
 	FedorLove = 1
@@ -3274,7 +3277,7 @@ if $ARGS[0] =  'Love Talk':
 	act 'Finish kissing':gt 'FedorEv4', 'Fedor Bedroom'
 end
 
-if $ARGS[0] =  'Love Talk Strela':
+if $ARGS[0] = 'Love Talk Strela':
 	*clr & cla
 	menu_off = 1
 	FedorLove = 1
@@ -3296,7 +3299,7 @@ if $ARGS[0] =  'Love Talk Strela':
 	act 'Finish kissing':gt 'FedorEv4', 'Fedor Bedroom'
 end
 
-if $ARGS[0] =  'Love Talk Strela 2':
+if $ARGS[0] = 'Love Talk Strela 2':
 	*clr & cla
 	menu_off = 1
 	FedorLove = 1
@@ -3317,7 +3320,7 @@ if $ARGS[0] =  'Love Talk Strela 2':
 	act 'Finish kissing':gt 'FedorEv4', 'Fedor Bedroom'
 end
 
-if $ARGS[0] =  'Future':
+if $ARGS[0] = 'Future':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -3380,7 +3383,7 @@ if $ARGS[0] =  'Future':
 	end
 end
 
-if $ARGS[0] =  'Fedor Livingroom Chat':
+if $ARGS[0] = 'Fedor Livingroom Chat':
 	*clr & cla
 	menu_off = 1
 	minut += 10
@@ -3392,7 +3395,7 @@ if $ARGS[0] =  'Fedor Livingroom Chat':
 	act 'Finish chatting':gt 'FedorEv4', 'Livingroom'
 end
 
-if $ARGS[0] =  'Fedor Kitchen Chat':
+if $ARGS[0] = 'Fedor Kitchen Chat':
 	*clr & cla
 	menu_off = 1
 	minut += 10
@@ -3404,7 +3407,7 @@ if $ARGS[0] =  'Fedor Kitchen Chat':
 	act 'Finish chatting':gt 'FedorEv4', 'Kitchen'
 end
 
-if $ARGS[0] =  'Fedor Bedroom Chat':
+if $ARGS[0] = 'Fedor Bedroom Chat':
 	*clr & cla
 	menu_off = 1
 	minut += 10
@@ -3416,7 +3419,7 @@ if $ARGS[0] =  'Fedor Bedroom Chat':
 	act 'Finish chatting':gt 'FedorEv4', 'Bedroom'
 end
 
-if $ARGS[0] =  'Fedor Bedroom Chat 2':
+if $ARGS[0] = 'Fedor Bedroom Chat 2':
 	*clr & cla
 	menu_off = 1
 	minut += 10
@@ -3433,7 +3436,7 @@ if $ARGS[0] =  'Fedor Bedroom Chat 2':
 	end
 end
 
-if $ARGS[0] =  'Private Chat':
+if $ARGS[0] = 'Private Chat':
 	*clr & cla
 	menu_off = 1
 	gs'stat'
@@ -3444,7 +3447,7 @@ if $ARGS[0] =  'Private Chat':
 	act 'Follow Fedor to his bedroom':gt 'FedorEv4', 'Dimka Help'
 end
 
-if $ARGS[0] =  'Fedor Shelter':
+if $ARGS[0] = 'Fedor Shelter':
 	*clr & cla
 	menu_off = 1
 	FedorShelter = 1
@@ -3457,7 +3460,7 @@ if $ARGS[0] =  'Fedor Shelter':
 	act 'Leave room':gt 'FedorEv4', 'Hallway'
 end
 
-if $ARGS[0] =  'Fedor Shelter 2':
+if $ARGS[0] = 'Fedor Shelter 2':
 	*clr & cla
 	menu_off = 1
 	FedorKozHome = 1
@@ -3472,7 +3475,7 @@ if $ARGS[0] =  'Fedor Shelter 2':
 	act 'Finish':gt 'FedorEv4', 'Kitchen'
 end
 
-if $ARGS[0] =  'Dimka Help':
+if $ARGS[0] = 'Dimka Help':
 	*clr & cla
 	menu_off = 1
 	minut += 5
@@ -3500,7 +3503,7 @@ if $ARGS[0] =  'Dimka Help':
 	end	
 end
 
-if $ARGS[0] =  'Dimka Aftermath':
+if $ARGS[0] = 'Dimka Aftermath':
 	*clr & cla
 	menu_off = 1
 	FedorvsDimka = 3
@@ -3526,7 +3529,7 @@ if $ARGS[0] =  'Dimka Aftermath':
 	end
 end
 
-if $ARGS[0] =  'Home Entrance':
+if $ARGS[0] = 'Home Entrance':
 	*clr & cla
 	$menu_loc = 'FedorEv4'
 	$menu_arg = 'Home Entrance'
@@ -3539,7 +3542,7 @@ if $ARGS[0] =  'Home Entrance':
 	act 'Knock on the door':gt 'FedorEv4', 'Home Entrance 2'
 end
 
-if $ARGS[0] =  'Home Entrance 2':
+if $ARGS[0] = 'Home Entrance 2':
 	*clr & cla
 	$menu_loc = 'FedorEv4'
 	$menu_arg = 'Home Entrance 2'
@@ -3551,7 +3554,7 @@ if $ARGS[0] =  'Home Entrance 2':
 		act 'Enter house':gt 'FedorEv4', 'Hallway'
 	elseif week <= 5 and hour >= 19:
 		gt 'FedorEv4', 'Home Entrance 3'
-	elseif  week > 5 and hour > 10:
+	elseif week > 5 and hour > 10:
 		'<center><b><h4><font color="#FF00FF"><<"Regina Kozlov">></font></h4></b></left>'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/fedorhome/regina.jpg"></left>'
 		'You knock on the door until Regina opens it and invites you inside.'
@@ -3562,7 +3565,7 @@ if $ARGS[0] =  'Home Entrance 2':
 	end
 end
 
-if $ARGS[0] =  'Home Entrance 3':
+if $ARGS[0] = 'Home Entrance 3':
 	*clr & cla
 	menu_off = 1
 	'<center><b><h4><font color="blue"><<"Fyodor [Fedor] Kozlov">></font></h4></b></left>'

locations/Gadbana.qsrc

@@ -214,7 +214,7 @@ if mira = 0:
 
 	if breastpump > 0 and bp_unbox >= 1:
 		act 'Use breast pump':
-			gt 'lact_lib', 'bp_milking'
+			gt 'lact_bp', 'bp_milking'
 		end
 	end
 

locations/Gaddvor.qsrc

@@ -84,12 +84,6 @@ if $ARGS[0]='':
 		if meadow > 0 and hour >= 6 and hour < 20 and month >= 4 and month <= 10:act 'Go to the meadow':minut += 20 & gt 'Meadow', 'start'
 		act '<b>Go to Gadukino</b>':minut += 5 & gt 'gadukino'
 
-		if hour >= 17 and hour < 20:
-			if mitkaday!daystart:'<a href="exec:gt ''mitka''">Mitka</a> is hanging out near the barn in your grandparents'' backyard, he is following you while taking a smoke.'
-		elseif hour >= 20 and sunWeather = 1:
-			'Several <a href="exec:gt ''mitkabuh''">young men</a> are sitting near your grandparents'' backyard, drinking moonshine and talking loudly.'
-		end
-
 		mira_temp = rand(1,5)
 		if mira_temp = 3 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 1 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or npc_QW['A60'] >= 10 or mirasex > 1):
 			*clr & cla

locations/Gadhouse.qsrc

@@ -1,6 +1,7 @@
 # Gadhouse
 
 if $ARGS[0]='' or $ARGS[0] = 'Start':
+	CLOSE ALL
 	$location_type = 'indoors'
 	$metka = ''
 	$loc = 'Gadhouse'
@@ -9,10 +10,8 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 	menu_off = 0
 	$locclass = 'singleroom'
 	curr_home = 2
-	cla
-	*clr
+	*clr & cla
 	frost = 0
-	CLOSE ALL
 	mira_temp = rand(1,5)
 	!125s
 	!execute before everything
@@ -46,8 +45,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		act 'Further': gt 'Gadhouse', 'Start'
 
 	elseif go_in_boletus = 1 and boletus >= grandpa_boletus and hour >= 6 and hour < 22:
-		cla
-		*clr
+		*clr & cla
 		grandmahelp += 1
 		boletus -= grandpa_boletus
 		minut += 5
@@ -65,8 +63,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		act 'Further': grandpa_boletus = 0 & gt 'Gadhouse', 'Start'
 
 	elseif go_in_boletus_bilberry = 1 and boletus >= grandpa_boletus and bilberry >= grandpa_bilberry and hour >= 6 and hour < 22:
-		cla
-		*clr
+		*clr & cla
 		grandmahelp += 1
 		boletus -= grandpa_boletus
 		bilberry -= grandpa_bilberry
@@ -85,8 +82,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		act 'Further': grandpa_boletus = 0 & grandpa_bilberry = 0 & gt 'Gadhouse', 'Start'
 
 	elseif go_in_bilberry = 1 and bilberry >= grandpa_bilberry and hour >= 6 and hour < 22:
-		cla
-		*clr
+		*clr & cla
 		grandmahelp += 1
 		bilberry -= grandpa_bilberry
 		minut += 5
@@ -104,8 +100,7 @@ if $ARGS[0]='' or $ARGS[0] = 'Start':
 		act 'Further': grandpa_bilberry = 0 & gt 'Gadhouse', 'Start'
 
 	elseif mira_temp = 1 and hour >= 9 and hour <= 19 and npc_rel['A60'] >= 15 and Mira_no = 0 and sunWeather = 0 and mira_guestday ! daystart and (npc_QW['A63'] < 13 or miragopQW >= 10 or mirasex > 1):
-		cla
-		*clr
+		*clr & cla
 		mira_guestday = daystart
 		minut += 5
 		mira_guest = 1
@@ -129,8 +124,7 @@ if $ARGS[0] = 'Main':
 	$menu_loc = 'Gadhouse'
 	$menu_arg = 'Main'
 	menu_off = 0
-	*clr
-	cla
+	*clr & cla
 	gs 'stat'
 	'<center><H4>Your Grandparents'' Cottage</H4></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/izba.jpg"></center>'
@@ -139,10 +133,10 @@ if $ARGS[0] = 'Main':
 	'You can check your weight on your grandma''s old mechanical <a href="exec:msg ''<center>Your weight is <<pcs_weight>> kg<br>Your body mass index (BMI) is <<bmi_calc>>.<br><<$bmi_desc>></center>''">scales</a>.'
 
 	if hour < 8:
-		temp = RAND(0,9)
+		temp = rand(0,9)
 		if temp = 0:'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
 	elseif hour >= 8 and hour < 12 and sunWeather = 1:
-		temp = RAND(0,2)
+		temp = rand(0,2)
 		if temp = 1:'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is busy cleaning himself with his tongue.'
 		if temp = 2:'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> lies lazily, soaking up some sunshine rays.'
 	elseif hour >= 8 and hour < 12 and sunWeather = 0:
@@ -150,16 +144,16 @@ if $ARGS[0] = 'Main':
 		if temp = 0: 'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
 		if temp = 1: 'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is staring in disgust at the rain outside.'
 	elseif hour >= 12 and hour < 18:
-		temp = RAND(0,5)
+		temp = rand(0,5)
 		if temp = 3:'Next to the table by the window <a href="exec:feedcat = 1 & gt ''Gadhouse'',''villagecat''">Boniface</a> stretches and meows loudly, it''s time for dinner.'
 		if temp = 4 and sunWeather = 1: 'On the table by the window <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> lies lazily, soaking up some sunshine rays.'
 		if temp = 4 and sunWeather = 0: 'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
 	elseif hour >= 18 and hour < 22 and catout ! 2:
-		temp = RAND(0,3)
+		temp = rand(0,3)
 		if temp = 0:'<a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is stalking around the main floor, looking for a nice juicy mouse to play with.'
 		if temp = 1 and catout = 0: catout = 1 &'<a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> twines around your ankles then goes to the door meowing pitifully.'
 	elseif hour >= 22:
-		temp = RAND(0,2)
+		temp = rand(0,2)
 		if temp = 1:'In a box filled with scraps of cloth, <a href="exec: gt ''Gadhouse'',''villagecat''">Boniface</a> is curled up sleeping peacefully.'
 	end
 
@@ -173,9 +167,9 @@ if $ARGS[0] = 'Main':
 
 	if mira_guest = 1: MiraLoc = 6 & '<a href="exec: gt ''Miroslava'', ''Start''">Mira</a> is sitting next to you.'
 
-	clr
 	gs 'stat'
 	gs 'themes', 'indoors'
+	gs 'kit_din'
 
 	!125s
 	!{
@@ -231,148 +225,15 @@ if $ARGS[0] = 'Main':
 
 	act 'Have a snack (0:15)':gs 'food', 'snack'
 
-	act 'Drink some water (0:05)':gs 'beverage', 'bev_wat'
-
-	act 'Have a cup of tea (0:05)':
-		*clr & cla
-		minut += 5
-		if pcs_hydra >= 100:
-			'There is no need for tea. You''re not thirsty.'
-		else
-			pcs_hydra += 80
-			cumspclnt = 2
-			gs 'cum_cleanup'
-			pcs_breath = 0
-			'You make a cup of tea, quenching your thirst.'
-		end
-
-		gs 'stat'
-
-		act 'Get up from the table':gt 'Gadhouse', 'Main'
-	end
-
-	if pranik > 0:
-		'You have <<pranik>> tea biscuits on the plate.'
-
-		act 'Drink tea with biscuits (0:05)':
-			cla
-			*clr
-			menu_off = 1
-			minut += 5
-			pranik -= 1
-			pcs_health += 30
-			pcs_mood += 20
-			pcs_energy += 80
-			if pcs_hydra >= 100:
-				pcs_hydra += 30
-			else
-				pcs_hydra += 60
-			end
-			cumspclnt = 2
-			gs 'cum_cleanup'
-			pcs_breath = 0
-			fat += 4
-			frost = 0
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
-			'You enjoy a cup of tea while you eat some of the tea biscuits. They''re too sweet and can''t be good for your figure, but they taste so good!'
-
-			act 'Get up from the table':gt 'Gadhouse', 'Main'
-		end
-	end
-
-	if edaD > 0:
-		act 'Prepare a diet meal (0:30)':
-			cla
-			*clr
-			menu_off = 1
-			frost = 0
-			minut += 30
-			pcs_health += 10
-			pcs_mood += 20
-			edaD -= 1
-			'<center><img <<$set_imgh>> src="images/shared/food/food.jpg"></center>'
-			if pcs_energy >= 100:
-				'You prepare a diet meal and try to eat it, but you''re full. You don''t even take a bite.'
-			elseif pcs_energy >= 80:
-				pcs_energy += 40
-				'You try to enjoy the meal, but half-way you realize you weren''t all that hungry. You manage to finish the meal, but feel like it was kind of a waste to prepare it.'
-			else
-				pcs_energy += 80
-				'The diet meal is tasty, and you enjoy eating it.'
-			end
-
-			if pcs_hydra >= 100:
-				'You''re not thirsty.'
-			else
-				pcs_hydra += 100
-				cumspclnt = 2
-				gs 'cum_cleanup'
-				pcs_breath = 0
-				'You make a cup of tea, quenching your thirst.'
-			end
-
-			act 'Get up from the table':gt 'Gadhouse', 'Main'
-		end
-	end
-
+	dynamic $sandwich
+	dynamic $driwater
+	dynamic $dritea
+	dynamic $fill_bottle
+	dynamic $edaD
+	dynamic $pranik
 	dynamic $fatdel
-
-	if lekarstvo > 0:
-		'You have <<lekarstvo>> tablet(s).'
-
-		if sick > 0 and lekarday ! daystart:
-			act 'Take a pill (0:05)':
-				cla
-				*clr
-				menu_off = 1
-				minut += 5
-				lekarday = daystart
-				lekarstvo -= 1
-				sick -= sick * 20 / 100
-				if pcs_hydra >= 100:
-					pcs_hydra += 25
-				else
-					pcs_hydra += 50
-				end
-				'<center><img <<$set_imgh>> src="images/locations/shared/apartment/event/sick/lekr<<picrand>>.jpg"></center>'
-				'You swallow the pill, and shortly after you feel a bit better.'
-
-				act 'Continue':gt 'Gadhouse', 'Main'
-			end
-		end
-	end
-
-	if vitamin > 0:
-		'You have <<vitamin>> vitamin pills.'
-
-		if vitaminday ! daystart:
-			act 'Take vitamins (0:05)':
-				cla
-				*clr
-				menu_off = 1
-
-				minut += 5
-				vitaminday = daystart
-				vitamin -= 1
-				frost = 0
-				if pcs_hydra >= 100:
-					pcs_hydra += 25
-				else
-					pcs_hydra += 50
-				end
-				if KandidozOnce = 1:Kandidoz -= 2
-				if GerpesOnce = 1:Gerpes -= 2
-				if SifacOnce = 1 and Sifilis >= 10:Sifilis -= rand(0, 1)
-
-				pcs_skin += 1
-
-				'You swallow a vitamin pill to stay healthy.'
-
-				act 'Continue':gt 'Gadhouse', 'Main'
-			end
-		end
-	end
+	dynamic $lekarstvo
+	dynamic $vitamin
 
 	gs 'events', 'read'
 	gs 'subkid'
@@ -415,11 +276,11 @@ if $ARGS[0] = 'Main':
 		end
 	end
 
-	if rand (0,2) ! 0:gs 'din_bad' & dynamic $mobile_check
+	if rand(0,2) ! 0: gs 'din_bad' & dynamic $mobile_check
 	act 'Relax on your bed': gt 'bed', 'start'
 end
 
-if $ARGS[0]='grandma':
+if $ARGS[0] = 'grandma':
 	*clr & cla
 	menu_off = 1
 	minut += 2
@@ -434,17 +295,13 @@ if $ARGS[0]='grandma':
 
 		act 'Maybe you should get dressed before talking to her':gt 'Gadhouse', 'Start'
 	else
-		if grigory_flower > 0 and grigory_flower < 10:
-			act 'Talk to her about the flowers': gt 'grigory', 'flower4'
-		end
-		if grandmahelpday ! daystart:
-			act 'Offer to help out': grandmahelpday = daystart & gt'grandmahelp'
-		end
-		!125s
+		if grigory_flower > 0 and grigory_flower < 10: act 'Talk to her about the flowers': gt 'grigory', 'flower4'
+		
+		if grandmahelpday ! daystart: act 'Offer to help out': grandmahelpday = daystart & gt'grandmahelp'
+
 		if grandmatalkgad = 0:
 			act 'Ask about the village (0:10)':
-				cla
-				*clr
+				*clr & cla
 				grandmatalkgad = 1
 				minut += 10
 				pcs_mood += 5
@@ -468,8 +325,7 @@ if $ARGS[0]='grandma':
 		!125e
 		if hour >= grandmatalk + 3:
 			act 'Chat with your grandmother (0:10)':
-				cla
-				*clr
+				*clr & cla
 				grandmatalk = hour
 				grandmatalkday = daystart
 				minut += 10
@@ -485,17 +341,16 @@ if $ARGS[0]='grandma':
 
 		if grandmastory ! daystart:
 			act 'Ask her to tell you a story (0:20)':
-				cla
-				*clr
+				*clr & cla
 				grandmastory = daystart
 				minut += 20
-				pcs_mood += RAND(10,15)
+				pcs_mood += rand(10,15)
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/grandparents/babushka.jpg"></center>'
 				'When you ask your grandmother to tell you a story, she mumbles something. Nevertheless, after a brief second or two, she decides on a story to share with you today, she begins to talk slowly.'
 
-				temp = RAND(0,7)
+				temp = rand(0,7)
 
 				if temp = 0:
 					'"There was this one time my parents allowed me to stay at my friend''s home for the night. During the night, a lot of snow fell... and we heard a soft knock on the door!" she says in an ominous voice.'
@@ -571,18 +426,16 @@ if $ARGS[0]='grandpa':
 		act 'Maybe you should get dressed before talking to him':gt 'Gadhouse', 'Start'
 	else
 
-		if grigory_flower > 0 and grigory_flower < 10:
-			act 'Talk to him about the flowers': gt 'grigory', 'flower3'
-		end
+		if grigory_flower > 0 and grigory_flower < 10: act 'Talk to him about the flowers': gt 'grigory', 'flower3'
+		
 		if go_in_boletus = 1:'You promise to bring grandpa <<grandpa_boletus>> kg of mushrooms.'
 		if go_in_bilberry = 1:'You promise to bring grandpa <<grandpa_bilberry>> kg of berries.'
 		if go_in_boletus_bilberry = 1:'You promise to bring grandpa <<grandpa_boletus>> kg mushrooms and <<grandpa_bilberry>> kg of berries.'
-		!125s
+
 		if grandpahelpday ! daystart:act 'Offer to help':grandpahelpday = daystart & gt'grandpahelp'
 		if grandpatalkforest = 0:
 			act 'Ask about the forest (0:10)':
-				cla
-				*clr
+				*clr & cla
 				grandpatalkforest = 1
 				minut += 10
 				pcs_mood += 5
@@ -601,8 +454,7 @@ if $ARGS[0]='grandpa':
 		!125e
 		if hour >= grandpatalk + 3:
 			act 'Chat with your grandfather (0:10)':
-				cla
-				*clr
+				*clr & cla
 				grandpatalk = hour
 				grandpatalkday = daystart
 				minut += 10
@@ -630,8 +482,7 @@ if $ARGS[0]='villagecat':
 	'Your grandparents'' fat tomcat, Boniface, is aware of you approaching him, even though his eyes are closed. He tracks you with his ears and simply ignores you.'
 
 	act 'Pet Boniface':
-		cla
-		*clr
+		*clr & cla
 		minut += 5
 		pcs_mood += RAND(1,4)
 		gs 'stat'
@@ -644,8 +495,7 @@ if $ARGS[0]='villagecat':
 
 	if feedcat = 1:
 		act 'Feed Boniface':
-			cla
-			*clr
+			*clr & cla
 			minut +=5
 			gs 'stat'
 			feedcat = 2
@@ -658,15 +508,13 @@ if $ARGS[0]='villagecat':
 	if catout = 1:
 		act 'Let Boniface Out':
 			if sunWeather = 0:
-				cla
-				*clr
+				*clr & cla
 				minut += 10
 				gs 'stat'
 				'You open the door for Boniface who saunters around you only to stop in the doorway as he becomes aware that it is raining out. He glares up at you as if the rain was your fault. He stares out into the wet for another moment then sedately turns around and goes back to his box.'
 				act 'Continue': gt 'Gadhouse', 'Start'
 			else
-				cla
-				*clr
+				*clr & cla
 				minut +=10
 				gs 'stat'
 				catout = 2
@@ -687,6 +535,8 @@ if $ARGS[0] = 'intro':
 	menu_off = 1
 	hour = 6
 	gs 'stat'
+	music_loop = 0
+	CLOSE ALL
 	'<center><H4>Your Grandparents'' Cottage</H4></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
 	*nl
@@ -706,7 +556,11 @@ if $ARGS[0] = 'intro':
 		'You tiredly open your eyes seeing your <<$npc_nickname[''A29'']>> standing over you, "Fifteen more minutes..."'
 		'Your <<$npc_nickname[''A29'']>> lets out a loud sigh, "No, up now!" as she yanks the cover off...'
 		'"<<$npc_nickname[''A29'']>>!" you exclaim, as you feel a slight cold breeze hit your body.'
-		'"Listen!, I''m heading back to Pavlovsk this morning, and I don''t want to hear excuses, <<$pcs_nickname>>. The summer holidays will be over soon and you need to get used to waking up early, for when school starts. So, from now on set your alarm, so you can wake up at a reasonable time." <<$npc_nickname[''A29'']>> says as she stares at you expectantly.'
+		if month = 6:
+			'"Listen!, I''m heading back to Pavlovsk this morning, and I don''t want to hear excuses, <<$pcs_nickname>>. You said you''d help out your grandparents during the summer holidays. So, from now on set your alarm, so you can wake up at a reasonable time." <<$npc_nickname[''A29'']>> says as she stares at you expectantly.'
+		else
+			'"Listen!, I''m heading back to Pavlovsk this morning, and I don''t want to hear excuses, <<$pcs_nickname>>. The summer holidays will be over soon and you need to get used to waking up early, for when school starts. So, from now on set your alarm, so you can wake up at a reasonable time." <<$npc_nickname[''A29'']>> says as she stares at you expectantly.'
+		end
 		act 'Get up':
 			cla & *clr
 			minut += 2
@@ -714,7 +568,11 @@ if $ARGS[0] = 'intro':
 			'<center><H4>Your Grandparents'' Cottage</H4></center>'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
 			*nl
-			'As soon as you get off your now coverless bed, your <<$npc_nickname[''A29'']>> is quick to resume her nagging, telling you again what you already heard from her a few moments ago. "Summer is almost over, you can''t sleep in anymore, not even for another fifteen minutes." She''s not even looking at you while she talks, but luckily for you that means she misses you rolling your eyes.'
+			if month = 6:
+				'As soon as you get off your now coverless bed, your <<$npc_nickname[''A29'']>> is quick to resume her nagging, telling you again what you already heard from her a few moments ago. "The work around the farm normally gets done in the morning, so you can''t sleep in anymore, not even for another fifteen minutes." She''s not even looking at you while she talks, but luckily for you that means she misses you rolling your eyes.'
+			else
+			'	As soon as you get off your now coverless bed, your <<$npc_nickname[''A29'']>> is quick to resume her nagging, telling you again what you already heard from her a few moments ago. "Summer is almost over, you can''t sleep in anymore, not even for another fifteen minutes." She''s not even looking at you while she talks, but luckily for you that means she misses you rolling your eyes.'
+			end
 			'"What are you going to do when school starts, or when you get a job? You better get into the habit of setting your alarm so you can wake up bright and early."'
 			act 'Continue':
 				cla & *clr
@@ -724,7 +582,11 @@ if $ARGS[0] = 'intro':
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost5.jpg"></center>'
 				*nl
 				'You let out an exasperated sigh, "Yeah, yeah I know, you told me that already. So, how early are we talking?"'
-				'Your <<$npc_nickname[''A29'']>> shoots you a sharp look and you know to fix your attitude or else. "Well, depends on what you plan to do in the morning. There''s showering and brushing your teeth, doing your hair and then makeup and shaving if you really need to. If I remember right...Anya used to wake up at 06:00 for school. Besides, while you are staying at your grandparents house, you should be up extra early helping them tend to the farm, this isn''t a holiday camp!"'
+				if month = 6:
+					'Your <<$npc_nickname[''A29'']>> shoots you a sharp look and you know to fix your attitude or else. "Well, depends on what you plan to do in the morning. There''s showering and brushing your teeth, doing your hair and then makeup and shaving if you really need to. If I remember right...Anya used to wake up at 06:00 when she slept here. Besides, while you are staying at your grandparents house, you should be up extra early helping them tend to the farm, this isn''t a holiday camp!"'
+				else
+					'Your <<$npc_nickname[''A29'']>> shoots you a sharp look and you know to fix your attitude or else. "Well, depends on what you plan to do in the morning. There''s showering and brushing your teeth, doing your hair and then makeup and shaving if you really need to. If I remember right...Anya used to wake up at 06:00 for school. Besides, while you are staying at your grandparents house, you should be up extra early helping them tend to the farm, this isn''t a holiday camp!"'
+				end
 				act 'Continue':
 					cla & *clr
 					minut += 2
@@ -733,7 +595,11 @@ if $ARGS[0] = 'intro':
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
 					*nl
 					'"You want me to wake up that early?!" You huff. "Can''t I wake up at like... 07:00?"'
-					'Your <<$npc_nickname[''A29'']>> shrugs. "You could, but then you might have to cut corners or even end up running late to school, and I won''t be having any of that. Your teachers won''t either," she warns you before making her way outside. "Oh, don''t forget; when you get back to Pavlovsk, you need to head down to the clinic and see the gynecologist for a check up. Not just once, but every month," she adds quickly.'
+					if month = 6:
+						'Your <<$npc_nickname[''A29'']>> shrugs. "You could, but then you might have to cut corners or your grandparents will have started work without you, and I won''t be having any of that." she warns you before making her way outside. "Oh, don''t forget; when you get back to Pavlovsk, you need to head down to the clinic and see the gynecologist for a check up. Not just once, but every month," she adds quickly.'
+					else
+						'Your <<$npc_nickname[''A29'']>> shrugs. "You could, but then you might have to cut corners or even end up running late to school, and I won''t be having any of that. Your teachers won''t either," she warns you before making her way outside. "Oh, don''t forget; when you get back to Pavlovsk, you need to head down to the clinic and see the gynecologist for a check up. Not just once, but every month," she adds quickly.'
+					end
 					act 'But why do I--':
 						cla & *clr
 						minut += 2
@@ -750,5 +616,6 @@ if $ARGS[0] = 'intro':
 		end
 	end
 end
+
 --- Gadhouse ---------------------------------
 

locations/Gadsarai.qsrc

@@ -7,436 +7,154 @@ if $ARGS[0] = '':
 	$loc = 'Gadsarai'
 	$location_type = 'secluded'
 
-	temp = RAND(1,20)
+	'<center><h4>Old Barn</h4></center>'
+	if month >= 4 and month <= 10:
+		if hour >= 6 and hour < 22:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_night.jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour < 18:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_winter.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_winter_night.jpg"></center>'
+		end
+	end
+	'An old junk filled barn that could hold some useful items. Sitting near the barn is an old unused dog house.'
 
-	if npc_QW['A66'] >= 30 and temp <= 3:
-		gs 'boyStat', 'A66'
-		sexpartkno = 1
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/leghump.jpg"></center>'
-		'Bandit pounces on you and pins your thigh between his front legs. He begins to persistently and significantly put pressure on you, growling menacingly...'
-		if pcs_dom > 0 and alko < 6:
-			act 'Push off': minut += 1 & gt 'Gaddvor'
+	if mira_dog > 0: 'A naked and chained <a href="exec: gt ''Gadsarai'',''mira_dog'' ">Mira</a> sits near the dog house.</a>'
+
+	if month > 4 and month < 10:
+		if hour > 9 and hour < 20:
+			'On your right is a cattle barn.'
 		else
-			act 'Submit':
-				*clr & cla
-				banditknow = RAND(0,1)
-				npc_horny['A66'] = 0
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/predoggy.jpg"></center>'
-				'You remove your panties and get up on all fours in front of Bandit, presenting him with your bare ass. The dog instinctively knowing what to do, throws his forepaws on your back and starts to poke you in the crotch with his hot member.'
-				gs 'arousal', 'foreplay', 2, 'sub', 'beast'
-				gs 'arousal', 'end'
-				gs 'stat'
-				if banditknow = 1:
-					if pcs_vag = 0:
-						act 'Wait':
-							*clr & cla
-							if npc_QW['A66'] < 30:npc_QW['A66'] += 5
-							pcs_vag = 5
-							vgape = 3
-							pcs_mood = 50
-							gs 'boyStat', 'A66'
-							sexvolume = rand(20,590)
-							gs 'cum_manage'
-							'<center><img <<$set_imgh>> src="images/beast/bandit/doggyvirgin.jpg"></center>'
-							'You obediently wait until your dog finds his way to your hole. His tongue is hanging out, panting and snorting loudly over your ear. He begins making fast sharp movements with his hips, and you immediately feel the tip of his cock break through your hymen and begin furiously jabbing at your insides. The acute pain makes you moan loudly, and you have to stretch both hands on the floor to keep from falling onto the ground because of the dogs pounding. Biting your lip, you endure the pain as the animal takes your virginity.'
-							'His penis gets bigger and bigger with each passing second it''s painfully stretching your pussy. He tries to pull out from you, but his cock knot has swollen inside your tight pussy. You scream in pain as he tries to free himself from your sore bleeding vagina. Eventually, he settles down and you can feel a mix of blood and dog semen drip down your legs. After waiting for nearly half and hour, he finally shrinks enough to pop out of your well and truely fucked hole. You cry a little from your still bleeding and abused pussy, but somehow you manage to gather yourself after this intense ordeal...'
-							gs 'arousal', 'vaginal', 30, 'sub', 'beast', 'rough'
-							gs 'arousal', 'end'
-							gs 'pain', 4, 'vaginal', 'stretch'
-							gs 'stat'
-							act 'So I more or girl':gt 'Gadsarai'
-						end
-					else
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvag.jpg"></center>'
-						act 'Wait':
-							if pcs_vag < 10:
-								*clr & cla
-								pcs_vag += 5
-								vgape = 3
-								pcs_horny = 0
-								gs 'boyStat', 'A66'
-								sexvolume = rand(20,590)
-								gs 'cum_manage'
-								'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagknot.jpg"></center>'
-								'After a few moments you feel his hot cock sharply penetrate your tight vagina and start flailing wildly and deeply, reaching almost to the back of your uterus. Your eyes instantly well with involuntarily tears, and painful groans fall from your mouth. You shake your hips, trying to somehow reduce the pain, but Bandit snarls and gets angry. His teeth quite noticeably grip your neck and you are left with no choice but to obediently endure. He''s so strong, fast, and deep.'
-								'He hammers your pussy with his cock, and in a minute you feel like it gets hotter and starts to swell. The walls of your vagina painfully stretch, causing you more suffering, but you dare not move for fear that Bandit will take you by the neck again ... But after a couple of minutes, he gets off inside you and turns his back to your ass. All the rest of the time you wait to uncork your dog cum oozing pussy...'
-								gs 'arousal', 'vaginal', 25, 'sub', 'beast', 'rough'
-								gs 'arousal', 'end'
-								gs 'pain', 2, 'vaginal', 'stretch'
-								gs 'pain', 2, 'neck', 'pierce'
-								gs 'stat'
-								act 'Close':gt 'Gadsarai'
-							elseif pcs_vag >= 10 and pcs_vag < 25:
-								*clr & cla
-								pcs_vag += 4
-								vgape = 2
-								gs 'boyStat', 'A66'
-								sexvolume = rand(20,590)
-								gs 'cum_manage'
-								gs 'stat'
-								if pcs_horny >= 100:
-									*clr & cla
-									pcs_mood = 100
-									if pirsG = 1:
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcumpirs.jpg"></center>'
-									else
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-									end
-									'After a few moments you feel his hot cock sharply penetrate your moist vagina and start flailing wildly and deeply, reaching almost to the back of your uterus. From your lips come frustrated groans of both pain and pleasure. You gyrate your hips, trying to somehow reduce the pain and ironically almost prevent your approaching orgasm, but Bandit snarls and gets angry. His teeth quite noticeably grip your neck and you are left with no choice but to obediently endure. He''s so strong, fast, and deep.'
-									'He hammers your pussy with his cock, and in a minute you feel like it gets hotter and starts to swell. The walls of your vagina stretch, giving you a surprisingly painful yet pleasant feeling. A few minutes later you have to let go and Bandit gets off you and turns his back to your ass. You''re exhausted, and have to wait the rest of the time before you can uncork your dog cum oozing pussy...'
-									$orgasm_or = 'yes'
-									gs 'arousal', 'vaginal', 20, 'sub', 'beast', 'rough'
-									gs 'arousal', 'end'
-									gs 'pain', 2, 'vaginal', 'stretch'
-									gs 'pain', 2, 'neck', 'pierce'
-									gs 'stat'
-								else
-									'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagknot.jpg"></center>'
-									'After a few moments you feel his hot cock sharply penetrate your moist vagina and start flailing wildly and deeply, reaching almost to the back of your uterus. Your eyes instantly well with involuntarily tears, and painful groans fall from your mouth. You shake your hips, trying to somehow reduce the pain, but Bandit snarls and gets angry. His teeth quite noticeably grip your neck and you are left with no choice but to obediently endure. He''s so strong, fast, and deep.'
-									'He hammers your pussy with his cock, and in a minute you feel like it gets hotter and starts to swell. The walls of your vagina painfully stretch, causing more suffering, but you dare not move for fear that Bandit will take you by the neck again ... But after a couple of minutes, he gets off inside you and turns his back to your ass. All the rest of the time you wait to uncork your dog cum oozing pussy...'
-									gs 'arousal', 'vaginal', 20, 'sub', 'beast', 'rough'
-									gs 'arousal', 'end'
-									gs 'pain', 2, 'vaginal', 'stretch'
-									gs 'pain', 2, 'neck', 'pierce'
-									gs 'stat'
-								end
-								act 'Close':gt 'Gadsarai'
-							elseif pcs_vag >= 25 and pcs_vag < 35:
-								*clr & cla
-								pcs_vag += 3
-								gs 'boyStat', 'A66'
-								sexvolume = rand(20,590)
-								gs 'cum_manage'
-								gs 'stat'
-								if pcs_horny >= 100:
-									*clr & cla
-									pcs_mood = 100
-									if pirsG = 1:
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcumpirs.jpg"></center>'
-									else
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-									end
-									'After a few moments you feel his hot cock sharply penetrate your wet vagina and start flailing wildly and deeply, every thrust pushing at your womb. From your lips comes lustful groans, expressing both animal and human lust. You gyrate your hips, trying to somehow reduce the pain and ironically almost prevent your approaching orgasm, but Bandit snarls and gets angry. His teeth quite noticeable as he grips your neck and you are left with no choice but to obediently endure. He''s so strong, fast, and deep.'
-									'He hammers your pussy with his cock, and in a minute you scream and cry as your orgasm overwhelms you. You yell loudly as you cum, forgetting that someone might hear you. As you come down from your orgasm, it''s only a few minutes before Bandit has turned away from you waiting patiently for his knot to deflate...'
-									$orgasm_or = 'yes'
-									gs 'arousal', 'vaginal', 20, 'sub', 'beast', 'rough'
-									gs 'arousal', 'end'
-									gs 'pain', 2, 'vaginal', 'stretch'
-									gs 'pain', 2, 'neck', 'pierce'
-									gs 'stat'
-								else
-									'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-									'After a few moments you feel his hot cock sharply penetrate your wet vagina and start flailing wildly and deeply, every thrust pushing at your womb. From your lips come lustful groans, expressing both animal and human lust. You gyrate your hips, trying to build towards orgasm, but Bandit snarls and gets angry. His teeth are quite noticeable as he grips your neck and you are left with no choice but to obediently endure. He''s so strong, fast, and deep.'
-									'The walls of your vagina stretch, sending a new wave of pleasure through your body, but you dare not move for fear that Bandit will take you by the neck again... But after a couple of minutes, he gets off inside you and turns his back to your ass. All the rest of the time you wait to uncork your dog cum oozing pussy...'
-									gs 'arousal', 'vaginal', 20, 'sub', 'beast', 'rough'
-									gs 'arousal', 'end'
-									gs 'stat'
-								end
-								act 'Close':gt 'Gadsarai'
-							elseif pcs_vag >= 35:
-								*clr & cla
-								pcs_vag += 1
-								gs 'boyStat', 'A66'
-								sexvolume = rand(20,590)
-								gs 'cum_manage'
-								gs 'stat'
-								if pcs_horny >= 100:
-									*clr & cla
-									pcs_mood = 100
-									if pirsG = 1:
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcumpirs.jpg"></center>'
-									else
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-									end
-									'After a few moments you feel his hot cock sharply penetrate your soaking wet vagina and begin furiously and deeply pounding, every thrust filling your womb. You groan with animal lust, completely devoid of humanity. Like a bitch in heat you grind your ass back against Bandit. You squeeze the muscles in your vagina, so that there is no chance of losing your favorite dog cock. Bandit spends a couple more minutes hammering away at your gaping vagina, and in a minute you scream as an animal-like orgasm overwhelms you. You wait humbly for ten minutes before your dogs cock slips out of your well fucked hole...'
-									$orgasm_or = 'yes'
-									gs 'arousal', 'vaginal', 15, 'sub', 'beast', 'rough'
-									gs 'arousal', 'end'
-									gs 'stat'
-								else
-									'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-									'After a few moments you feel his hot cock sharply penetrate your soaking wet vagina and begin furiously and deeply pounding, every thrust filling your womb. You groan with animal lust, completely devoid of humanity. Like a bitch in heat you grind your ass back against Bandit. You squeeze the muscles in your vagina, so that there is no chance of losing your favorite dog cock. Bandit spends a couple more minutes hammering away at your gaping vagina, and soon jumps aside weary, turning his ass towards you. You wait unsatisfied for ten minutes, your ass fidgeting from arousal, before your dogs cock slips out of your well fucked hole...'
-									gs 'arousal', 'vaginal', 15, 'sub', 'beast', 'rough'
-									gs 'arousal', 'end'
-									gs 'stat'
-								end
-								act 'Close':gt 'Gadsarai'
-							end
-						end
-					end
-				else
-					act 'Wait':
-						*clr & cla
-						minut += 2
-						pcs_mood = 50
-						sub += RAND(0,1)
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/analknot1.jpg"></center>'
-						if pcs_ass < 10:
-							pcs_ass += 5
-							agape = 3
-							spafinloc = 3
-							gs 'boyStat', 'A66'
-							sexvolume = rand(20,590)
-							gs 'cum_manage'
-							'You obediently wait until your dog finds his way to your hole. His tongue is hanging out, panting and snorting loudly over your ear. He begins making fast sharp movements with his hips, and you immediately feel the tip of his cock, with plenty of cock grease, slam through your puckered anus. Each time he thrusts he makes his way deeper and deeper into your tight ass. The acute pain makes you moan loudly, and you have to stretch both hands on the floor to keep from falling onto the ground because of the dogs pounding.'
-							'You groan from the pain and cramps in your anus, but Bandit''s angry snarling teeth powerfully grabs you by the neck. You have no choice but to try to relax as Bandit takes your ass with a fury. The pain subsided a bit, but not for long - as the long hot pulsating lump of flesh starts to increase rapidly in size, clogging your ass. The pain grows even greater as it increased to its maximum size, and you begin to squirm involuntarily, while not ceasing to moan and hum. But Bandit no longer pays any attention to you. He climbs down imperiously from your back and waits for his knot to deflate...'
-							gs 'arousal', 'anal', 20, 'sub', 'beast', 'rough'
-							gs 'arousal', 'end'
-							gs 'pain', 2, 'asshole', 'stretch'
-							gs 'pain', 2, 'neck', 'pierce'
-							gs 'stat'
-							act 'Close':gt 'Gadsarai'
-						elseif pcs_ass >= 10 and pcs_ass < 25:
-							pcs_ass += 3
-							agape = 2
-							spafinloc = 3
-							gs 'boyStat', 'A66'
-							sexvolume = rand(20,590)
-							gs 'cum_manage'
-							'You obediently wait until your dog finds his way to your hole. His tongue is hanging out, panting and snorting loudly over your ear. He begins making fast sharp movements with his hips, and you immediately feel the tip of his cock, with plenty of cock grease, slam through your puckered anus. Each time he thrusts he makes his way deeper and deeper into your ass. The dull aching pain makes you moan loudly, and you have to stretch both hands on the floor to keep from falling onto the ground because of the dogs pounding.'
-							'Biting your lip, you endure the pain as the animal gets further into your rectum. His penis gets bigger and bigger with each passing second, and the thrusts become stronger as your ass stretches with every penetrating movement. You groan and whine from the pain in your anus, but Bandit''s angry snarling teeth powerfully grabs you by the neck, and you will inevitably have to submit. To reduce the pain, you try to relax your anus, but it starts to get worse - after his cock gets fully in your ass, then the knot itself finds its way in and quickly starts to grow in size. Bandit fights against you, trying to push the knot in further. Eventually it is firmly corked in your rectum, and you even feel it erupt with hot cum deep inside you. Bandit finally calms down and quietly dismounts his bitch – all you can do is wait for the knot to deflate...'
-							gs 'arousal', 'anal', 20, 'sub', 'beast', 'rough'
-							gs 'arousal', 'end'
-							gs 'pain', 2, 'asshole', 'stretch'
-							gs 'pain', 2, 'neck', 'pierce'
-							gs 'stat'
-							act 'Close':gt 'Gadsarai'
-						elseif pcs_ass >= 25 and pcs_ass < 35:
-							pcs_ass += 2
-							agape = 1
-							spafinloc = 3
-							gs 'boyStat', 'A66'
-							sexvolume = rand(20,590)
-							gs 'cum_manage'
-							gs 'stat'
-							if pcs_horny >= 100:
-								*clr & cla
-								pcs_mood = 100
-								'<center><img <<$set_imgh>> src="images/beast/bandit/analknotcum.jpg"></center>'
-								'You obediently wait until your dog finds his way to your hole. His tongue is hanging out, panting and snorting loudly over your ear. He begins making fast sharp movements with his hips, and you immediately feel the tip of his cock, with plenty of cock grease, slam through your puckered anus. Each time he thrusts he makes his way deeper and deeper into your ass. There is a little pain, but your starting to moan louder with pleasure as Bandit forces his hard cock into you.'
-								'You have to stretch both hands on the floor to keep from falling onto the ground, and even begin to grind back against the dog to please him. However, Bandit does not like this and viciously growls as he possessively grabs you by the neck with his teeth, forcing you to submit and stay still. The knot easily penetrates into your wet ass, and when it begins to grow, you feel a slight discomfort that almost spoils your growing arousal. In an attempt to reach orgasm, you accidentally run a hand against his crotch, but Bandit immediately jumps away from you. Back on the ground, he turned his ass to yours and began to pull away, trying to free himself.'
-								'From such an unexpected turn of events you begin to rapidly and continuously try to finish, cumming hard, and not noticing the sound of Bandits nails scrapping the floor in an attempt to get away. His knot pulls at your asshole, stretching it outward. After half a minute Bandit is unable to get free, and you can feel his knot spewing out warm, sticky dog cum deep into your ass...'
-								$orgasm_or = 'yes'
-								gs 'arousal', 'anal', 20, 'sub', 'beast', 'rough'
-								gs 'arousal', 'end'
-								gs 'pain', 1, 'asshole', 'stretch'
-								gs 'pain', 1, 'neck', 'pierce'
-								gs 'stat'
-							else
-								'You obediently wait until your dog finds his way to your hole. His tongue is hanging out, panting and snorting loudly over your ear. He begins making fast sharp movements with his hips, and you immediately feel the tip of his cock, with plenty of cock grease, slam through your puckered anus. Each time he thrusts he makes his way deeper and deeper into your ass. There is a little pain, but your starting to moan louder with pleasure as Bandit forces his hard cock into you. You have to stretch both hands on the floor to keep from falling onto the ground, and even begin to grind back against the dog to please him.'
-								'However, Bandit does not like this and viciously growls as he possessively grabs you by the neck with his teeth, forcing you to submit and stay still. The knot easily penetrates into your wet ass, and when it begins to grow, you feel a slight discomfort that almost spoils your growing arousal. In an attempt to reach orgasm, you accidentally run a hand against his crotch, but Bandit immediately jumps away from you. Back on the ground, he turned and began to growl menacingly with displeasure. You decide it is not worth the risk to try and climax. You spent the rest of the waiting for Bandits knot to fade...'
-								gs 'arousal', 'anal', 20, 'sub', 'beast', 'rough'
-								gs 'arousal', 'end'
-								gs 'stat'
-							end
-							act 'Close':gt 'Gadsarai'
-						elseif pcs_ass >= 35:
-							pcs_ass += 1
-							spafinloc = 3
-							gs 'boyStat', 'A66'
-							sexvolume = rand(20,590)
-							gs 'cum_manage'
-							gs 'stat'
-							if pcs_horny >= 100:
-								*clr & cla
-								pcs_mood = 100
-								'<center><img <<$set_imgh>> src="images/beast/bandit/analcum.jpg"></center>'
-								'You obediently wait until your dog finds his way to your hole. His tongue is hanging out, panting and snorting loudly over your ear. He begins making fast sharp movements with his hips, and you immediately feel the tip of his cock, with plenty of cock grease, slam through your puckered anus. Each time he thrusts he makes his way deeper and deeper into your ass. There is almost no pain, and your starting to moan louder with animal lust and pleasure as Bandit forces his hard cock into you. You have to stretch both hands on the floor to keep from falling onto the ground, and even begin to grind back against the dog to please him.'
-								'However, Bandit does not like this and viciously growls as he possessively grabs you by the neck with his teeth, forcing you to submit and stay still. The knot easily penetrates into your wet ass, and when it begins to grow, you feel a slight discomfort that almost spoils your growing arousal. In an attempt to reach orgasm, you accidentally run a hand against his crotch, but Bandit immediately jumps away from you. Back on the ground, he turned his ass to yours and began to pull away, trying to free himself. From such an unexpected turn of events you begin to rapidly and continuously try to finish, without noticing that the knot has long since popped out of your gaping asshole and Bandit is now sitting opposite you, indifferently watching your post-orgasmic convulsions and yelps...'
-								$orgasm_or = 'yes'
-								gs 'arousal', 'anal', 20, 'sub', 'beast', 'rough'
-								gs 'arousal', 'end'
-								gs 'stat'
-							else
-								'The knot continues to get larger and larger in size until it finally reaches its maximum. You''re overcome with animal lust and pleasure, and love how nice it feels stretching the walls of your anus. The next twenty minutes consist of you writhing and squirming from feeling that hot dog cock in your ass... '
-								gs 'arousal', 'anal', 20, 'sub', 'beast', 'rough'
-								gs 'arousal', 'end'
-								gs 'stat'
-							end
-							act 'Close':gt 'Gadsarai'
-						end
-					end
-				end
-			end
+			'On your right is a <a href="exec: gt ''Gadsarai'',''cow'' ">cattle</a> barn.'
 		end
-	elseif mirabandit > 0 and temp >= 15:
-		if rand(0,4) = 0:
-			'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira0,<<rand(0,2)>>.jpg"></center>'
-			'Going into the barn, you can see Miroslava coupled with Bandit. You can see part of the swollen knot stretching her red vagina, and Bandit happily wagging tail as you come up to greet him. Mira grunts in pain on all fours, ass to you, crawling behind the dog. You ruffle his ears and smile at the shameless tramp Mira has become under your care. Then you leave and close the door...'
-			gs 'arousal', 'voyeur', 10, 'beast'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave them alone':minut += 10 & gt 'Gaddvor'
+		if hour > 9 and hour < 20 and week < 6 or horse_river = 2:
+			'On your left is a horse stable.'
 		else
-			'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira1,<<rand(0,1)>>.jpg"></center>'
-			'Going into the barn, you can see Bandit fucking Miroslava. He frantically plowed into her pussy, and she tried to hold back the moans and screams every time he thrust, crawling centimeter by centimeter forward under his pressure ... She did not even notice you, so you are a little more aroused after watching this scene. You step forward and slap Mira''s hard, leaving a bright red hand print. Mira yelps and looks back at you. She smiles as Bandit continues to plow into her pussy with wild abandon. You turn away and leave the barn with the door open...'
-			gs 'arousal', 'voyeur', 10, 'beast'
-			gs 'arousal', 'end'
-			gs 'stat'
-			act 'Leave them alone':minut += 10 & gt 'Gaddvor'
+			'On your left is a <a href="exec: gt ''Gadsarai'',''horse'' ">horse</a> stable.'
 		end
 	else
-		'<center><h4>Old Barn</h4></center>'
-		if month >= 4 and month <= 10:
-			if hour >= 6 and hour < 22:
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai.jpg"></center>'
+		'On your right is a <a href="exec: gt ''Gadsarai'',''cow'' ">cattle</a> barn.'
+		'On your left is a <a href="exec: gt ''Gadsarai'',''horse'' ">horse</a> stable.'
+	end
+	'There''s a <a href="exec: gt ''Gadsarai'',''boar'' ">boar</a> living in a separate stable.'
+	if findvel = 1:'You see an old <a href="exec:gt ''bicycle'',''sarai''">bike</a> in the corner.'
+
+	clr
+	gs 'stat'
+
+	act 'Leave':minut += 1 & gt 'Gaddvor'
+
+	act 'Poke around in the barn':
+		if grigoryEV > 0 and grigory_barn ! daystart and hour > 8 and hour < 12: gt 'grigory', 'barn'
+		*clr & cla
+		minut += 15
+		gs 'stat'
+		if vcard = 0 and vcard_trash = 0:
+			*clr & cla
+			if rand(0,5) >= 4:
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vcards.jpg"></center>'
+				'"Hmm, what''s this?" You''ve found an unopened deck of vintage adult playing cards, still in its original cellophone wrapper.'
+				vcard = 1
+				observ_exp += 3
 			else
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_night.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
+				'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
 			end
-		else
-			if hour >= 8 and hour < 18:
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_winter.jpg"></center>'
+			act 'Leave and get some fresh air':gt 'Gadsarai'
+		elseif findvel = 0:
+			*clr & cla
+			if rand(0,8) >= 7:
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/findbike.jpg"></center>'
+				'In the far corner of the barn you manage to find an old bicycle. It''s in surprisingly good condition. You pull it out of the barn and clean it up.'
+				findvel = 1
+				observ_exp += 3
 			else
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai_winter_night.jpg"></center>'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
+				'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
 			end
-		end
-		'An old junk filled barn that could hold some useful items. Sitting near the barn is your grandparents <a href="exec:gt ''bandit''">large dog, named Bandit</a>'
-		!125s
-		if mira_dog > 0: 'A naked and chained <a href="exec: gt ''Gadsarai'',''mira_dog'' ">Mira</a> sits near the dog house.</a>'
-		!125e
-		if month > 4 and month < 10:
-			if hour > 9 and hour < 20:
-				'On your right is a cattle barn.'
+			act 'Leave and get some fresh air':gt 'Gadsarai'
+		elseif findbag = 0 and bag = 0:
+			*clr & cla
+			if rand(0,10) > 9:
+				findbag = 1
+				observ_exp += 3
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/pc/purses/cheap/5.jpg"></center>'
+				'In a far corner of the barn you find a hessian sack filled with mostly junk, but at the bottom you find a good quality messenger bag.'
+				cheap_purses[5] = 1
+				$currentpursetype = 'cheap'
+				currentpursenumber = 5
+				'You can use this cool looking bag as a handbag.'
 			else
-				'On your right is a <a href="exec: gt ''Gadsarai'',''cow'' ">cattle</a> barn.'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
+				'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
 			end
-			if hour > 9 and hour < 20 and week < 6 or horse_river = 2:
-				'On your left is a horse stable.'
+			act 'Leave and get some fresh air':
+				if findbag = 1: bag = 1
+				gt 'Gadsarai'
+			end
+		elseif findbraclet = 0:
+			*clr & cla
+			if rand(0,15) >= 14:
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/bracelet.jpg"></center>'
+				'While looking through the barn you spot a glint of metal under a pile of wood. Upon closer inspection you see a bracelet made of silver and crafted into the likeness of a snake. Strange, but cool that you would find something this valuable in the barn.'
+				findbraclet = 1
+				observ_exp += 3
 			else
-				'On your left is a <a href="exec: gt ''Gadsarai'',''horse'' ">horse</a> stable.'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
+				'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
 			end
-		else
-			'On your right is a <a href="exec: gt ''Gadsarai'',''cow'' ">cattle</a> barn.'
-			'On your left is a <a href="exec: gt ''Gadsarai'',''horse'' ">horse</a> stable.'
-		end
-		'There''s a <a href="exec: gt ''Gadsarai'',''boar'' ">boar</a> living in a separate stable.'
-		if findvel = 1:'You see an old <a href="exec:gt ''bicycle'',''sarai''">bike</a> in the corner.'
-
-		clr
-		gs 'stat'
-
-		act 'Leave':minut += 1 & gt 'Gaddvor'
-
-		act 'Poke around in the barn':
-			if grigoryEV > 0 and grigory_barn ! daystart and hour > 8 and hour < 12: gt 'grigory', 'barn'
+			act 'Leave and get some fresh air':gt 'Gadsarai'
+		elseif findbraclet > 0 and findneck = 0:
 			*clr & cla
-			minut += 15
-			gs 'stat'
-			if vcard = 0 and vcard_trash = 0:
-				*clr & cla
-				if RAND(0,5) >= 4:
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vcards.jpg"></center>'
-					'"Hmm, what''s this?" You''ve found an unopened deck of vintage adult playing cards, still in its original cellophone wrapper.'
-					vcard = 1
-					observ_exp += 3
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
-					'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
-				end
-				act 'Leave and get some fresh air':gt 'Gadsarai'
-			elseif findvel = 0:
-				*clr & cla
-				if RAND(0,8) >= 7:
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/findbike.jpg"></center>'
-					'In the far corner of the barn you manage to find an old bicycle. It''s in surprisingly good condition. You pull it out of the barn and clean it up.'
-					findvel = 1
-					observ_exp += 3
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
-					'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
-				end
-				act 'Leave and get some fresh air':gt 'Gadsarai'
-			elseif findbag = 0 and bag = 0:
-				*clr & cla
-				if RAND(0,10) > 9:
-					findbag = 1
-					observ_exp += 3
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/pc/purses/cheap/5.jpg"></center>'
-					'In a far corner of the barn you find a hessian sack filled with mostly junk, but at the bottom you find a good quality messenger bag.'
-					cheap_purses[5] = 1
-					$currentpursetype = 'cheap'
-					currentpursenumber = 5
-					'You can use this cool looking bag as a handbag.'
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
-					'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
-				end
-				act 'Leave and get some fresh air':
-					if findbag = 1: bag = 1
-					gt 'Gadsarai'
-				end
-			elseif findbraclet = 0:
-				*clr & cla
-				if RAND(0,15) >= 14:
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/bracelet.jpg"></center>'
-					'While looking through the barn you spot a glint of metal under a pile of wood. Upon closer inspection you see a bracelet made of silver and crafted into the likeness of a snake. Strange, but cool that you would find something this valuable in the barn.'
-					findbraclet = 1
-					observ_exp += 3
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
-					'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
-				end
-				act 'Leave and get some fresh air':gt 'Gadsarai'
-			elseif findbraclet > 0 and findneck = 0:
-				*clr & cla
-				if RAND(0,20) >= 19:
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/necklace.jpg"></center>'
-					if altQS = 1:
-						'While looking through the barn your foot goes through a rotten floorboard. You suddenly feel the presence of something magical under the floor. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The feeling of power is coming from within the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You feel the power coming from the necklace, but it doesn''t feel like any power you have ever felt.'
-					else
-						'While looking through the barn your foot goes through a rotten floorboard and gets stuck. As you work your foot free, you glimpse something underneath the floor - a box or something. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The exotic look of the box gives you gooseflesh and you find yourself holding your breath as you prepare to open the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You let your breath out slowly as you tilt the necklace from side to side, watching the light sparkle as it is reflected by the facets on the deep red rubies. You cannot begin to guess what this necklace must be worth.'
-					end
-					findneck = 1
-					observ_exp += 3
+			if rand(0,20) >= 19:
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/necklace.jpg"></center>'
+				if altQS = 1:
+					'While looking through the barn your foot goes through a rotten floorboard. You suddenly feel the presence of something magical under the floor. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The feeling of power is coming from within the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You feel the power coming from the necklace, but it doesn''t feel like any power you have ever felt.'
 				else
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
-					'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
+					'While looking through the barn your foot goes through a rotten floorboard and gets stuck. As you work your foot free, you glimpse something underneath the floor - a box or something. You get on your belly and look through the hole in the floor. You find a small box made of a black wood. You pick up the box and see the box is covered in a strange writing and glyphs that look like serpents. The exotic look of the box gives you gooseflesh and you find yourself holding your breath as you prepare to open the box. You lift the lid of the box and see a black metal necklace that looks like a coiled snake with ruby eyes. You let your breath out slowly as you tilt the necklace from side to side, watching the light sparkle as it is reflected by the facets on the deep red rubies. You cannot begin to guess what this necklace must be worth.'
 				end
-				act 'Leave and get some fresh air':gt 'Gadsarai'
+				findneck = 1
+				observ_exp += 3
 			else
+				*clr & cla
+				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
-					'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
-				act 'Leave and get some fresh air':gt 'Gadsarai'
+				'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
 			end
+			act 'Leave and get some fresh air':gt 'Gadsarai'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/junk_barn.jpg"></center>'
+				'In the barn you find many mouldy magazines, rusty tools and equipment, toys and many dusty, yellowed books. The entire barn reeks of mould and decay.'
+			act 'Leave and get some fresh air':gt 'Gadsarai'
 		end
-
-		if vcard > 0:
-			act 'View your vintage porn cards':card_deck = 0 & gt 'card'
-		end
-		if card > 0:
-			act 'View your new porn cards':card_deck = 1 & gt 'card'
-		end
-
-		if pcs_horny >= 50:
-			act 'Masturbate':gt 'selfplay', 'start'
-		end
-
-	!! Serpent is not ready yet, so remarking out til then.
-	!!	if findneck = 1:
-	!!		act 'You hear a scrapping noice above you.':gt 'serpent'
-	!!	end
-
-	!!	if sunWeather = 1:
-	!!		if findvel = 1 and velday ! daystart:
-	!!			'You decide to spend awhile riding the <a href="exec: gt ''events'', ''cycling''">bicycle</a> around.'
-	!!		end
-	!!	end
-
-		if npc_horny['A66'] >= 20 and banditfrend >= 10:gt 'bandit'
 	end
+	
+	if vcard > 0: act 'View your vintage porn cards':card_deck = 0 & gt 'card'
+	if card > 0: act 'View your new porn cards':card_deck = 1 & gt 'card'
+
+	if pcs_horny >= 50:	act 'Masturbate':gt 'selfplay', 'start'
+
+!! Serpent is not ready yet, so remarking out til then.
+!!	if findneck = 1:
+!!		act 'You hear a scrapping noice above you.':gt 'serpent'
+!!	end
+
+!!	if sunWeather = 1:
+!!		if findvel = 1 and velday ! daystart:
+!!			'You decide to spend awhile riding the <a href="exec: gt ''events'', ''cycling''">bicycle</a> around.'
+!!		end
+!!	end
 end
 
-!125s
 if $ARGS[0] = 'boar':
 	*clr & cla
 	minut += 1
@@ -611,7 +329,7 @@ if $ARGS[0] = 'mira_dog':
 
 	'<center><H4>The barn</H4></center>'
 	'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel2.jpg"></center>'
-	'You see Mira in chains, naked, in Bandit''s dog house depicting a dog.'
+	'You see Mira in chains, naked, in the old dog house depicting a dog.'
 
 	act 'Release':
 		cla
@@ -630,20 +348,5 @@ if $ARGS[0] = 'mira_dog':
 	act 'Go':gt'Gadsarai'
 end
 
-!Maybe we will have a no-zoo switch someday, keep this for good. by illume
-! this is in memory of the untimely deceased Bandit(((
-!{
-if know_no_bandit = 0:
-	*clr & cla
-	minut += 60
-	know_no_bandit = 1
-	gs'stat'
-	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/know_no_pirat.jpg"></center>'
-	'"Where''s Bandit? The bastard probably ran away, you sadly thought, looking at an empty dog house, remembering the beloved dog fondly.'
-	act 'Continue':gt $loc, $metka
-end
-}
-!125e
-
 --- Gadsarai ---------------------------------
 

locations/Gnpc.qsrc

@@ -214,7 +214,7 @@ act 'Take a walk through the park':
 	end
 end
 
-if preg = 1 and pregtime <= 80 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] > 0 and knowpreg = 1:
+if preg = 1 and pregchem <= 1920 and npc_pregtalk[numnpc] = 0 and gnpcSex[numnpc] > 0 and knowpreg = 1:
 	if $father ! $nameBoyfrend[numnpc]:
 		$pregLie = '(Lie) '
 	else
@@ -233,7 +233,7 @@ if preg = 1 and pregtime <= 80 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] > 0
 			act 'Dump him and take the money':
 				cla
 				pcs_dom += 2
-				pregTalk[numnpc] = 1
+				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				money += 5000
 				gs 'stat'
@@ -245,7 +245,7 @@ if preg = 1 and pregtime <= 80 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] > 0
 			act 'Dump him and throw the money in his face':
 				cla
 				pcs_dom += 5
-				pregTalk[numnpc] = 1
+				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
 				'You furiously scream at him that you never want to see him again and throw the money in his face before storming off.'
@@ -259,7 +259,7 @@ if preg = 1 and pregtime <= 80 and pregTalk[numnpc] = 0 and gnpcSex[numnpc] > 0
 			act 'Dump him':
 				cla
 				pcs_dom += 5
-				pregTalk[numnpc] = 1
+				npc_pregtalk[numnpc] = 1
 				otnBoyFrend[numnpc] = 0
 				gs 'stat'
 				'You furiously scream at him that you never want to see him again and storm off.'

locations/HotelHole.qsrc

@@ -9,6 +9,7 @@ $menu_arg = ''
 menu_off = 0
 $location_type = 'public_indoors'
 
+$receptionName = 'Elisabet'
 gs'stat'
 
 ! use this args if  some event  transfers you directly to the lobby  and it is can happen  between  midnight and 01:00.
@@ -22,7 +23,7 @@ if hour = 0 and $prevloc ! 'HotelRoom':
 		'This is strange, you think to yourself. The lobby is supposed to be open 24/7.'
 	end
 	if resepseen = 1:
-		'"Damn it, I guess if I am going to catch the desk girl in the act, I need to find another way to enter the lobby at midnight."'
+		'"Damn it, I guess if I am going to catch <<$receptionName>> in the act, I need to find another way to enter the lobby at midnight."'
 		hotresepQW = 2
 		observ_exp += 3
 	end
@@ -37,7 +38,7 @@ if hour = 0 and $prevloc = 'HotelRoom':
 		observ_exp += 3
 		gs 'stat'
 		'You creep down to the lobby, and then around the corner, carefully, you sneak a glimpse.'
-        'You spy the desk girl; yep, you nod, she''s already showing herself off to the cameras.'
+        'You spy <<$receptionName>>. Yep, you nod, she''s already showing herself off to the cameras.'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/sex/resep_event1.jpg"></center>'
 		'She flashes her breasts beneath a devilish smile.'
 		'She flaps her skirt up and down, and there''s her shaved vagina, now-you-see-it, now-you-don''t.'
@@ -106,7 +107,11 @@ end
 :skipresepevent
 '<center><H4>Pavlovsk hotel</H4></center>'
 '<center><img <<$set_imgh>> src="images/locations/pavlovsk/hotel/hotel.hole.jpg"></center>'
-'As you enter the Pavlovsk hotel you''re always surprised by how fancy it looks on the inside, given the shabby exterior. You can approach the <a href="exec:minut += 1 & gt ''hotel_resep''">reception desk</a> of the hotel where a cute brunette is currently manning the desk, she gives you a friendly nod when you get into her sight range.'
+if pavHotelMaid = 0:
+	'As you enter the Pavlovsk hotel you''re always surprised by how fancy it looks on the inside, given the shabby exterior. You can approach the <a href="exec:minut += 1 & gt ''hotel_resep''">reception desk</a> of the hotel where a cute brunette is currently manning the desk, she gives you a friendly nod when you get into her sight range.'
+else
+	'As you enter the Pavlovsk hotel you''re always surprised by how fancy it looks on the inside, given the shabby exterior. You can approach the <a href="exec:minut += 1 & gt ''hotel_resep''">reception desk</a> of the hotel where <<$receptionName>> is currently manning the desk, she gives you a friendly nod when you get into her sight range.'
+end
 
 if hour >= 12 and hour < 20 and proshotelopen = 1: '<a href="exec:gt ''HotelHole'',''Pavlin''">Pavlin</a> is sitting in the lobby looking around for fresh prey.'
 
@@ -120,7 +125,12 @@ if maidqw >= 1 and hour >= 16 and hour < 17:
 	act'<b>Work as a maid</b>':
 		*clr & cla
 		gs'stat'
-		'You report in for work at the front desk. The brunette manning the desk quickly makes sure no customers will need her for a minute, and then guides you to the locker room and gives you a maid uniform. She gives you a friendly smile: "You need to wear this, company policy. You can put your own clothes in a locker for safekeeping while you work. I have to get back to the desk now before I''m missed, good luck today!"'
+		if pavHotelMaid = 0:
+			pavHotelMaid = 1
+			'You report in for work at the front desk. The brunette manning the desk quickly makes sure no customers will need her for a minute. "Come with me, I''ll show you to the locker room." She says as she stands up and walks into a room behind the desk. "I didn''t catch your name last time. I''m <<$receptionName>>." She says as she opens a wardrobe and pulls out a maid uniform. "My name is <<$pcs_nickname>>." You tell her as you watch her closely. "This should be about your size. If it doesn''t fit just grab another from here. We have a few different sizes." She gives you a friendly smile: "You need to wear it while you work, company policy. You can put your own clothes in a locker for safekeeping. I have to get back to the desk now before I''m missed, good luck today!"'
+		else
+			'You report in for work at the front desk. <<$receptionName>> smiles and tells you: "Go and get changed <<$pcs_nickname>>. I''ll put your name on the worksheet for you."'
+		end
 		act'Change into the maid costume':
 			*clr & cla
 			maid_cloth = 1
@@ -174,14 +184,33 @@ if $ARGS[0] = 'Pavlin' :
 	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-	'Varsonofy Krestovoz is a small time gangster who makes his money by whoring out vulnerable women in Pavlovsk. Few people know his name as he is usually called Pavlin (the Peacock).'
-	if npc_rel['A217'] = -1:'Pavlin killed your unborn baby, you truly hate him. You should go find some help if you don''t want these negative feelings to completely take over your personality.'
-	if npc_rel['A217']<20 and npc_rel['A217'] => 0:'You and Pavlin have a dysfunctional relation. You work for him but you are just one of many girls.'
-	if npc_rel['A217']>=20 and npc_rel['A217']<40:'You understand Pavlin a little better. You know he has an extreme violent side but you have figured out some strategies to avoid these outbursts.'
-	if npc_rel['A217']>=40 and npc_rel['A217']<60:'You and Pavlin have a normal relationship.'
-	if npc_rel['A217']>=60 and npc_rel['A217']<80:'You and Pavlin have a good relationship.'
-	if npc_rel['A217']>=80:'You and Pavlin have a great relationship.'
+	'Varsonofy Krestovoz is a small time gangster who makes his money by whoring out vulnerable women in Pavlovsk. Few people know his name as he is usually called <<$npc_nickname[''A217'']>> (the Peacock).'
+	if npc_rel['A217'] = -1:'<<$npc_nickname[''A217'']>> killed your unborn baby, you truly hate him. You should go find some help if you don''t want these negative feelings to completely take over your personality.'
+	if npc_rel['A217']<20 and npc_rel['A217'] => 0:'You and <<$npc_nickname[''A217'']>> have a dysfunctional relation. You work for him but you are just one of many girls.'
+	if npc_rel['A217']>=20 and npc_rel['A217']<40:'You understand <<$npc_nickname[''A217'']>> a little better. You know he has an extreme violent side but you have figured out some strategies to avoid these outbursts.'
+	if npc_rel['A217']>=40 and npc_rel['A217']<60:'You and <<$npc_nickname[''A217'']>> have a normal relationship.'
+	if npc_rel['A217']>=60 and npc_rel['A217']<80:'You and <<$npc_nickname[''A217'']>> have a good relationship.'
+	if npc_rel['A217']>=80:'You and <<$npc_nickname[''A217'']>> have a great relationship.'
 	act 'Move away':gt'HotelHole','skip_resepevent'
+	if firstfemalecust = 1:
+		if pavprosnofemales = 1:
+			act 'Start taking female customers':
+				cla
+				pavprosnofemales = 0
+				'"<<$npc_nickname[''A217'']>> I wanted to talk to you about... I want to start taking on female customers."'
+				'"Sure, I can set those up, they usually pay better anyway."'
+				act 'Finish':gt 'HotelHole','Pavlin'
+			end
+		else
+			act 'Stop taking female customers':
+				cla
+				pavprosnofemales = 0
+				'"<<$npc_nickname[''A217'']>> I wanted to talk to you about... I want to stop taking on female customers."'
+				'"Fine, if you really don''t want to do it I''ll only get you male customers."'
+				act 'Finish':gt 'HotelHole','Pavlin'
+			end
+		end
+	end
 	if npc_rel['A217'] >=40:
 		act 'Have a chat':
 				*clr & cla
@@ -192,47 +221,47 @@ if $ARGS[0] = 'Pavlin' :
 				talkrand = RAND(0,6)
 				gs 'stat'
 				if talkrand = 0:
-					'Pavlin complains to you how hard it is to find decent girls in a hellhole like Pavlovsk.'
+					'<<$npc_nickname[''A217'']>> complains to you how hard it is to find decent girls in a hellhole like Pavlovsk.'
 					'...'
 					'"Actually <<$pcs_firstname>>, you are the first decent girl to work for me since I set up shop here 2 years a go."'
 					'You smile and thank him for the compliment.'
 				elseif talkrand = 1:
-					'You tell Pavlin you love going to the city and spend your money at the shopping center.'
+					'You tell <<$npc_nickname[''A217'']>> you love going to the city and spend your money at the shopping center.'
 					'You ask him if he wants to join you the next time you go.'
 					'"I am sorry <<$pcs_firstname>>, I can never go back to the city."'
-					'Pavlin takes a sip from his beer and suddenly he looks very depressed.'
+					'<<$npc_nickname[''A217'']>> takes a sip from his beer and suddenly he looks very depressed.'
 					'It looks like you really hit a nerve there. You wonder what that''s about.'
 				elseif talkrand = 2:
-					'Pavlin tells you a story from his childhood.'
+					'<<$npc_nickname[''A217'']>> tells you a story from his childhood.'
 					'"My father used to beat me every day. One day when I was 12 after another savage beating I asked my mother to do something about it. The bitch started giving me another beating and then locked me out in my underpants on the balcony for 2 hours."'
 					'"This was in the middle of January, so I got lucky I didn''t freeze to death that day."'
 					'It seems he had a very rough childhood.'
 				elseif talkrand = 3:
-					'Pavlin tells you a story from his childhood.'
+					'<<$npc_nickname[''A217'']>> tells you a story from his childhood.'
 					'"My father frequently brought working girls to the house for punishment. If they were lucky he just beat them up. If their mistake was worse he would involve my mother and she ..."'
 					'"Let''s just say that these girls would never go against my father''s wishes again once my mother was done with them."'
 					'"I always felt sorry for these girls at the time and did not want to watch, but they always forced me."'
 					'It seems he had a very rough childhood.'
 				elseif talkrand = 4:
-					'Pavlin tells you how he got in this business.'
+					'<<$npc_nickname[''A217'']>> tells you how he got in this business.'
 					'"I basically followed into my father''s footsteps. When I was 19 I ran my first girl on the streets of Saint Petersburg."'
 					'"Too bad she had a nasty habit of always talking back to me."'
 					'"Knocking out her teeth helped a lot with that, too bad that made her too ugly to be profitable, ha ha ha."'
-					'Pavlin let out an evil laugh, you don''t think that was a joke.'
+					'<<$npc_nickname[''A217'']>> lets out an evil laugh, you don''t think that was a joke.'
 				elseif talkrand = 5:
-					'Pavlin tells you a story from his childhood.'
+					'<<$npc_nickname[''A217'']>> tells you a story from his childhood.'
 					'"One day, when I was 6 years old I accidently broke one of my mother''s crystal figurines."'
 					'"That day she hit me over the head with her heels, you can still see the scar."'
-					'Pavlin moves his head towards you and moves his hair away. You indeed see a big scar on his scalp.'
+					'<<$npc_nickname[''A217'']>> moves his head towards you and moves his hair away. You indeed see a big scar on his scalp.'
 					'"After that she refused to feed me for 2 weeks, so I had to get by with scraps I found in the garbage."'
 					'It seems he had a very rough childhood.'
 				elseif talkrand = 6:
-					'It looks like Pavlin is drunk.'
+					'It looks like <<$npc_nickname[''A217'']>> is drunk.'
 					'"You will never disobey me? right <<$pcs_firstname>> ? "'
 					'"Your face is so pretty, I really don''t want to mess that up"'
-					'"What are you saying Pavlin? stop that , you are scaring me."'
+					'"What are you saying <<$npc_nickname[''A217'']>>? stop that , you are scaring me."'
 					'"What ? I give you a compliment and you get scared. You don''t have to fear me, I wouldn''t hurt a fly."'
-					'Pavlin had too much to drink and he is only talking nonsense.'
+					'<<$npc_nickname[''A217'']>> had too much to drink and he is only talking nonsense.'
 				end
 				act 'Finish':gt 'HotelHole','Pavlin'
 		end
@@ -244,7 +273,7 @@ if $ARGS[0] = 'Pavlin' :
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
 			'<<$pcs_firstname>>, have you heard, the circus is in town.'
-			'You look at Pavlin with a surprising look. "I didn''t know you were a fan of the circus. You want to go see a show or something?"'
+			'You look at <<$npc_nickname[''A217'']>> with a surprised look. "I didn''t know you were a fan of the circus. You want to go see a show or something?"'
 			'What? No, don''t be silly girl. A circus here means at least 50 guys in town who are looking for a good time after the shows.'
 			'And sometimes even between the shows. he laughed.'
 			'I actually have 2 performers waiting on a girl right now. I called a girl but she is still 10 minutes out. They are getting restless because they need to start their next show soon. Do you think you can take them?'
@@ -259,7 +288,7 @@ if $ARGS[0] = 'Pavlin' :
 				cla
 				*nl
 				'"Ok, you can go ahead to room 312. They are expecting you"'
-				'Pavlin gives you the key for the hotel room.'
+				'<<$npc_nickname[''A217'']>> gives you the key for the hotel room.'
 				act 'Go to room 312':gt 'HotelHole','clown'
 			end
 		end
@@ -270,13 +299,13 @@ if $ARGS[0] = 'Pavlin' :
 			minut += 1
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-			'"<<$pcs_firstname>>, I got a guy who is willing to pay a LOT of money for a threesome with a set of twins. Do you happen to know a pair of twins who''d be down to make some quick cash?" Pavlin asks, looking hopeful.'
+			'"<<$pcs_firstname>>, I got a guy who is willing to pay a LOT of money for a threesome with a set of twins. Do you happen to know a pair of twins who''d be down to make some quick cash?" <<$npc_nickname[''A217'']>> asks, looking hopeful.'
 			'You think for a moment before responding. "No I don''t. However, a lot of people say my sister and I look alike. Maybe if I wear my hair like hers and we put on enough make up we could pass as twins."'
-			'"That''s a great idea! Do you think she would be willing to do this?" Pavlin asks, suddenly very excited at the prospect.'
+			'"That''s a great idea! Do you think she would be willing to do this?" <<$npc_nickname[''A217'']>> asks, suddenly very excited at the prospect.'
 			if sisterLesb < 2:
 				'"What? No, I was just saying we look alike, I wouldn''t dare propose an idea like this to her."'
-				'"THEN WHY BRING HER UP, YOU STUPID CUNT?" Pavlin''s excitement quickly dissolves to rage as he raises his hand up, ready to strike.'
-				'You brace for the hit, closing your eyes tightly. The slap never comes however, and you open your eyes to see Pavlin has backed off. You''re confused at first, but notice that the people in the lobby are looking at the two of your after his little outburst.'
+				'"THEN WHY BRING HER UP, YOU STUPID CUNT?" <<$npc_nickname[''A217'']>>''s excitement quickly dissolves to rage as he raises his hand up, ready to strike.'
+				'You brace for the hit, closing your eyes tightly. The slap never comes however, and you open your eyes to see <<$npc_nickname[''A217'']>> has backed off. You''re confused at first, but notice that the people in the lobby are looking at the two of your after his little outburst.'
 				'You quickly stand up and leave him be.'
 				*nl
 				'You probably shouldn''t bring up this topic anymore... unless you have a more positive response to this request.'
@@ -285,7 +314,7 @@ if $ARGS[0] = 'Pavlin' :
 			elseif sisterLesb => 2:
 				'You feel a tingling in your loins just thinking about your sister and, without thinking, you blurt out: "Of course she will!"'
 				'"That''s fantastic <<$pcs_firstname>>, Once you are ready bring her over and I''ll introduce you to the client."'
-				'Realizing the commitment you just made, worry begins to seep into you. You hope your sister is really up for it, because you fear how Pavlin will react if you can''t deliver.'
+				'Realizing the commitment you just made, worry begins to seep into you. You hope your sister is really up for it, because you fear how <<$npc_nickname[''A217'']>> will react if you can''t deliver.'
 				TwinQW = 1
 				TwinJourQW = 2
 				act 'Back to lobby': gt 'HotelHole'
@@ -300,7 +329,7 @@ if $ARGS[0] = 'Pavlin' :
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
 			if pavldaystart = daystart:
 				PavlinQW = 5
-				'Before you can even say one word, Pavlin is already yelling at you,'
+				'Before you can even say one word, <<$npc_nickname[''A217'']>> is already yelling at you,'
 				if pavldom = 0:
 					'"Didn''t you have enough with one black eye, do you really need another?"'
 				else
@@ -311,25 +340,25 @@ if $ARGS[0] = 'Pavlin' :
 				pavldaystart2 = daystart
 			elseif pavtalk = 0:
 				PavlinQW = 6
-				'"Pavlin I ..." you start talking but he immediately interrupts you.'
+				'"<<$npc_nickname[''A217'']>> I ..." you start talking but he immediately interrupts you.'
 				'"I hope you learned your lesson <<$pcs_firstname>>. I am sorry I had to do that but you need to understand the situation here."'
 				'You were hoping you could have an honest conversation with him about the incident but you understand now that that is not possible yet.'
 				pavtalk = 1
 				pavldaystart2 = daystart
 			elseif pavtalk = 1:
-				'"Pavlin I need..." you start talking but he immediately interrupts you.'
+				'"<<$npc_nickname[''A217'']>> I need..." you start talking but he immediately interrupts you.'
 				'"What now? Stop bothering me and go back to work."'
 				'You were hoping you could have an honest conversation with him about the incident but you understand now that that is not possible yet.'
 				pavtalk = 2
 				pavldaystart2 = daystart
 			elseif pavtalk = 2:
-				'"Pavlin I need to talk..." you start talking but he immediately interrupts you.'
+				'"<<$npc_nickname[''A217'']>> I need to talk..." you start talking but he immediately interrupts you.'
 				'"<<$pcs_firstname>>, please go back to work, I think I made myself clear."'
 				'For the first time since you met him, you can see a glimpse of insecurity in his eyes.'
 				'You might be getting through to him.'
 				pavtalk = 3
 			elseif pavtalk = 3:
-				'"Pavlin I need to talk to you about our little incident."'
+				'"<<$npc_nickname[''A217'']>> I need to talk to you about our little incident."'
 				'"<<$pcs_firstname>>, I am very sorry for my behaviour. I don''t know what came over me."'
 				'"I had a very bad day and your request was just the final drop."'
 				'"I hope you can forgive me and we can still work together."'
@@ -353,10 +382,10 @@ if $ARGS[0] = 'Pavlin' :
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
 			'"<<$pcs_firstname>>, today I received a request for a pregnant girl. A Pregnant Girl! How the hell am I going to find a girl that is pregnant and willing to do this shit." he says, shaking his head.'
-			if knowpreg = 1 and pregtime >= 150:
+			if knowpreg = 1 and pregchem >= 3600:
 				cla
-				'You feel anger towards Pavlin rising up inside you. "Do you ever pay attention to me? Can''t you see I am pregnant?" You ask, gesturing at your obviously swollen belly.'
-				'"Of course I know that!" Pavlin''s brows furrow, letting you know he''s getting mad. Butterflies flutter in your stomach, fear trying to match up with the anger.'
+				'You feel anger towards <<$npc_nickname[''A217'']>> rising up inside you. "Do you ever pay attention to me? Can''t you see I am pregnant?" You ask, gesturing at your obviously swollen belly.'
+				'"Of course I know that!" <<$npc_nickname[''A217'']>>''s brows furrow, letting you know he''s getting mad. Butterflies flutter in your stomach, fear trying to match up with the anger.'
 				'His expression softens a little before continuing. "This customer has some pretty weird requests, are you up for it?"'
 
 				act 'Not really, let''s stick with vanilla for now': gt 'HotelHole','Pavlin'
@@ -366,7 +395,7 @@ if $ARGS[0] = 'Pavlin' :
 				end
 				act '"Of course I am, for the right price..."': gt 'HotelHole','PregBDSM'
 			end
-			if knowpreg = 1 and pregtime < 150:
+			if knowpreg = 1 and pregchem < 3600:
 				cla
 				'"Actually I am pregnant but unfortunately not really showing yet."'
 				'"That''s great, Once you are showing come to me again and I''ll introduce you."'
@@ -374,7 +403,7 @@ if $ARGS[0] = 'Pavlin' :
 			end
 			if knowpreg = 0:
 				cla
-				'Pavlin looks at your body and you know what he is thinking.'
+				'<<$npc_nickname[''A217'']>> looks at your body and you know what he is thinking.'
 				'"Yeah that''s definitly tough, good luck with that." You say before quickly leaving.'
 				act 'Back to lobby': gt 'HotelHole'
 			end
@@ -389,12 +418,12 @@ if $ARGS[0] = 'PregBDSM' :
 	gs 'boyStat', $npclastgenerated
 	gs 'stat'
 	'"That shouldn''t be a problem. With what he''s willing to pay, you''ll be able to put that kid of yours through college."'
-	'Pavlin steps away to make the call and, 10 minutes later, the customer shows up.'
+	'<<$npc_nickname[''A217'']>> steps away to make the call and, 10 minutes later, the customer shows up.'
 	*nl
-	'He introduces himself as <<$boydesc>> "Very nice Pavlin. This is exactly what I was looking for." He says while hungrily eyeing your pregnant body.'
-	'Pavlin and <<$boydesc>> have a short discussion about your price.'
+	'He introduces himself as <<$boydesc>> "Very nice <<$npc_nickname[''A217'']>>. This is exactly what I was looking for." He says while hungrily eyeing your pregnant body.'
+	'<<$npc_nickname[''A217'']>> and <<$boydesc>> have a short discussion about your price.'
 	*nl
-	'Pavlin goes over to the desk girl and comes back with a key." We have full access to the hotel basement for the next 2 hours, so let''s get on with it."'
+	'<<$npc_nickname[''A217'']>> goes over to the desk girl and comes back with a key." We have full access to the hotel basement for the next 2 hours, so let''s get on with it."'
 	act 'To the Basement':
 		*clr & cla
 		gs 'arousal', 'foreplay', 5, 'rough','sub','humiliation'
@@ -402,13 +431,13 @@ if $ARGS[0] = 'PregBDSM' :
 		gs 'pain', 3, 'breasts', 'spank'
 		gs 'pain', 3, 'nipples', 'spank'
 		gs 'stat'
-		'When the three of you arrive in the basement Pavlin goes and sits himself on a stool in the corner of the room while the man takes you to a table in the center.'
+		'When the three of you arrive in the basement <<$npc_nickname[''A217'']>> goes and sits himself on a stool in the corner of the room while the man takes you to a table in the center.'
 		*nl
 		'He hands you a set of leather wrist cuffs, a matching collar, and a pair of heels.'
 		'"Undress and wear these." the man says, curtly.'
 		'While you are busy undressing and equipping your new accessories, he lays out a series of whips and crops. He turns to you and, with a happy grin, says "Please, choose one for us to enjoy."'
 		'"<<$pitfs>>Ok, this might be a little heavier than I expected.<<$pitfe>> "You think, beginning to second guess your decision.'
-		'You look at Pavlin with pleading eyes, but receive no sympathy in return. You realize it''s too late to back out now. You examine the foreign whips and choose the one you think would be the least painful; a thin one that appears light in weight, figuring that the heavier ones would cause much more pain.'
+		'You look at <<$npc_nickname[''A217'']>> with pleading eyes, but receive no sympathy in return. You realize it''s too late to back out now. You examine the foreign whips and choose the one you think would be the least painful; a thin one that appears light in weight, figuring that the heavier ones would cause much more pain.'
 		*nl
 		'<<$boydesc>> approaches you and starts caressing your swollen belly and breasts.'
 		*nl
@@ -486,9 +515,9 @@ if $ARGS[0] = 'PregBDSM' :
 				'"<<$pitfs>>No no no, not that! Anything but that!<<$pitfe>>"'
 				'You try to resist and stiffen your neck, attempting to push your head back up. The smell of your own piss wafts into your nostrils, hot and bitter.'
 				'"Now be a good little bitch and take a nice sip from your bowl," he says, holding your head in place.'
-				'You shoot a look of terror across the room to Pavlin, hoping against hope that he would stop this.'
+				'You shoot a look of terror across the room to <<$npc_nickname[''A217'']>>, hoping against hope that he would stop this.'
 				'Your heart sinks as he just gestures for you to go ahead and do your job.'
-				'"<<$pitfs>>What do I do? I can''t do this, but if I stop now I won''t get any money and Pavlin will be furious! Why did I put myself in this situation?<<$pitfe>>" Your breathing becomes ragged as the panic reaches a new peak in your chest.'
+				'"<<$pitfs>>What do I do? I can''t do this, but if I stop now I won''t get any money and <<$npc_nickname[''A217'']>> will be furious! Why did I put myself in this situation?<<$pitfe>>" Your breathing becomes ragged as the panic reaches a new peak in your chest.'
 				act 'Swallow your last bit of pride and take a sip':
 					*clr & cla
 					pcs_hydra += 20
@@ -521,7 +550,7 @@ if $ARGS[0] = 'PregBDSM' :
 						*clr & cla
 						*nl
 						'"Wow I can''t believe you actually did that shit. It was disgusting. You really are the best girl I''ve got."'
-						'Here is your reward. You certainly deserve it. Pavlin hands you a huge pile of cash.'
+						'Here is your reward. You certainly deserve it. <<$npc_nickname[''A217'']>> hands you a huge pile of cash.'
 						'You start counting it and find that it is almost 28,000 <b>₽</b>.'
 						'"<<$pitfs>>This is definitely a large amount, but the things I had to do for this, was it really worth it?<<$pitfe>>" You contemplate what you''ve done and how low it made you feel. You were treated like a dog, a whipping post, and a piss slave. You feel a deep sense of shame as you tuck the money into your wallet and move on.'
 						money += 28000
@@ -539,22 +568,22 @@ if $ARGS[0] = 'PregBDSM' :
 					gs 'pain', 9, 'tummy', 'kick'
 					gs 'stat'
 					'You start shaking your head violently and wrestle yourself free from his grip with all your strength. You roll away and break down crying on the floor.'
-					'"What the hell Pavlin? You told me she was up for it. This is the last time I try one of your girls" <<$boydesc>> quickly zips his cock away, collects his stuff, and leaves the room in a huff of anger.'
+					'"What the hell <<$npc_nickname[''A217'']>>? You told me she was up for it. This is the last time I try one of your girls" <<$boydesc>> quickly zips his cock away, collects his stuff, and leaves the room in a huff of anger.'
 					*nl
 					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin_violent4.jpg"></center>'
 					*nl
-					'You look up from the floor and you no longer see Pavlin''s eyes; you see a monster. You can practically feel the rage radiating from him as he marches towards you, fists clenched.'
-					'You scramble to your feet as quickly as you''re able and try to reason with him. "Pavlin, I''m so sorr-" You can''t even complete one sentence before you feel your nose explode under his fist.'
+					'You look up from the floor and you no longer see <<$npc_nickname[''A217'']>>''s eyes; you see a monster. You can practically feel the rage radiating from him as he marches towards you, fists clenched.'
+					'You scramble to your feet as quickly as you''re able and try to reason with him. "<<$npc_nickname[''A217'']>>, I''m so sorr-" You can''t even complete one sentence before you feel your nose explode under his fist.'
 					'"You fucking CUNT! Do you know how much money you just cost me?!?!" He screams!'
 					'You feel blood pouring from your nose and down your face. The metallic taste is bitter as it pools inside mouth. You attempt to shake the dizziness from your head, but a second punch slams into your jaw.'
 					'"After everything I''ve done for you, this is how you repay me?!?"'
-					'You stumble back and look at Pavlin with watery eyes. You see his clenched hand rise again, so you cover your head for protection and close your eyes, bracing for impact.'
+					'You stumble back and look at <<$npc_nickname[''A217'']>> with watery eyes. You see his clenched hand rise again, so you cover your head for protection and close your eyes, bracing for impact.'
 					*nl
-					'All the breath leaves your body as Pavlin buries his fist into your pregnant belly. Your knees turn to jelly as you fall to the ground, now laying on your side. You feel a sickly, twisting pain in your stomach and everything inside you feels wrong.' 
+					'All the breath leaves your body as <<$npc_nickname[''A217'']>> buries his fist into your pregnant belly. Your knees turn to jelly as you fall to the ground, now laying on your side. You feel a sickly, twisting pain in your stomach and everything inside you feels wrong.' 
 					'"<<$pitfs>>No! He has to stop! My baby...<<$pitfe>>" Your motherly instict cries out to you.'
 					'The tip of the horrible bastard''s steel toe boot slams into your swollen belly again and again. You try to cover your womb with your arms as the kicking assault continues, but the boot still manages to make it through your desperate defense.'
 					*nl
-					'<<$pitfs>>I have to make him stop, I have to! <<$pitfe>>"Stop Pavlin! Please! My baby..." you beg and look up at him just in time to see the sole of his boot racing down towards your face...'
+					'<<$pitfs>>I have to make him stop, I have to! <<$pitfe>>"Stop <<$npc_nickname[''A217'']>>! Please! My baby..." you beg and look up at him just in time to see the sole of his boot racing down towards your face...'
 					act 'Everything goes black':
 						*clr & cla
 						fcolor = rgb(255, 255, 255)
@@ -588,9 +617,9 @@ if $ARGS[0] = 'PregBDSM' :
 									'The nurse turns around, slightly startled, and says, "Oh you are awake. Just one minute, I will get the doctor for you." The nurse quickly exits the room.'
 									pregtime = 0
 									pregtalk = 0
-									pregTalkPC = 0
-									pregTalkNat = 0
-									pregTalkbrother = 0
+									pcs_pregtalk = 0
+									npc_pregtalk['A16'] = 0
+									npc_pregtalk['A34'] = 0
 									preg = 0
 									abortionbirthdate = daystart
 									cycle = 4
@@ -692,20 +721,20 @@ if $ARGS[0] = 'Twins' :
 	minut += 20
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-	'"Hi Pavlin, this is my sister, Anya."'
-	'Pavlin looks at the two of you from top to bottom with analytical eyes. Finally, he cracks a smile and starts laughing.'
+	'"Hi <<$npc_nickname[''A217'']>>, this is my sister, Anya."'
+	'<<$npc_nickname[''A217'']>> looks at the two of you from top to bottom with analytical eyes. Finally, he cracks a smile and starts laughing.'
 	'"Well, well, you weren''t kidding. You two look exactly alike. OK, let me call the client."'
-	'He steps away to make a quick phone call. You turn and smile at your sister, excitedly. Anya smiles back, but her grins seems forced and you can tell that she''s nervous. "Lighten up, sis. We''re just gonna go get dicked down and we''ll walk away paid. It''ll be fun!" You say, trying to reassure her while praying that she won''t back out. You hate to think how Pavlin would react if you cancelled at this stage.'
+	'He steps away to make a quick phone call. You turn and smile at your sister, excitedly. Anya smiles back, but her grins seems forced and you can tell that she''s nervous. "Lighten up, sis. We''re just gonna go get dicked down and we''ll walk away paid. It''ll be fun!" You say, trying to reassure her while praying that she won''t back out. You hate to think how <<$npc_firstname[''A217'']>> would react if you cancelled at this stage.'
 	'Anya''s smile becomes more genuine seeing your excitement. "Yeah, I know. I''m just a little nervous, but I''ll be fine. I promise." You sigh with relief.'
 	*nl
-	'Pavlin returns and ushers you both to his car.'
+	'<<$npc_nickname[''A217'']>> returns and ushers you both to his car.'
 	*nl
 	'He drives you to a nice house at the outskirts of town.'
 	act 'Go meet the client':
 		*clr & cla
 		gs 'npcgeneratec', 0
 		gs 'boyStat', $npclastgenerated
-		'Pavlin drops you off and tells you he will come back to pick you up in 1 hour.'
+		'<<$npc_nickname[''A217'']>> drops you off and tells you he will come back to pick you up in 1 hour.'
 		'You walk hand-in-hand with your sister to the door, practically dragging her alongside you, before ringing the bell.'
 		'You can see your sister is still very nervous, so you give her a little peck on the cheek and tell her, "Don''t worry, everything is going to be fine. I''ll try to keep his attention mostly on me, if you''re scared."'
 		'Before Anya can respond a man opens the door and invites you in.'
@@ -810,8 +839,8 @@ if $ARGS[0] = 'Twins' :
 								*nl
 								'"Since your sister was a real champ, taking it in the ass and all that, you can be on cleaning duty." <<$boydesc>> says as he pushes his cum-soaked dick between your sibling''s lips.'
 								'Anya tries to protest but it''s too late; the dick enters her mouth before any words leave it. She resigns herself to the task and uses her tongue to thoroughly clean the cock, whimpering in disapproval. You can''t help but snicker at the idea of her being forced to taste you ass on this stranger''s rod. Anya shoots you an angry look from the side.'
-								'Suddenly you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and Pavlin has arrived.'
-								'Not wanting to keep Pavlin waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
+								'Suddenly you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and <<$npc_nickname[''A217'']>> has arrived.'
+								'Not wanting to keep <<$npc_nickname[''A217'']>> waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
 								act 'Pavlin takes you home':gt 'HotelHole','twinhome'
 							end
 						end
@@ -846,8 +875,8 @@ if $ARGS[0] = 'Twins' :
 							'"Since your sister was a real champ by taking it in the ass, you can be on cleaning duty." <<$boydesc>> says while pushing his cum-soaked dick between your lips.'
 							'You try to protest but it''s too late; the dick enters your mouth before any words leave it. You submit and use your tongue to thoroughly clean his cock, whimpering in disapproval. You hear Anya snicker at the idea of you being forced to taste her ass on this stranger''s rod. You shoot her an angry look from the side.'
 							*nl
-							'Suddenly, you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and Pavlin has arrived.'
-							'Not wanting to keep Pavlin waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
+							'Suddenly, you hear someone honking a horn outside. You look at the clock and realize the whole hour has passed and <<$npc_nickname[''A217'']>> has arrived.'
+							'Not wanting to keep <<$npc_nickname[''A217'']>> waiting, you and your sister quickly put on your clothes, say goodbye to <<$boydesc>>, and leave the house.'
 							act 'Pavlin takes you home':gt 'HotelHole','twinhome'
 						end
 					end
@@ -860,13 +889,13 @@ end
 if $ARGS[0] = 'twinhome':
 	*clr & cla
 	gs 'cum_call','face', $npclastgenerated
-	'You both jump in the car and Pavlin drives away.'
+	'You both jump in the car and <<$npc_nickname[''A217'']>> drives away.'
 	'"Thanks for this experience <<$pcs_nickname>>, you really are the greatest sister in the world!" Anya says before grabbing you and planting a passionate kiss on your still sticky lips.'
 	'After a while, you reach the apartment complex.'
-	'"Great job girls. Anya, if you ever want to come work for me, like your sister, feel free to drop by the hotel." Pavlin offers.'
+	'"Great job girls. Anya, if you ever want to come work for me, like your sister, feel free to drop by the hotel." <<$npc_nickname[''A217'']>> offers.'
 	'"Ha, ha, no thanks. I am not a who..." Anya looks at you and stops herself before she finishes the sentence.'
 	'"Hmm, no, not interested, thanks." She says while quickly leaving the car.'
-	'"Ha ha ha! Luckily there is still one actual whore in the family!" Pavlin can''t stop laughing as he hands you 10,000 <b>₽</b>.'
+	'"Ha ha ha! Luckily there is still one actual whore in the family!" <<$npc_nickname[''A217'']>> can''t stop laughing as he hands you 10,000 <b>₽</b>.'
 	'You leave the car, face burning red in embarrassment, and go inside to your room.'
 	'You were planning to divide the money evenly with your sister, but now that you know what she really thinks of you, you hand her 1,000 <b>₽</b>. "Well, since you''re not a whore, I guess you don''t deserve a whore''s pay." You say snidely. You march back out of the room angrily before Anya has a chance to respond.'
 	gs 'arousal','end'
@@ -1014,13 +1043,13 @@ if $ARGS[0] = 'clown':
 						'Blinded by the pie you feel the clowns grabbing you by the arms and they push you out of the room.'
 						'They throw your clothes at you and Popav says: "Maybe next time you will laugh at our jokes and you will have a better time."'
 						'You start rubbing your face, cleaning off the pie when you realize you are standing butt naked in the hallway.'
-						'You quickly put on your clothes and go to the bar to meet Pavlin.'
+						'You quickly put on your clothes and go to the bar to meet <<$npc_nickname[''A217'']>>.'
 						act 'Go to the bar':
 							*clr & cla
 							money += 2000
 							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/pavlin/pavlin.jpg"></center>'
-							'You see Pavlin in his usual corner booth and go over to him.'
+							'You see <<$npc_nickname[''A217'']>> in his usual corner booth and go over to him.'
 							'When he notices your face full of pie he starts laughing.'
 							'Ha ha ha, it looks like you had a good time <<$pcs_firstname>>.'
 							'Not at all, this was one of the weirdest things I ever encountered in my life.'

locations/HunterLoveSex.qsrc

@@ -1,4640 +0,0 @@
-# hunterLoveSex
-
-if $ARGS[0] = 'din_mesec':
-	if klismaday ! daystart:
-		'<<$boydesc>>: Damn, they weren''t lying about that body of yours.'
-		'Don''t worry, we were only told good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-		'Oh, anal won''t work for me today <<$boydesc>>, I''m not quite ready...if you know what I mean...'
-		'I understand, says <<$boydesc>>. -  Okay, next time, come with a clean ass!'
-	else
-		'<<$boydesc>>: Damn, they weren''t lying about that body of yours.'
-		'Don''t worry, we were only told good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-		'"Let''s not rush things too fast", you say.'
-	end
-	xgt 'hunterLoveSex', 'din_hunters_bj'
-end &! --- din_mesec ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH1':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus1.mp4"></video></center>'
-	*pl
-	'You glide your tongue over the head of his member, gently flicking and poking at his urethra.'
-	if harakBoyH = 2:'<<$boydesc>> looks down at you: -<<$pcs_nickname>>, what are you doing, stop it, I''m fucking going to cum from this already.'
-	if harakBoyH < 2:'<<$boydesc>> looks down at you: -<<$pcs_nickname>>, what are you doing, stop it, I''m going to shoot my load already.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH1'
-end &! --- din_hunters_bj_bonusH1 ---
-
-if $ARGS[0] = 'din_hunters_bjH1':
-	hunters_bj_times += 1
-	if pirsA > 0 and pirsA < 10000:
-		$textsexkotov = 'flick your tongue over the tip of his cock, feeling it lengthen and harden from your ministrations'
-	else
-		$textsexkotov = 'lick cock head with tongue'
-	end
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj1'+rand(0,3)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You <<$textsexkotov>>'
-	'Gently and quickly slid the tip of your tongue over the head of the cock, playing with the opening.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'<a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH1''">Shove</a> the tip of the tongue in the hole.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'He''s had enough of your foreplay, the guy asks you...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">bend over</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times >= 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bjH1 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH2':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus2.mp4"></video></center>'
-	*pl
-	'He shivers slightly as you gently bite the head of his cock with your pearly white teeth.'
-	if harakBoyH = 2:'-Hey, fuck, <<$pcs_nickname>>, are you mistaking my dick for a banana? Cut that shit out!'
-	if harakBoyH < 2:'-Be careful <<$pcs_nickname>>, stop joking around with that thing.'
-	'You smile and look at him.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH2'
-end &! --- din_hunters_bj_bonusH2 ---
-
-if $ARGS[0] = 'din_hunters_bjH2':
-	hunters_bj_times += 1
-	if pirsA > 0 and pirsA < 10000:
-		$textsexkotov = 'wrapping your lips around his cock head, you massage his shaft with the barbell in your tongue. You love the feeling of his thick member reacting to your cock sucking skills.'
-	else
-		$textsexkotov = 'smack your lips as you suck on his cockhead'
-	end
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj2'+rand(0,6)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You <<$textsexkotov>>, and tightly clench your <<$liptalk>> '
-	'The tenderness of your lips is driving him crazy'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'You try slightly <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH2''">biting</a> the red head of his throbbing member'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">Bend</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times >= 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bjH2 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH3':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus3.mp4"></video></center>'
-	*pl
-	'Looking into the eyes of your boyfriend, you use your tongue to tease one of the most erogenous zones of his member.'
-	'-Class <<$pcs_nickname>>, you know how to make me even harder.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH3'
-end &! --- din_hunters_bj_bonusH3 ---
-
-if $ARGS[0] = 'din_hunters_bjH3':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj3'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You cover his cock with sweet kisses, gently touching your <<$liptalk>>'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'You slightly <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH3''"> tease</a> his member'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">bend over</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bjH3 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH4':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus4.mp4"></video></center>'
-	*pl
-	'Grasping the base of his penis, you do as he asks, slapping his cock against your cheeks.'
-	if harakBoyH = 2:'-Oh yeah, you are my little submissive bitch, get down on that dick honey.'
-	if harakBoyH = 0:'-Oh yeah, you know what I like, go ahead honey.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH4'
-end &! --- din_hunters_bj_bonusH4 ---
-
-if $ARGS[0] = 'din_hunters_bjH4':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj4'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You lightly grasp his member with your hand and pull back his foreskin, exposing the shiny purple head of his cock.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'<<$boydesc>> asks you <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH4''">to slap</a> his cock on your cheek.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">bend over</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bjH6'
-
-	if h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-		act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bjH6'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bjH4 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH6':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus6.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> slaps his member on your face.'
-	if harakBoyH > 0:'-Bad girl, now daddy will punish you.'
-	if harakBoyH = 0:'-You are a perfect little slut, he says with a smile.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH6'
-end &! --- din_hunters_bj_bonusH6 ---
-
-if $ARGS[0] = 'din_hunters_bjH6':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj6'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'Grasping his thick cock in your hands, you begin to stroke it confidently watching his reaction.'
-	if harakBoyH > 0:'-Well,<<$pcs_nickname>>, I can jerk myself off, but lets see what sort of skills you have.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if harakBoyH = 0:'-Come on,<<$pcs_nickname>>, show me what you can do!   <<$boydesc>> says, gazing deep into your eyes.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'You stick out your tongue and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH6''">lick</a> his hot cockhead.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">bend over</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h = 3 and hunters_bj_times >= 3:
-		act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface3'
-	end
-end &! --- din_hunters_bjH6 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH7':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus11.mp4"></video></center>'
-	*pl
-	'You take his cock into your mouth, your cheeks bulging from his size. <<$boydesc>> begins to roughly fuck you in this position, stretching your mouth to the extreme.'
-	'-Oh yeah, baby, just take it for a little while, your pretty face looks so fucking sexy like that.'
-	gs 'arousal', 'bj', 5, 'sub', 'rough'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH7'
-end &! --- din_hunters_bj_bonusH7 ---
-
-if $ARGS[0] = 'din_hunters_bjH7':
-	minut += 5
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj11'+rand(0,4)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You grab the base of his penis and begin to suck greedily. His large cock does not fit completely in your little mouth and you can only accomodate half of his total length. Your hand glides up and down his thick shaft as you do your best to swallow more of his meaty cock.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if hunters_bj_times < 3:'You take his cock in your <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH7''">mouth</a> and suck on his cockhead.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">bend over</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-	 i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bjH7 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonusH8':
-	pcs_throat += 1
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/kotovbjbonus12.mp4"></video></center>'
-	*pl
-	'You try to take his cock even deeper, but, unaccustomed to deepthroating, you gag and almost puked all over him.'
-	if harakBoyH = 2:' -Fuck, fucking<<$pcs_nickname>>, if you are not able to take it all, work on it at home with a banana, and not on my cock.'
-	if harakBoyH = 0:' -Don''t worry <<$pcs_nickname>>, maybe you''ll be able to take all of it next time.'
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bjH8'
-end &! --- din_hunters_bj_bonusH8 ---
-
-if $ARGS[0] = 'din_hunters_bjH8':
-	minut += 5
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj12'+rand(0,2)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You start sucking his cock without touching it with your hands, thinking he''ll enjoy that more. Unfortunately his dick doesn''t fit all the way in your mouth, and you''re only able to swallow half of his length.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if hunters_bj_times < 3 and pcs_throat <= 15:'Try <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonusH8''">swallowing</a> more of it.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,4)
-		if k = 1 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_analH''">lie on your back</a>.'
-		if k = 2 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_analH''">climb on top of me</a>.'
-		if k = 3 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_analH''">bend over</a>.'
-		if k = 4 and klismaday = daystart: 'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_analH''">lie on your stomach</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	gs 'stat'
-	if hunters_bj_times < 3:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday = daystart:
-		i = rand(1,4)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-		if i = 3: act 'Bend':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-
-	elseif h < 3 and hunters_bj_times >= 3 and klismaday ! daystart:
-		i = rand(1,2)
-		if bj <= 10: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 1: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bjH7'
-		if bj > 10 and i = 2: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bjH8'
-
-	elseif h = 3 and hunters_bj_times >= 3:
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-
-	end
-end &! --- din_hunters_bjH8 ---
-
-if $ARGS[0] = 'din_hunters_bj':
-	act 'Kneel':
-		*clr & cla
-		bja += 1
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj'+rand(0,5)+'.mp4"></video></center>'
-
-		'You kneel down in front of him. He looks at you, waiting to see what you''ll do. You don''t make him wait long...'
-		gs 'arousal', 'bj', 5, 'sub'
-		gs 'stat'
-		i = rand(1,4)
-		if bj > 10: act 'Suck on the head':gt 'hunterLoveSex', 'din_hunters_bjH2'
-		if bj > 5 and bj <= 10: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bjH1'
-		if bj > 2 and bj <= 5: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bjH3'
-		if bj <= 2: act 'Caress his head with your hand':gt 'hunterLoveSex', 'din_hunters_bjH4'
-	end
-end &! --- din_hunters_bj ---
-
-
-if $ARGS[0] = 'din_hunters_sex_bell_analH':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/facedown/kotovsexanal20.mp4"></video></center>'
-	*pl
-	'After making you lie flat on your belly, he begins to carress your ass. '
-	gs 'arousal', 'anal', 5, 'sub'
-	*pl
-	i = rand(1,2)
-	j = rand(1,3)
-	h = rand(1,2)
-	gs 'stat'
-	if h = 1:'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	if h = 2:'Have you had enough of this position he asks you...'
-	if h = 1 and i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if h = 1 and i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum5'
-	if h = 2 and j = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-	if h = 2 and j = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-	if h = 2 and j = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-end &! --- din_hunters_sex_bell_analH ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_analH':
-	gs 'stat'
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal3'+rand(0,4)+'.mp4"></video></center>'
-	*pl
-	'He lies back and pulls you on top of him, his rock hard cock rubbing against you as he does. '
-	gs 'arousal', 'anal', 5, 'sub'
-	gs 'stat'
-	*pl
-	i = rand(1,2)
-	j = rand(1,3)
-	h = rand(1,2)
-	if h = 1:'Suddenly <<$boydesc>> begins to move faster and your realize that he is already on edge and ready...'
-	if h = 2:'Have you had enough of this position he asks you...'
-	if h = 1 and i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if h = 1 and i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-	if h = 2 and j = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-	if h = 2 and j = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-	if h = 2 and j = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-end &! --- din_hunters_sex_cow_analH ---
-
-if $ARGS[0] = 'din_hunters_sex_dog_analH':
-	minut += 5
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/doggy/kotovsexanal1'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	'He puts you on all fours and begins to caress your ass. '
-	gs 'arousal', 'anal', 5, 'sub'
-	gs 'stat'
-	*pl
-	i = rand(1,2)
-	j = rand(1,3)
-	h = rand(1,2)
-	if h = 1:'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	if h = 2:'Have you had enough of this position he asks you...'
-	if h = 1 and i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if h = 1 and i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum3'
-	if h = 2 and j = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary_analH'
-	if h = 2 and j = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-	if h = 2 and j = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-end &! --- din_hunters_sex_dog_analH ---
-
-if $ARGS[0] = 'din_hunters_sex_misionary_analH':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/mis/kotovsexanal'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	'He gently lays you down on your back and turns his attention to your ass. '
-	gs 'arousal', 'anal', 5, 'sub'
-	gs 'stat'
-	*pl
-	i = rand(1,2)
-	j = rand(1,3)
-	h = rand(1,2)
-	if h = 1:'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	if h = 2:'Have you had enough of this position he asks you...'
-	if h = 1 and i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if h = 1 and i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum2'
-	if h = 2 and j = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow_analH'
-	if h = 2 and j = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog_analH'
-	if h = 2 and j = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell_analH'
-end &! --- din_hunters_sex_misionary_analH ---
-
-!69
-if $ARGS[0] = 'din_hunters_sex_cumface7':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'mouth', $boy, 1
-	gs 'cum_call', 'face', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf70.mp4"></video></center>'
-	*pl
-	'You feel his member begin to throb in your mouth as it unleashes a torrent of hot, tart spunk down your throat.'
-	if harakBoyH < 2: '-Sorry <<$pcs_nickname>>, I couldn''t hold  back any longer.'
-	if silavag = 0 and dikos = 0:'All <<$pcs_nickname>> hare. I can''t.'
-	if silavag = 1 and dikos = 1:'All <<$pcs_nickname>>. I can''t.'
-	if silavag = 2 and dikos = 2:'All <<$pcs_nickname>>, enough. I can''t.'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!".'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cumface7 ---
-!in the throat
-if $ARGS[0] = 'din_hunters_sex_cumface6':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'mouth', $boy, 1
-	swallow += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf60.mp4"></video></center>'
-	*pl
-	'You feel his cock start to throb in your mouth as it unleashes a torrent of spunk. Your mouth can''t possibly accomodate his massive load and your quickly gulp it down as fast as you can.'
-	if harakBoyH = 2: '-Insatiable slut, here''s what you''ve been missing all day.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cumface6 ---
-
-!during titfuck
-if $ARGS[0] = 'din_hunters_sex_cumface5':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'face', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf50.mp4"></video></center>'
-	*pl
-	'His powerful jet of cum hits you on the face chin. It slowly drips onto your tits, leaving them nicely glazed with his fresh load.'
-	if harakBoyH = 2: '-<<$pcs_nickname>>, just dig your kueng Boobs.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cumface5 ---
-
-!on the chest
-if $ARGS[0] = 'din_hunters_sex_cumface4':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'stomach', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf40.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> cum is on your chest. Warm droplets flow down to your stomach. You smear the sticky cum all over your body, relishing the feeling.'
-	if harakBoyH = 2: '-<<$pcs_nickname>>, its supposed to help your tits grow. Do you want to be my Busty beauty?'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cumface4 ---
-
-!from Masturbation
-if $ARGS[0] = 'din_hunters_sex_cumface3':
-	minut += 5
-	pcs_sweat += 10
-	hja += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf30.mp4"></video></center>'
-	*pl
-	'You feel his hard dick begin to throb in your hands and soon <<$boydesc>> cum gushes out covering your hands in a fresh coat of warm spunk.'
-	if harakBoyH > 0: '-Baby, you have some Golden hands! Will you lend them to me sometime?'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cumface3 ---
-
-!in the mouth
-if $ARGS[0] = 'din_hunters_sex_cumface2':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'mouth', $boy, 1
-	gs 'stat'
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf20.mp4"></video></center>'
-	*pl
-	'You feel his member start to throb in your mouth and taste the tartness of his cum as his load begins to flow onto your tongue.'
-	act 'Swallow':
-		*clr & cla
-		minut += 1
-		swallow += 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_' + rand(13,14) + '.mp4"></video></center>'
-		*pl
-		'With great pleasure you swallow every last drop.'
-		if harakBoyH = 2: '-Fuck  <<$pcs_nickname>>, you''re a real cum guzzler, don''t forget to mouth wash, I still want to kiss you sometime.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-				   i = rand(1,5)
-				   if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				   if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				   if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				   if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				   if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				   if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			   end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-	act 'Spit it out':
-		*clr & cla
-		minut += 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/locations/pavlovsk/resident/rekshome/party/reksparty_party_kuh_4_16.mp4"></video></center>'
-		*pl
-		'You don''t like the taste and you quickly spit out his disgusting load.'
-		if harakBoyH = 2: '-Does that not taste good <<$pcs_nickname>>? I thought all women loved the taste of a fresh load. It''s a pity you don''t. '
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		   act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-				   i = rand(1,5)
-				   if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				   if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				   if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				   if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				   if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				   if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			   end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cumface2 ---
-!on the face
-if $ARGS[0] = 'din_hunters_sex_cumface1':
-	minut += 1
-	pcs_sweat += 10
-	gs 'cum_call', 'face', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cumf10.mp4"></video></center>'
-	*pl
-	'The jets of hot sperm hit you in the face and slowly flow down onto your throat and tits.'
-	if harakBoyH > 0: '-Ohh, <<$pcs_nickname>>, god that felt good!'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cumface1 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum11':
-	minut += 5
-	pcs_sweat += 10
-	if protect = 1:
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/cum/cum61.jpg"></video></center>'
-		'<<$boydesc>> groans and realizes that he has cum in the condom. Feeling completely relaxed, he throws the condom on the ground and contentedly lies back on the bed.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	else
-		gs 'cum_call', '', $boy, 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/cum/cum111.jpg"></video></center>'
-		'<<$boydesc>> groans and you feel a jet of sperm pour into you.'
-		gs 'cuminsidereact'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cum11 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum10':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'stomach', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cum110.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> pulls out at the last second and groans as you feel hot streams of cum shoot onto your belly and tits, covering you in spunk. Your man lies back on the bed completely relaxed and contented.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum10 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum9':
-	minut += 5
-	pcs_sweat += 10
-	gs 'stat'
-	if protect = 1:
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum91.jpg"></center>'
-		*pl
-		'<<$boydesc>> groans and realizes that he has cum in the condom. Feeling completely relaxed, he throws the condom on the ground and contentedly lies back on the bed.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	else
-		gs 'cum_call', '', $boy, 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum19.jpg"></center>'
-		*pl
-		'<<$boydesc>> groans and you feel a jet of sperm pour into you.'
-		gs 'cuminsidereact'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cum9 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum81':
-	minut += 5
-	pcs_sweat += 10
-	gs 'stat'
-	if protect = 1:
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum82.jpg"></center>'
-		*pl
-		'<<$boydesc>> groans and realizes that he has cum in the condom. Feeling completely relaxed, he throws the condom on the ground and contentedly lies back on the bed.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	else
-		gs 'cum_call', '', $boy, 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/cum/cum81.mp4"></video></center>'
-		'<<$boydesc>> groans and you feel a jet of sperm pour into you.'
-		gs 'cuminsidereact'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cum81 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum8':
-	minut += 5
-	pcs_sweat += 10
-	gs 'stat'
-	if protect = 1:
-	'<center><H4>Hut</H4></center>'
-	'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum81.jpg"></center>'
-	'<<$boydesc>> groans and realizes that he has cum in the condom. Feeling completely relaxed, he throws the condom on the ground and contentedly lies back on the bed.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	else
-		gs 'cum_call', '', $boy, 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/cum/cum8.mp4"></video></center>'
-		'<<$boydesc>> groans and you feel a jet of sperm pour into you.'
-		gs 'cuminsidereact'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cum8 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum7':
-	minut += 5
-	pcs_sweat += 10
-	gs 'stat'
-	if protect = 1:
-	'<center><H4>Hut</H4></center>'
-	'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum71.jpg"></center>'
-	'<<$boydesc>> groans and realizes that he has cum in the condom. Feeling completely relaxed, he throws the condom on the ground and contentedly lies back on the bed.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	else
-		gs 'cum_call', '', $boy, 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/cum/cum7.mp4"></video></center>'
-		'<<$boydesc>> groans and you feel a jet of sperm pour into you.'
-		gs 'cuminsidereact'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cum7 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum6':
-	minut += 5
-	pcs_sweat += 10
-	gs 'stat'
-	if protect = 1:
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum61.jpg"></center>'
-		'<<$boydesc>> groans and realizes that he has cum in the condom. Feeling completely relaxed, he throws the condom on the ground and contentedly lies back on the bed.'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	 else
-		gs 'cum_call', '', $boy, 1
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum6.jpg"></center>'
-		'<<$boydesc>> groans and you feel a jet of sperm pour into you.'
-		gs 'cuminsidereact'
-		if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-		*pl
-		gs 'arousal', 'end'
-		gs 'stat'
-		if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-			act '<<$boydesc>>, you want more?':
-				*clr & cla
-				dikos += 1
-				minut += 5
-				hunters_bj_times = 0
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-				'You ask him, what else do you want?'
-				'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-				if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-				if pcs_vag > 0:
-					i = rand(1,5)
-					if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-					if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-					if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-					if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-					if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				end
-			end
-		end
-		act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-	end
-end &! --- din_hunters_sex_cum6 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum5':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'butt', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cum5.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> pulls out his member, groans and you feel his hot streams of sperm spray onto your ass and back. Your man lies back on the bed, completely contended and relaxed.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	*pl
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum5 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum41':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'stomach', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cum41.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> pulls out his member and groans. You feel his hot streams of sperm spray onto your stomach, and slowly ooze down your sides. Your man, completely relaxed and satisfied, lies back on the bed.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum41 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum4':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'butt', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><img <<$set_imgh>> src="images/shared/sex/cum/cum4.jpg"></center>'
-	*pl
-	'<<$boydesc>> pulls out his member, groans and you feel his hot streams of sperm spray onto your ass and back. Your man lies back on the bed, completely contended and relaxed.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum4 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum3':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'butt', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cum3.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> pulls out his member and groans as you feel his warm drops of sperm drip on your ass and back.'
-	if harakBoyH = 2:'-Hell,<<$pcs_nickname>>, in this position you fuck like a perfect whore. He slaps you lightly on the ass.'
-	if harakBoyH = 0:'-<<$pcs_nickname>>, in this position you are simply irresistible. He gently kisses you on the cheek.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum3 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum2':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'stomach', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cum2.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> pulls out his cock and groans as you feel his warm sperm drip onto your stomach.'
-	if harakBoyH = 2:'-Shit, <<$pcs_nickname>> that was awesome, <<$boydesc>> looks completely satisfied. He passionately kisses you.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum2 ---
-
-if $ARGS[0] = 'din_hunters_sex_cum1':
-	minut += 5
-	pcs_sweat += 10
-	gs 'cum_call', 'anus', $boy, 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/cum1.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> moans and you feel your ass fill with warmth.
-	  -Oh yeah, baby, you''re just super. <<$boydesc>> kisses you on the forehead.'
-	if silavag = 0 and dikos = 0:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 1 and dikos = 1:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	if silavag = 2 and dikos = 2:'Sorry <<$pcs_nickname>>. I couldn''t help myself!'
-	gs 'arousal', 'end'
-	gs 'stat'
-	if silavag = 1 and dikos < 1 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-				*pl
-			'You ask him, what else do you want?'
-			'<<$boydesc>> answered - "Fuck you <<$pcs_nickname>> you''re insatiable!"..'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	if silavag = 2 and dikos < 2 and pcs_horny >= 60 and pcs_vag > 0:
-		act '<<$boydesc>>, you want more?':
-			*clr & cla
-			dikos += 1
-			minut += 5
-			hunters_bj_times = 0
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-			*pl
-			'You ask him, what else do you want?'
-			'- Well, <<$pcs_nickname>> you''re an insatiable little minx aren''t you, <<$boydesc>> smiles in response to your question.'
-			if pcs_vag = 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			if pcs_vag > 0:
-				i = rand(1,5)
-				if i = 1: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 2: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 3: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if i = 4 and hunters_kuni = 1: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-				if i = 5: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			end
-		end
-	end
-	act 'Depart':hunters_bj_times = 0 & dikos = 0 & gt $loc, $metka
-end &! --- din_hunters_sex_cum1 ---
-
-if $ARGS[0] = 'din_hunters_sex_bell_anal':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/facedown/kotovsexanal20.mp4"></video></center>'
-	*pl
-	'Fortunately you had time to prepare for anal. He pulls his cock out of your pussy and begins to slowly rub against your asshole. '
-	*pl
-	'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	gs 'arousal', 'anal', 10, 'sub'
-	gs 'stat'
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum5'
-end &! --- din_hunters_sex_bell_anal ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_anal2':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal34.mp4"></video></center>'
-	*pl
-	'Fortunately you had time to prepare for anal. He pulls his cock out of your pussy and begins to slowly rub against your asshole. '
-	*pl
-	'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	gs 'arousal', 'anal', 10, 'sub'
-	gs 'stat'
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-end &! --- din_hunters_sex_cow_anal2 ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_anal1':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal3'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	'Fortunately you had time to prepare for anal. He pulls his cock out of your pussy and begins to slowly rub against your asshole. '
-	*pl
-	'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	gs 'arousal', 'anal', 10, 'sub'
-	gs 'stat'
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-end &! --- din_hunters_sex_cow_anal1 ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_anal':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/cowgirl/kotovsexanal3'+rand(2,3)+'.mp4"></video></center>'
-	*pl
-	'Fortunately you had time to prepare for anal. He pulls his cock out of your pussy and begins to slowly rub against your asshole. '
-	*pl
-	'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	gs 'arousal', 'anal', 10, 'sub'
-	gs 'stat'
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-end &! --- din_hunters_sex_cow_anal ---
-
-if $ARGS[0] = 'din_hunters_sex_dog_anal':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/doggy/kotovsexanal1'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	'Fortunately you had time to prepare for anal. He pulls his cock out of your pussy and begins to slowly rub against your asshole. '
-	*pl
-	'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	gs 'arousal', 'anal', 10, 'sub'
-	gs 'stat'
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum3'
-end &! --- din_hunters_sex_dog_anal ---
-
-if $ARGS[0] = 'din_hunters_sex_misionary_anal':
-	anala += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/mis/kotovsexanal'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	'Fortunately you had time to prepare for anal. He pulls his cock out of your pussy and begins to slowly rub against your asshole. '
-	*pl
-	'Suddenly <<$boydesc>> begins to move faster and you realize that he is already on edge and ready...'
-	gs 'arousal', 'anal', 10, 'sub'
-	gs 'stat'
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum2'
-end &! --- din_hunters_sex_misionary_anal ---
-
-if $ARGS[0] = 'din_hunters_sex_anal_no':
-	minut += 5
-	anal_no = 1
-	gs 'stat'
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/anal/kotovsexanalno.mp4"></video></center>'
-	*pl
-	'-Sorry <<$boydesc>>, but I''m not quite ready. Well, if you know what I mean.'
-	'-I understand. Okay, next time, come with a clean ass.'
-	'<<$boydesc>> asks you...'
-	i = rand(1,4)
-	if i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-end &! --- din_hunters_sex_anal_no ---
-
-if $ARGS[0] = 'din_hunters_sex_69':
-	bja += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/69/kotovsex7'+rand(0,2)+'.mp4"></video></center>'
-	*pl
-	'You sit on your man''s face and, grabbing his cock, begin to suck passionately.
-	<<$boydesc>> skillfully licks your pussy, you begin moaning and panting as you continue to suck.'
-	gs 'arousal', 'cuni', 5, 'dom'
-	gs 'arousal', 'bj', 5, 'sub'
-	minut -= 5
-	gs 'stat'
-	if pcs_horny >= 90:
-		pcs_mood += 15
-		pcs_willpwr += 15
-		$orgasm_or = 'custom'
-		$orgasm_txt = 'From his skillful actions you quickly orgasm.'
-	else
-		'Though his actions are stimulating, they quickly start to bore you.'
-		$orgasm_or = 'no'
-	end
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move faster and your realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-
-	if h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface7'
-end &! --- din_hunters_sex_69 ---
-
-if $ARGS[0] = 'din_hunters_sex_hand_bonus':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/hug/kotovsex51.mp4"></video></center>'
-	*pl
-	'Encircling the shaft of his cock with your soft hands, you feel how long and hard he is.'
-	*pl
-	gs 'dinsex','vaginal_sex',10 & !original dynamic $sexstart5
-	*pl
-	gs 'arousal', 'hj', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move faster and your realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum10'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum11'
-end &! --- din_hunters_sex_hand_bonus ---
-
-if $ARGS[0] = 'din_hunters_sex_hand':
-	sexa += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/hug/kotovsex50.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> takes you in his strong hands and abruptly enters you.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Start <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand_bonus''">move</a> guy to meet.'
-	*pl
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum10'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum11'
-end &! --- din_hunters_sex_hand ---
-
-if $ARGS[0] = 'din_hunters_sex_bell_bonus1':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/facedown/kotovsexbonus10.mp4"></video></center>'
-	'Lying relaxed on your stomach, you lazily twist your ass, spreading your cheeks open to show off your tight hole. <<$boydesc>> freezes and enjoys the view.'
-	if harakBoyH = 2: 'Oh yeah, my kitty, I never get tired of looking at your tasty ass.'
-	if harakBoyH = 2:'-Uhh, <<$pcs_nickname>>, don''t stop..'
-	if harakBoyH < 2:'-It''s super cute..'
-	*pl
-	*pl
-	gs 'arousal', 'anal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_bell_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum5'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum9'
-end &! --- din_hunters_sex_bell_bonus1 ---
-
-if $ARGS[0] = 'din_hunters_sex_bell_bonus':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/facedown/kotovsexbonus20.mp4"></video></center>'
-	'You passionately kiss <<$boydesc>> as he continues to RAM you from behind.'
-	*pl
-	*pl
-	gs 'arousal', 'anal', 5, 'sub'
-	gs 'arousal', 'kiss_give', 5, 'sub'
-	minut -= 5
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_bell_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum5'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum9'
-end &! --- din_hunters_sex_bell_bonus ---
-
-if $ARGS[0] = 'din_hunters_sex_bell':
-	sexa += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/facedown/kotovsex4'+rand(0,5)+'.mp4"></video></center>'
-	'You lay on your stomach as he moves around behind you.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	g = rand(1,2)
-	if g = 1 and h < 3 and sex > 10:'Raise your head and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_bonus''">make out</a> with him.'
-	if g = 2 and h < 3 and sex > 20:'Clench your <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell_bonus1''">ass</a> while his cock is inside.'
-	*pl
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_bell_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum5'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum9'
-end &! --- din_hunters_sex_bell ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_bonus3':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/hug/kotovsex61.mp4"></video></center>'
-	'You kiss passionately, strongly embracing each other.'
-	*pl
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'arousal', 'kiss', 5
-	minut -= 5
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_cow_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum8'
-end &! --- din_hunters_sex_cow_bonus3 ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_bonus2':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/hug/kotovsex60.mp4"></video></center>'
-	'<<$boydesc>> gets up and you tightly hug him. You clasp his neck, and move your waist.'
-	if harakBoyH = 2:'-Umm, what a hot bitch, let me get my hands on those tits of yours..'
-	*pl
-	gs 'dinsex','vaginal_sex',10
-	*pl
-	'Cling to his lips and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_bonus3''">kiss</a>.'
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'arousal', 'kiss', 5
-	minut -= 5
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_cow_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum8'
-end &! --- din_hunters_sex_cow_bonus2 ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_bonus1':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/kotovsexbonus'+rand(17,19)+'.mp4"></video></center>'
-	*pl
-	'You turn your back to him and continue to slide your wet pussy up and down his rock hard member.'
-	if harakBoyH = 2:'-Uhh, baby, your ass looks so fucking great..'
-	if harakBoyH < 2:'-Lookin good <<$pcs_nickname>>..'
-	*pl
-	gs 'dinsex','vaginal_sex',10 & !original dynamic $sexstart5
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_cow_anal2'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum41'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum81'
-end &! --- din_hunters_sex_cow_bonus1 ---
-
-if $ARGS[0] = 'din_hunters_sex_cow_bonus':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/kotovsexbonus'+rand(14,16)+'.mp4"></video></center>'
-	'<<$boydesc>> stops, leaving it up to you to do all the work. You began to move rhythmically on his cock, .'
-	*pl
-	gs 'dinsex','vaginal_sex',10 & !original dynamic $sexstart5
-	*pl
-	if sex > 30:'Turn your <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_bonus1''">back</a> to him and continue to ride his dick.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_cow_anal1'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum8'
-end &! --- din_hunters_sex_cow_bonus ---
-
-if $ARGS[0] = 'din_hunters_sex_cow':
-	sexa += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/cowgirl/kotovsex2'+rand(0,1)+'.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> takes you by the hand, helping you to sit on top of him.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	g = rand(1,2)
-	if g = 1 and h < 3 and sex > 20:'Give him a break and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_bonus''">jump</a> onto his strong dick.'
-	if g = 2 and h < 3 and sex > 10:'Ask him to get up and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow_bonus2''">hug</a> you.'
-	*pl
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_cow_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum4'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum8'
-end &! --- din_hunters_sex_cow ---
-
-if $ARGS[0] = 'din_hunters_sex_dog_bonus':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/sequence/kotovsexbonus'+rand(11,12)+'.mp4"></video></center>'
-	*pl
-	'Slowing him down, you start to move your dripping pussy to meet his hot member.'
-	if harakBoyH = 2:'<<$boydesc>> slows his movements "Excellent work, bootyfull bitch."'
-	if harakBoyH = 1:'<<$boydesc>> slows his movements "Cool <<$pcs_nickname>>."'
-	if harakBoyH = 0:'<<$boydesc>> slows his movements "You''re good just so good <<$pcs_nickname>>."'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum3'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum7'
-end &! --- din_hunters_sex_dog_bonus ---
-
-if $ARGS[0] = 'din_hunters_sex_dog_bonus1':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/doggy/kotovsexbonus'+rand(7,9)+'.mp4"></video></center>'
-	'Ignoring him, you lazily bury your face in the soft bed, opening your pussy up for the full length of his cock.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum3'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum7'
-end &! --- din_hunters_sex_dog_bonus1 ---
-
-if $ARGS[0] = 'din_hunters_sex_dog_bonus2':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/sequence/kotovsexbonus21.mp4"></video></center>'
-	'The two of you hold each other tightly, <<$boydesc>> supports you as he continues to violently batter away at your hole.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum3'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum7'
-end &! --- din_hunters_sex_dog_bonus2 ---
-
-if $ARGS[0] = 'din_hunters_sex_dog':
-	sexa += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/doggy/kotovsex1'+rand(0,3)+'.mp4"></video></center>'
-	'<<$boydesc>> pulls you closer and you shake your sexy ass in front of him.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	g = rand(1,2)
-	if g = 1 and h < 3 and sex > 20:'Start moving your <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_bonus''">booty</a> to meet him.'
-	if g = 1 and h < 3 and sex <= 20:'Bury your <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_bonus1''">face</a> in the bed, and continue to fuck in this position.'
-	if g = 2 and h < 3 and sex > 20:'Ask him to help you <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog_bonus2''">get up</a> .'
-	*pl
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_dog_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Lie on your back':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum3'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum7'
-end &! --- din_hunters_sex_dog ---
-
-if $ARGS[0] = 'din_hunters_sex_misionary_bonus2':
-	minut += 5
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsexbonus'+rand(5,6)+'.mp4"></video></center>'
-	'You kiss passionately, feeling his hot breath on your face. <<$boydesc>> continues to fuck you while passionately kissing you.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_misionary_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum2'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum6'
-end &! --- din_hunters_sex_misionary_bonus2 ---
-
-if $ARGS[0] = 'din_hunters_sex_misionary_bonus1':
-	agil_exp += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsexbonus4.mp4"></video></center>'
-	'Not to be outdone, you rather cleverly put your legs behind your head. You feel the movement of his cock plunging into you even better in this position.'
-	'-"Oh, baby, wow. I love what you are doing."'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_misionary_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':sexa += 1 & gt 'hunterLoveSex', 'din_hunters_sex_cum2'
-	if k = 2 and h = 3: act 'Cum':sexa += 1 & gt 'hunterLoveSex', 'din_hunters_sex_cum6'
-end &! --- din_hunters_sex_misionary_bonus1 ---
-
-if $ARGS[0] = 'din_hunters_sex_misionary_bonus':
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/vag/miss/kotovsexbonus'+rand(0,3)+'.mp4"></video></center>'
-	'Not to be outdone, you lift up your legs, giving him an incredible view of your pussy and a bit more freedom for his cock.'
-	'<<$boydesc>> continues to violently fuck you in this position.'
-	*pl
-	gs 'arousal', 'vaginal', 5, 'sub', 'rough'
-	gs 'stat'
-	i = rand(1,4)
-	j = rand(1,3)
-	h = rand(1,3)
-	if pcs_agil > 50 and pcs_dom > 30 and musle >= salo:'Throw legs <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_bonus1''">head</a> .'
-	*pl
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and i = 1: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and i = 2: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if anal_no = 0 and h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_misionary_anal'
-	if anal_no = 0 and h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	if anal_no = 1 and h < 3 and j = 3 and i = 1: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if anal_no = 1 and h < 3 and j = 3 and i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if anal_no = 1 and h < 3 and j = 3 and i = 3: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if anal_no = 1 and h < 3 and j = 3 and i = 4: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum2'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum6'
-end &! --- din_hunters_sex_misionary_bonus ---
-
-if $ARGS[0] = 'din_hunters_sex_kuni_bonus':
-	if silavag = 0: pcs_horny += 15
-	if silavag = 1: pcs_horny += 20
-	if silavag = 2: pcs_horny += 25
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/facesit/kotovsexbonus'+rand(23,24)+'.mp4"></video></center>'
-	if harakBoyH = 2:'-What are you doing? Oh shit, <<$pcs_nickname>>, not this! Why do I let you do this to me.... '
-	'You climb up and begin rubbing your wet pussy on his face.'
-	gs 'arousal', 'cuni', 5, 'dom'
-	if harakBoyH > 0:'He doesn''t seem to like it, but he dutifully laps at your pussy, making you quiver at the pleasent feeling of a tongue on your clit.'
-	gs 'arousal', 'cuni', 5, 'dom'
-	if harakBoyH = 0:'Apparently he enjoys it, and he diligently licks and sucks at your pussy and clit, causing you to quiver in exstacy.'
-	gs 'arousal', 'cuni', 5, 'dom'
-	gs 'stat'
-	if pcs_horny >= 90:
-		pcs_mood += 15
-		pcs_willpwr += 15
-		$orgasm_or = 'custom'
-		$orgasm_txt = 'You quickly orgasm from his skillful ministrations.'
-	else
-		'Though his actions are stimulating, they quickly start to bore you.'
-		 $orgasm_or = 'no'
-	end
-	*pl
-	'You enjoy the sweet efforts of your boyfriend.
-	-Alright <<$boydesc>>, come here and fuck me.'
-	if harakBoyH > 0:'-Yes baby, I''m going to fuck you like crazy. Come over here, my dick is like stone.'
-	*pl
- 	 i = rand(1,5)
-	 if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	 if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	 if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	 if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	 if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-end &! --- din_hunters_sex_kuni_bonus ---
-
-if $ARGS[0] = 'din_hunters_sex_kuni':
-	minut += 5
-	pcs_dom += 1
-	gs 'stat'
-	if hunters_kuni = 0:
-		'<center><b><font color = maroon><<$npc_firstname[''A9'']>> <<$npc_lastname[''A9'']>></font></b></center>'
-		'<center><video autoplay loop src="images/shared/sex/oface/kotovecho.mp4"></video></center>'
-		if pcs_dom <= 50:
-			'<<$boydesc>> refuses to lick your pussy.'
-			if harakBoyH = 2: '-No <<$pcs_nickname>>, leave me alone. Real men don''t lick pussy, now spread those legs.'
-			if harakBoyH = 0: 'Maybe another time, honey'
-			act 'Continue': gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		else
-			if harakBoyH = 2:
-				'<<$boydesc>> reluctantly agrees to lick you.'
-				'-Okay,<<$pcs_nickname>>, don''t tell anyone or they''ll lose all respect for me.'
-			end
-			if harakBoyH = 1: '<<$boydesc>> agrees to lick you.'
-			if harakBoyH = 0:
-				'<<$boydesc>> happily agrees to lick you.'
-				'-<<$pcs_nickname>>, I will deliver you unearthly pleasure.'
-			end
-			act 'Spread your legs for him':
-				*clr & cla
-				hunters_kuni = 1
-				if silavag = 0: pcs_horny += 10
-				if silavag = 1: pcs_horny += 15
-				if silavag = 2: pcs_horny += 20
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/kuni/kotovsex3'+rand(0,3)+'.mp4"></video></center>'
-				'<<$boydesc>> lies down between your legs and begins to work his tongue up and down your pussy.'
-				gs 'arousal', 'cuni', 5, 'dom'
-				gs 'stat'
-				if pcs_horny >= 90:
-					pcs_mood += 15
-					pcs_willpwr += 15
-					$orgasm_or = 'custom'
-					$orgasm_txt = 'You quickly orgasm from his skillful ministrations.'
-				else
-					'Though his actions are stimulating, they quickly start to bore you.'
-					$orgasm_or = 'no'
-				end
-				*pl
-				if pcs_dom >= 75: 'Put him on his back and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_kuni_bonus''">sit</a> on his face.'
-				*pl
-				i = rand(1,5)
-				if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if i = 2: act 'Sit down': gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-				if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-				if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-			end
-		end
-	else
-		'<center><H4>Hut</H4></center>'
-		'<center><video autoplay loop src="images/shared/sex/kuni/kotovsex3'+rand(0,3)+'.mp4"></video></center>'
-		'<<$boydesc>> lies down between your legs and begins to work his tongue up and down your pussy.'
-		gs 'arousal', 'cuni', 5, 'dom'
-		gs 'stat'
-		if pcs_horny >= 90:
-			pcs_mood += 15
-			pcs_willpwr += 15
-			$orgasm_or = 'custom'
-			$orgasm_txt = 'You quickly orgasm from his skillful ministrations.'
-		else
-			'Though his actions are stimulating, they quickly start to bore you.'
-			$orgasm_or = 'no'
-		end
-		if pcs_dom >= 75:'Put him on his back and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_kuni_bonus''">sit</a> on his face.'
-		*pl
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down': gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	end
-end &! --- din_hunters_sex_kuni ---
-
-if $ARGS[0] = 'din_hunters_sex_misionary':
-	sexa += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/kuni/kotovsex3'+rand(0,3)+'.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> puts you on your back and spreads your legs.'
-	gs 'arousal', 'vaginal', 5, 'sub'
-	gs 'stat'
-	*pl
-	i = rand(1,9)
-	j = rand(1,3)
-	h = rand(1,3)
-	g = rand(1,2)
-	if g = 1 and h < 3 and sex > 30:'You are enjoying his every move, and want to lift your legs <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_bonus''">up</a> .'
-	if g = 2 and h < 3:'You groan loudly under your boyfriend <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary_bonus2''">kissing</a> him passionately.'
-	*pl
-	if hunters_kuni = 0 and pcs_dom > 30 and h < 3:'To ask a guy <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_kuni''">lick</a> you pussy.'
-	*pl
-	if h < 3:'Having had enough of this position he asks you...'
-	if h = 3:'Suddenly <<$boydesc>> begins to move even faster and you realize that he is already on edge and ready...'
-	*pl
-	if h < 3 and j < 3 and hunters_kuni = 0 and i = 8 or i = 1 or i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if h < 3 and j < 3 and hunters_kuni = 0 and i = 9 or i = 3 or i = 4: act 'Bend':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if h < 3 and j < 3 and i = 5 or i = 6: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if h < 3 and j < 3 and i = 7: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-
-	if h < 3 and j < 3 and hunters_kuni = 1 and i = 8: act 'Spread your legs for him':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-	if h < 3 and j < 3 and hunters_kuni = 1 and i = 9: act 'Mutually caress each other':gt 'hunterLoveSex', 'din_hunters_sex_69'
-
-	if h < 3 and j = 3 and klismaday = daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_misionary_anal'
-	if h < 3 and j = 3 and klismaday ! daystart: act 'Substitute the ass':gt 'hunterLoveSex', 'din_hunters_sex_anal_no'
-
-	k = rand(1,2)
-	if k = 1 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum2'
-	if k = 2 and h = 3: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cum6'
-end &! --- din_hunters_sex_misionary ---
-
-if $ARGS[0] = 'din_hunters_bj14':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj14'+rand(0,2)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'<<$boydesc>> puts his dick between your <<tits>>size tits and you onto his cockhead to help lube it up. You squeeze your tits together and he starts to move, fucking your gorgeous melons. You have an unusual but pleasant sensation from these actions.'
-	*pl
-	gs 'arousal', 'breasts', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,4)
-		j = rand(1,4)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 4 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 4 and j = 2: act 'Suck on the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 4 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 4 and j = 4: act 'Hold younr tongue against his cock':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface5'
-	end
-end &! --- din_hunters_bj14 ---
-
-if $ARGS[0] = 'din_hunters_bj13':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj13'+rand(0,1)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'Firmly grasping his member, you spend time licking and sucking his pulsing head and sensitve glans. He moans from your skilled ministrations.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,4)
-		j = rand(1,4)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 4 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 4 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 4 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 4 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface4'
-	end
-end &! --- din_hunters_bj13 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus12':
-	pcs_throat += 1
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/cum/kotovbjbonus12.mp4"></video></center>'
-	'You try to swallow his cock even deeper, but gag in the process. You barely avoid throwing up all over him.'
-	if harakBoyH = 2:' -Fu fucking<<$pcs_nickname>>, if you are not able to swallow normally, practice at home on a banana and not on my cock!'
-	if harakBoyH = 0:' -Do not worry <<$pcs_nickname>>, deep throating is hard to learn, but gets easier the more you do it.'
-	if harakBoyH = 0:' -Do not worry <<$pcs_nickname>>, maybe next time it will work.'
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj12'
-end &! --- din_hunters_bj_bonus12 ---
-
-if $ARGS[0] = 'din_hunters_bj12':
-	minut += 5
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj12'+rand(0,2)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You grab the base of his penis and begin to suck greedily. His large cock does not fit completely in your little mouth and you can only accomodate half of his total length. Your hand glides up and down his thick shaft as you do your best to swallow more of his meaty cock.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	if hunters_bj_times < 3:'Try <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus12''">to swallow</a> member of the deeper.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 : act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj12 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus11':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus11.mp4"></video></center>'
-	'You take his cock into your mouth and <<$boydesc>> starts roughly fucking your face, doing his best to shove as much of his cock down your throat as he can.'
-	if harakBoyH = 2:'-Oh yeah, baby, just let me do this for a little while, your pretty face looks so sexy.'
-	if harakBoyH = 1:'-Oh yeah, <<$pcs_nickname>>, come on, that feels so good.'
-	if harakBoyH = 0:'-Honey, this is amazing, your face looks so sexy.'
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj11'
-end &! --- din_hunters_bj_bonus11 ---
-
-if $ARGS[0] = 'din_hunters_bj11':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj11'+rand(0,4)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You grab the base of his penis and begin to suck greedily. His large cock does not fit completely in your little mouth and you can only accomodate half of his total length. Your hand glides up and down his thick shaft as you do your best to swallow more of his meaty cock.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	if hunters_bj_times < 3 and bj > 20:'Take member <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus11''">cheek</a> and tightly secured with the head.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 : act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-	i = rand(1,2)
-	if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-	if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj11 ---
-
-if $ARGS[0] = 'din_hunters_bj10':
-	pcs_throat += 1
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj1'+rand(0,3)+'.mp4"></video></center>'
-	*pl
-	h = rand(1,3)
-	'You obey him and fully relax your throat. <<$boydesc>>  begins to move his cock, plunging deeper into your asophagus. You choke and barely keep yourself from vomiting all over his meaty schlong. You can feel the head of his cock resting at the back of your mouth and you do your best to swallow it down, squeezing it with the muscles in your throat.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 : act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface6'
-	end
-end &! --- din_hunters_bj10 ---
-
-if $ARGS[0] = 'din_hunters_bj9':
-	pcs_throat += 1
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj9'+rand(0,1)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You start to rythmically bob your head up and down his cock, swallowing his member of deeper and deeper. You can feel the head of his cock resting at the back of your mouth and you do your best to swallow it down, squeezing it with the muscles in your throat.'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub', 'deepthroat'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-	k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 : act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface6'
-	end
-end &! --- din_hunters_bj9 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus8':
-	if harakBoyH > 0:hunters_bj_times -= 1
-	if harakBoyH = 0:hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus8.mp4"></video></center>'
-	'While <<$boydesc>> continues to enjoy himself, you lick the pucker of his asshole, forcing your tongue inside. He jumps and looks down at you startled.'
-	if harakBoyH = 2:'-Who told you to fuck my ass with your tongue? No, <<$pcs_nickname>>, I don''t like it. Cut that shit out!'
-	if harakBoyH = 1:'- What the hell <<$pcs_nickname>> , stop!'
-	if harakBoyH = 0:'- Mmmm <<$pcs_nickname>> , don''t stop, " <<$boydesc>> says.'
-	gs 'arousal', 'cuni_give', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj8'
-end &! --- din_hunters_bj_bonus8 ---
-
-if $ARGS[0] = 'din_hunters_bj8':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj8'+rand(0,1)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You lick down even lower, to the sensitive space below his ballsack. Using your tongue you tease and lick his tightly puckered asshole, bathing it in your saliva.'
-	'-Oh shit,<<$pcs_nickname>>, what are you doing? Keep going, but you better swear not to tell anyone. Fuck thats good!'
-	*pl
-	gs 'arousal', 'cuni_give', 5, 'sub'
-	if hunters_bj_times < 3 and pcs_dom > 0:'Try to go even further and  <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus8''">shove</a> younr tongue in his hole.'
-	*pl
-	gs 'arousal', 'cuni_give', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times >= 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 1 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 1 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 1 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj8 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus7':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus7.mp4"></video></center>'
-	'You continue to play with his balls hugging them <<$liptalk>>. You put them in your mouth and use your tongue to tease them as you suck each one separately.'
-	'-Fuck, baby, don''t stop!'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj7'
-end &! --- din_hunters_bj_bonus7 ---
-
-if $ARGS[0] = 'din_hunters_bj7':
-	minut += 5
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj7'+rand(0,4)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'Lick down his shaft to his hanging ballsack. You spend some time gently licking each one of his testes, covering them with your saliva.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and bj > 15:'Suck and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus7''">take</a> both balls in your mouth.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 1 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 1 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 1 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj7 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus6':
-	pcs_dom += 1
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus6.mp4"></video></center>'
-	*pl
-	'<<$boydesc>> slaps his cock against your tongue.'
-	if harakBoyH = 2:'-Bad girl, now daddy will punish you.'
-	if harakBoyH < 2:'- You''re a dirty little girl, he says with a smile.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj6'
-end &! --- din_hunters_bj_bonus6 ---
-
-if $ARGS[0] = 'din_hunters_bj6':
-	hunters_bj_times += 1
-	hja += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj6'+rand(0,1)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'Capturing hold of his thick meat with your hands, you start to jerk it confidently, watching his reaction.'
-	if harakBoyH > 0:'-Well,<<$pcs_nickname>>, I can jerk my dick myself, but I bet you have some better tools to use on what you''re holding there.'
-	if harakBoyH = 0:'-Come on,<<$pcs_nickname>>, show me what you can do - <<$boydesc>> says with a smile.'
-	*pl
-	gs 'arousal', 'hj', 5, 'sub'
-	if hunters_bj_times < 3 and bj > 10:'You stick out your tongue and he <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus6''">spanks</a> his cock on it.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		j = rand(1,4)
-		if i = 1 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 1 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 1 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 1 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-		if i = 3 and j = 1: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-		if i = 3 and j = 2: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-		if i = 3 and j = 3: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-		if i = 3 and j = 4: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface3'
-	end
-end &! --- din_hunters_bj6 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus5':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus5.mp4"></video></center>'
-	'You spit on his dick, and using your hands smere your saliva all over his head and shaft.'
-	' -Uhh,<<$pcs_nickname>>, that''s the kind of lubrication you don''t have to spend money on.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj5'
-end &! --- din_hunters_bj_bonus5 ---
-
-if $ARGS[0] = 'din_hunters_bj5':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj5'+rand(0,3)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You glide your tongue along the entire length of his penis, lubricating it with your sticky saliva.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and bj > 20:'<a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus5''">Spit</a> on his cock and rub it in for lubrication.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj5 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus4':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus4.mp4"></video></center>'
-	*pl
-	'You grasp the base of the penis and, carrying out his request, slap his glistening cock head against your cheeks.'
-	if harakBoyH = 2:'-Oh yeah, you submissive little slut. You''ve really got me going.'
-	if harakBoyH = 0:'-Oh yeah, you''ve really got me hard, keep going honey.'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj4'
-end &! --- din_hunters_bj_bonus4 ---
-
-if $ARGS[0] = 'din_hunters_bj4':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj4'+rand(0,1)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'Before wrapping your lips around his cock, you lightly grabbed him by the base of his shaft and pull back his foreskin, exposing his gleaming cockhead.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3 and pcs_dom < 30:'<<$boydesc>> asks you to <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus4''">slap</a> his member against your cheek.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-	i = rand(1,3)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj4 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus3':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus3.mp4"></video></center>'
-	*pl
-	'Looking into the eyes of your boyfriend, you tease your tongue over one of the most erogenous zones of his member.'
-	'-Mmmm <<$pcs_nickname>>, how do you know how to make me even harder?'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj3'
-end &! --- din_hunters_bj_bonus3 ---
-
-if $ARGS[0] = 'din_hunters_bj3':
-	hunters_bj_times += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj3'+rand(0,1)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You sweetly kiss at his shaft and cock head, gently rubbing his member against your <<$liptalk>>'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'You slightly <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus3''">tease</a> his member'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj3 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus2':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus2.mp4"></video></center>'
-	'He shivers slightly as you bite the head of his dick with your pearly white teeth.'
-	if harakBoyH = 2:'-Hey, fuck, <<$pcs_nickname>>, are you mistaking my dick for a fucking banana? Suck it, don''t bite it!'
-	if harakBoyH < 2:'-Careful <<$pcs_nickname>>, don''t joke like that!'
-	'You smiled and look at him, deciding to...'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj2'
-end &! --- din_hunters_bj_bonus2 ---
-
-if $ARGS[0] = 'din_hunters_bj2':
-	hunters_bj_times += 1
-	if pirsA > 0 and pirsA < 10000:
-		$textsexkotov = 'smacking your lips you suck at his cockhead, feeling the barbell in your tongue moving along his thick shaft.'
-	else
-		$textsexkotov = 'smacking your lips, so suck the head'
-	end
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj2'+rand(0,6)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You <<$textsexkotov>>, and tightly clench your <<$liptalk>> '
-	'The tenderness of your lips is driving him crazy'
-	*pl
-	gs 'arousal', 'bj', 5, 'sub'
-	if hunters_bj_times < 3:'You lightly <a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus2''">bite</a> the red head of his penis'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-		k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- din_hunters_bj2 ---
-
-if $ARGS[0] = 'din_hunters_bj_bonus1':
-	hunters_bj_times -= 1
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbjbonus1.mp4"></video></center>'
-	'You run your tongue along the tip of his penis, flicking at his urethra.'
-	if harakBoyH = 2:'<<$boydesc>> is already on edge: -<<$pcs_nickname>>, what are you doing, stop it, I''m fucking going to cum from this.'
-	if harakBoyH < 2:'<<$boydesc>> is already on edge: -<<$pcs_nickname>>, what are you doing, stop it or i''m going to blow my load!'
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	act 'Continue':gt 'hunterLoveSex', 'din_hunters_bj1'
-end &! --- din_hunters_bj_bonus1 ---
-
-if $ARGS[0] = 'din_hunters_bj1':
-	minut += 5
-	hunters_bj_times += 1
-	if pirsA > 0 and pirsA < 10000:
-		$textsexkotov = 'use your tongue to lick his head, feeling the barbell rub up and down his member'
-	else
-		$textsexkotov = 'use your tongue to lick his head'
-	end
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj1'+rand(0,3)+'.mp4"></video></center>'
-	h = rand(1,3)
-	'You <<$textsexkotov>>'
-	'You run your tongue along the tip of his penis, flicking at his urethra.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	if hunters_bj_times < 3:'<a href="exec:gt ''hunterLoveSex'', ''din_hunters_bj_bonus1''">Shove</a> the tip of the tongue in the hole.'
-	*pl
-	gs 'arousal', 'foreplay', 5, 'sub'
-	gs 'stat'
-	if h < 3 and hunters_bj_times = 3:'Having had enough of your cock sucking, he asks you...'
-	*pl
-	if hunters_bj_times < 3 and hunters_bj_times >= 1:
-	k = rand(1,5)
-		if k = 1:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_misionary''">lie on your back</a>.'
-		if k = 2:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_cow''">climb on top of me</a>.'
-		if k = 3:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_dog''">bend over</a>.'
-		if k = 4:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_bell''">lie on your stomach</a>.'
-		if k = 5:'You can stop the Blowjob and <a href="exec:gt ''hunterLoveSex'', ''din_hunters_sex_hand''">Take him in your hands</a>.'
-	end
-	*pl
-	if h = 3 and hunters_bj_times = 3:'Suddenly his cock is even more engorged with blood and begins to noticeably throb, and you realize that he is already on the edge and ready to cum...'
-	*pl
-	if hunters_bj_times < 3:
-		i = rand(1,3)
-		if i = 1: act 'Jerk off':gt 'hunterLoveSex', 'din_hunters_bj6'
-		if i = 2 and pcs_dom >= 10 and pcs_dom < 30: act 'Lick balls':gt 'hunterLoveSex', 'din_hunters_bj7'
-		if i = 2 and pcs_dom < 10: act 'Lick head':gt 'hunterLoveSex', 'din_hunters_bj8'
-		if i = 3 and pcs_dom >= 30 and pcs_throat > 15: act 'Swallow deeply':gt 'hunterLoveSex', 'din_hunters_bj9'
-		if i = 3 and pcs_dom < 30 and pcs_throat > 15: act 'Relax your throat':gt 'hunterLoveSex', 'din_hunters_bj10'
-		if i = 3 and pcs_dom >= 30 and pcs_throat <= 15: act 'Suck hard':gt 'hunterLoveSex', 'din_hunters_bj11'
-		if i = 3 and pcs_dom < 30 and pcs_throat <= 15: act 'Suck without hands':gt 'hunterLoveSex', 'din_hunters_bj12'
-		if i = 2 and pcs_dom >= 30 and tits < 3: act 'Rub his cock on your titties':gt 'hunterLoveSex', 'din_hunters_bj13'
-		if i = 2 and pcs_dom >= 30 and tits >=3: act 'Squeeze between your Tits':gt 'hunterLoveSex', 'din_hunters_bj14'
-	elseif h < 3 and hunters_bj_times >= 3:
-		i = rand(1,5)
-		if i = 1: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-		if i = 2: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-		if i = 3: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-		if i = 4: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-		if i = 5: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-	elseif h = 3 and hunters_bj_times >= 3:
-		i = rand(1,2)
-		if i = 1: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface1'
-		if i = 2: act 'Cum':gt 'hunterLoveSex', 'din_hunters_sex_cumface2'
-	end
-end &! --- 'din_hunters_bj1' ---
-
-if $ARGS[0] = 'din_hunters_bj200':
-	minut += 5
-	bja += 1
-	gs 'stat'
-	'<center><H4>Hut</H4></center>'
-	'<center><video autoplay loop src="images/shared/sex/blowjob/kotovbj'+rand(0,5)+'.mp4"></video></center>'
-	'You kneel in front of your boyfriend. He looks at you, waiting to see what you''ll do...'
-	*pl
-	if bj >= 10 and bj < 15: act 'Lick the head':gt 'hunterLoveSex', 'din_hunters_bj1'
-	if bj >= 20: act 'Suck the head':gt 'hunterLoveSex', 'din_hunters_bj2'
-	if bj >= 5 and bj < 10: act 'Kiss the head':gt 'hunterLoveSex', 'din_hunters_bj3'
-	if bj < 5: act 'Jack his cock':gt 'hunterLoveSex', 'din_hunters_bj4'
-	if bj >= 15 and bj < 20: act 'Lick the shaft':gt 'hunterLoveSex', 'din_hunters_bj5'
-end &! --- din_hunters_bj200 ---
-
-if $ARGS[0] = 'din_hunters_sub':
-	minut += 5
-	gs 'stat'
-	'<center><H4>Hut</H4></center>'
-	'<center><img <<$set_imgh>> src="images/shared/sex/dom/kotovsub.jpg"></center>'
-	'Like the obedient girl you are, you fully obey his will. Would you like something more, <<$boydesc>> asks you...'
-	i = rand(1,8)
-	if i = 1 or i = 7: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-	if i = 2 or i = 8: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-	if i = 3: act 'Sit down':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-	if i = 4: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-	if i = 5: act 'Lie on your stomach':gt 'hunterLoveSex', 'din_hunters_sex_bell'
-	if i = 6: act 'Take him in your hands':gt 'hunterLoveSex', 'din_hunters_sex_hand'
-end &! --- din_hunters_sub ---
-
-if $ARGS[0] = 'din_hunters_first_sex':
-	sexa += 1
-	huntersVagSex += 1
-	'<center><H4>Hut</H4></center>'
-	'<center><img <<$set_imgh>> src="images/shared/sex/oface/kotovfirst.jpg"></center>'
-	*pl
-	'<<$boydesc>> puts you on your back and spreads your legs, opening your virgin womb to his gaze and his quivering member.'
-	gs 'arousal', 'vaginal', 30, 'sub'
-	gs 'stat'
-
-	act 'To recover':
-		*clr & cla
-		minut += 5
-		gs 'stat'
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/shared/sex/oface/kotovfirst1.jpg"></center>'
-		*pl
-		if harakBoyH = 2:'Oh,<<$pcs_nickname>>, you''re a fucking woman now, congratulations! Now quit being a little crybaby. How do you feel?'
-		if harakBoyH = 1:'Well <<$pcs_nickname>>, congratulations, you''re not a little girl any more. How do you feel?'
-		if harakBoyH = 0:'-<<$pcs_nickname>>, all is well, how are you feeling? '
-		'-It hurts damn, never going to do it.'
-		if harakBoyH = 2:'-Ha ha, we''ll see if we can''t fix that.'
-		if harakBoyH = 1:'- Come on, all girls do it eventually. It''s nothing to be upset about.'
-		if harakBoyH = 0:'- Calm down, sweetheart, next time will be much better and you''ll still like it, I promise -  <<$boydesc>> says with a smile. He gently kisses and comforts you.'
-		gs 'arousal', 'end'
-		gs 'stat'
-		act 'Further':gt $loc, $metka
-	end
-end &! --- din_hunters_first_sex ---
-
-if $ARGS[0] = 'Igor':
-	if huntersIgorLove > 0 and huntersIgorQw <= 50:
-		harakBoyH = 0
-		if huntersIgorLove = 2: bfa += 1
-		boyonceA = 1
-		hunters_bj_times = 0
-
-		gs 'boyStat', 'A173'
-		minut += 5
-		npc_sex[$boy] += 1
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/igorhanter.jpg"></center>'
-		'<<$boydesc>> hugs you and starts showering you with kisses. "<<$pcs_nickname>>, take off your clothes."'
-		gs 'arousal', 'kiss', 5, 'sub'
-		gs 'stat'
-		if pcs_vag = 0 and sex = 0:
-			if SchoolAtestat = 0:
-				act 'I''m still a virgin':
-					*clr & cla
-					minut += 5
-					gs 'stat'
-					'<center><H4>Hut</H4></center>'
-					'<center><video autoplay loop src="images/pc/kotovotkaz.mp4"></video></center>'
-					if huntersIgorQw <= 45:'You, blushing, whisper in his ear that you''re still a virgin. <<$boydesc>> distractedly scratches his chin "Wow, still a virgin and you''ve graduated from school? Well, maybe we can try it in your mouth or ass?"'
-					if huntersIgorQw <= 45 and klismaday ! daystart:
-						' - Oh, anal won''t work <<$boydesc>>, I''m not quite ready...errr, or clean if you know what I mean...'
-						' - I understand, <<$boydesc>> says. -  Okay, next time make sure you clean your ass first.'
-					end
-					if huntersIgorQw > 45:
-						'-<<$pcs_nickname>>, I want to be the first man inside you. It will only hurt you a little and I promise to be gentle.'
-						'-<<$boydesc>>, honey, I really want to, but if <<$npc_nickname[''A29'']>> finds out, she is going to kill me.'
-						'-Well... you know? I will say that we''re serious, that we''re in love and everything else...'
-					end
-
-					if huntersIgorQw <= 45:xgt 'hunterLoveSex', 'din_hunters_bj'
-					if huntersIgorQw > 45: act 'To lose innocence':gt 'hunterLoveSex', 'din_hunters_first_sex'
-					if huntersIgorQw > 45:
-						act 'Part with a guy':
-							*clr & cla
-							npc_sex[$boy] -= 1
-							minut += 5
-							if huntersIgorLove = 2:bfA = 0
-							huntersIgorLove = 0
-							huntersIgorQw -= 100
-							pcs_dom += 1
-							gs 'stat'
-							'<center><H4>Hut</H4></center>'
-							'<center><video autoplay loop src="images/pc/kotovotkaz.mp4"></video></center>'
-							'-Sorry <<$boydesc>>, I''d really like to, but i''m just not ready yet.'
-							'-<<$pcs_nickname>>, I am a normal guy and want normal sex with my girlfriend now that we''re together. Can''t you understand that?'
-							'-<<$boydesc>>, I said no. I think we better leave it at that if you don''t want me to get upset. If this is going to be a problem then I don''t think we can be together.'
-							*pl
-							'You broke up with your boyfriend'
-							act 'Go':gt $loc, $metka
-						end
-					end
-				end
-			else
-				act 'I''m still a virgin':
-					*clr & cla
-					minut += 5
-					gs 'stat'
-					'You tell him that you are still a virgin. <<$boydesc>> smiles "<<$pcs_nickname>> you finished school and you''re how old? Do you think you can take me in your mouth or ass?"'
-					xgt 'hunterLoveSex', 'din_hunters_bj'
-					act 'To lose innocence':gt 'hunterLoveSex', 'din_hunters_first_sex'
-				end
-			end
-		else
-			act 'Undress':
-				*clr & cla
-				minut += 5
-				gs 'stat'
-				'<center><video autoplay loop src="images/shared/sex/undress/kotovpre1'+rand(1,6)+'.mp4"></video></center>'
-				'You quickly peel off each others clothes and <<$boydesc>> sees you naked for the first time.'
-
-				if mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-			end
-		end
-	elseif huntersIgorLove > 0 and huntersIgorQw > 50:
-		harakBoyH = 1
-		hunters_bj_times = 0
-		boyonceA = 1
-
-		gs 'boyStat', 'A173'
-		npc_sex[$boy] += 1
-		gs 'stat'
-		ihls = rand(1,3)
-		if pcs_horny >= 60:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/sequence/kotovpre'+rand(1,2)+'.mp4"></video></center>'
-			'<<$boydesc>> and you begin to hug and kiss, carressing eachothers bodies, getting more and more excited as you do.'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-			if mesec > 0  and klismaday ! daystart:
-				' - <<$boydesc>>: Damn, they weren''t lying about what they said about that body of yours.'
-				'- Only good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-				'- Oh, anal won''t work for me today <<$boydesc>>, I''m not quite ready...if you know what I mean...'
-				'- I understand, says <<$boydesc>>. -  Okay, next time, come with a clean ass!'
-			end
-			if mesec > 0  and klismaday = daystart:
-				' - <<$boydesc>>: Damn, they weren''t lying about what they said about that body of yours.'
-				'- Only good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-				'- Well... - you mutter.'
-			end
-
-			act 'To jump on him':
-				*clr & cla
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/sequence/kotovpre2'+rand(0,2)+'.mp4"></video></center>'
-				'You jump up onto the lap of your boyfriend.'
-				'Continuing your makeout session, you gently rub your hand against his crotch, feeling his rapidly hardening cock through the fabric of his pants.'
-
-				gs 'arousal', 'foreplay', 5, 'sub'
-				gs 'stat'
-				if pcs_horny >= 80 and mesec <= 0: act 'Take his dick':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if pcs_horny < 80 and mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			end
-
-			act 'Undress':
-				*clr & cla
-				minut += 5
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/undress/kotovpre1'+rand(1,6)+'.mp4"></video></center>'
-				'You quickly took off  <<$boydesc>>''s clothes and gaze at his gorgeous naked body.'
-
-				if pcs_dom > 50 and mesec <= 0: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if pcs_dom > 30 and mesec <= 0: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if pcs_dom > 10 and mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if pcs_dom <= 10 and mesec <= 0: act 'Obey him':gt 'hunterLoveSex', 'din_hunters_sub'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			end
-		elseif pcs_horny < 60 and ihls = 1:
-			*clr & cla
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/kiss/kotovpre30.mp4"></video></center>'
-			'<<$boydesc>> throws you on the bed and pounces on top of you, pinning you down.'
-			'Longing to taste his lips, <<$boydesc>> manages to rip off your clothes as your devour his mouth with your own'
-			gs 'arousal', 'kiss', 5, 'sub'
-			gs 'stat'
-			*pl
-			if mesec <= 0: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		elseif pcs_horny < 60 and ihls = 2 and hunters_kuni = 1:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre50.mp4"></video></center>'
-			'<<$boydesc>> throws you on the bed and immediately drops down to begin kissing and licking between your legs '
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-			*pl
-			if mesec <= 0: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		elseif pcs_horny < 60 and ihls = 2 and hunters_kuni = 0:
-			*clr & cla
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre60.mp4"></video></center>'
-			'You kiss him as you undress eachother. He fondles your tits and pinches your nipples as you begin stroking his cock. You feel him continue to harden in your hands.'
-			'<<$boydesc>> raises his hands to your shoulders and applies gentle pressure. You know exactly what he''s asking you to do...'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-			*pl
-			if mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		else
-			*clr & cla
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre4'+rand(0,2)+'.mp4"></video></center>'
-			'Bursting into the room <<$boydesc>> pushes you onto the bed, stripping and caressing your ass'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		end
-	end
-end
-
-if $ARGS[0] = 'Andrei':
-	if huntersAndreiLove > 0 and pcs_vag = 0:
-		harakBoyH = 1
-		hunters_bj_times = 0
-		boyonceA = 1
-
-		gs 'boyStat', 'A172'
-		npc_sex[$boy] += 1
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/andreihanter.jpg"></center>'
-		'<<$boydesc>> holds you in his arms and begins kissing you. "<<$pcs_nickname>>, take off your clothes."'
-		gs 'arousal', 'kiss', 5, 'sub'
-		gs 'stat'
-		act 'I''m still a virgin':
-			*clr & cla
-			minut += 5
-			gs 'stat'
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/pc/kotovotkaz.mp4"></video></center>'
-			'You, blushing, whisper to him that you''re still a virgin.'
-			'-<<$pcs_nickname>>, I want to be your first, and I''m not gonna hurt you, I promise.'
-			'-<<$boydesc>>, honey, I really want to, but if my <<$npc_nickname[''A29'']>> finds out, she is going to kill me, you reply.'
-			'-Well, you know what? In short, it''s either your <<$npc_nickname[''A29'']>> or me...'
-
-			act 'To lose innocence':gt 'hunterLoveSex', 'din_hunters_first_sex'
-			act 'Part with a guy':
-				*clr & cla
-				minut += 5
-				huntersAndreiLove = 0
-				huntersAndreiQw -= 1
-				pcs_dom += 1
-				npc_sex[$boy] -= 1
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/pc/kotovotkaz.mp4"></video></center>'
-				'-Sorry <<$boydesc>>, I''d really like to, but I''ve never done it before.'
-				'-<<$pcs_nickname>>, I''m a normal guy and I want to do the things that normal couples do now that we''re together.'
-				'-<<$boydesc>>, I said no. If that''s going to be your attitude then I don''t think that we can be together.'
-				*pl
-				'You broke up with your boyfriend'
-				act 'Go':gt $loc, $metka
-			end
-		end
-	elseif huntersAndreiLove > 0 and pcs_vag > 0:
-		harakBoyH = 1
-		hunters_bj_times = 0
-		boyonceA = 1
-
-		gs 'boyStat', 'A172'
-		npc_sex[$boy] += 1
-
-		ihls = rand(1,3)
-		if pcs_horny >= 60:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/sequence/kotovpre0.mp4"></video></center>'
-			'<<$boydesc>> and you began to hug and kiss.'
-			'Your hands are all over eachother, making you both more and more aroused and excited'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-			if mesec > 0  and klismaday ! daystart:
-				' - <<$boydesc>>, Damn, they weren''t lying about what they said about that body of yours.'
-				'- Only good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-				'- Oh, anal won''t work for me today <<$boydesc>>, I''m not quite ready...if you know what I mean...'
-				'- Yeah fuck <<$pcs_nickname>>, you say you have a headache, huh? Okay, next time, don''t forget to come prepared to fuck.'
-			end
-			if mesec > 0  and klismaday = daystart:
-				' - <<$boydesc>>, Damn, they weren''t lying about what they said about that body of yours.'
-				'- Only good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-				'- Well... - you mutter.'
-			end
-
-			act 'To jump on him':
-				*clr & cla
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/sequence/kotovpre2'+rand(0,2)+'.mp4"></video></center>'
-				'You jump up onto the lap of your boyfriend.'
-				'Continuing your makeout session, you gently rub your hand against his crotch, feeling his rapidly hardening cock through the fabric of his pants.'
-				*pl
-				gs 'arousal', 'foreplay', 5, 'sub'
-				gs 'stat'
-				if pcs_horny >= 80 and mesec <= 0: act 'Take the dick':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if pcs_horny < 80 and mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			end
-			act 'Undress':
-				*clr & cla
-				minut += 5
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/undress/kotovpre1'+rand(1,6)+'.mp4"></video></center>'
-				'You quickly take off his clothes and stare at <<$boydesc>>''s naked body for the first time.'
-
-				if pcs_dom > 50 and mesec <= 0: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if pcs_dom > 30 and mesec <= 0: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if pcs_dom > 10 and mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if pcs_dom <= 10 and mesec <= 0: act 'Obey him':gt 'hunterLoveSex', 'din_hunters_sub'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			end
-		elseif pcs_horny < 60 and ihls = 1:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/kiss/kotovpre30.mp4"></video></center>'
-			'<<$boydesc>> throws you on the bed and pounces on top of you'
-			'You long for his kisses. <<$boydesc>> somehow manages to rip off you clothes even as you devour his mouth with your own'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		elseif pcs_horny < 60 and ihls = 2 and hunters_kuni = 1:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre50.mp4"></video></center>'
-
-			'<<$boydesc>> throws you on the bed and lowers himself between your legs, licking and sucking at your pussy'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		elseif pcs_horny < 60 and ihls = 2 and hunters_kuni = 0:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre60.mp4"></video></center>'
-			*pl
-			'You kiss him as you undress eachother. He fondles your tits and pinches your nipples as you begin stroking his cock. You feel him continue to harden in your hands.'
-			'<<$boydesc>> raises his hands to your shoulders and applies gentle pressure. You know exactly what he''s asking you to do...'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		else
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre4'+rand(0,2)+'.mp4"></video></center>'
-			'Bursting into the room, <<$boydesc>> pushes you onto the bed, stripping and caressing your ass'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		end
-	end
-end
-
-if $ARGS[0] = 'Sergei':
-	if huntersSergeiLove > 0 and huntersSergeiQw <= 40:
-		harakBoyH = 1
-		hunters_bj_times = 0
-		boyonceA = 1
-
-		gs 'boyStat', 'A174'
-		npc_sex[$boy] += 1
-		'<center><H4>Hut</H4></center>'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/hunters/sergeihanter.jpg"></center>'
-		'<<$boydesc>> holds you in his arms and kisses you deeply. "<<$pcs_nickname>>, take off your clothes."'
-		gs 'arousal', 'foreplay', 5, 'sub'
-		gs 'stat'
-		if pcs_vag = 0 and sex = 0:
-			if SchoolAtestat = 0:
-				act 'I''m still a virgin':
-					*clr & cla
-					minut += 5
-					gs 'stat'
-					'<center><H4>Hut</H4></center>'
-					'<center><video autoplay loop src="images/pc/kotovotkaz.mp4"></video></center>'
-					*pl
-					if huntersSergeiQw <= 35:'You, blushing, whisper to him that you''re still a virgin. <<$boydesc>> distractedly scratches his chin "A high school graduate and still a virgin? Wow! Well, maybe in i can use your mouth or ass?."'
-					if huntersSergeiQw <= 35 and klismaday ! daystart:
-						' - Oh, anal won''t work for me today <<$boydesc>>, I''m not quite ready...if you know what I mean...'
-						'- I understand, <<$boydesc>> says. -  Okay, next time, come with a clean booty.'
-					end
-					if huntersSergeiQw > 35:
-						'-<<$pcs_nickname>>, I want to be your first, I won''t hurt you.'
-						'-<<$boydesc>>, honey, I really want to, but if  my <<$npc_nickname[''A29'']>> finds out, she is going to kill me.'
-						'-Well, if she does just tell her that we love eachother'
-					end
-
-					if huntersSergeiQw <= 35: xgt 'hunterLoveSex', 'din_hunters_bj'
-					if huntersSergeiQw > 35: act 'To lose innocence': gt 'hunterLoveSex', 'din_hunters_first_sex'
-					if huntersSergeiQw > 35:
-						act 'Part with a guy':
-							*clr & cla
-							minut += 5
-							npc_sex[$boy] -= 1
-							huntersSergeiLove = 0
-							huntersSergeiQw -= 100
-							pcs_dom += 1
-							gs 'stat'
-							'<center><H4>Hut</H4></center>'
-							'<center><video autoplay loop src="images/pc/kotovotkaz.mp4"></video></center>'
-							'-Sorry <<$boydesc>>, I''d really like, but i''ve never done that before.'
-							'-<<$pcs_nickname>>, I''m a normal guy and want normal sex with you.'
-							'-<<$boydesc>>, I said no. If you can''t accept that then i don''t think this is going to work out.'
-							*pl
-							'You broke up with your boyfriend'
-						end
-						act 'Go':gt $loc, $metka
-					end
-				end
-			else
-				act 'I''m still a virgin':
-					*clr & cla
-					minut += 5
-					gs 'stat'
-					'You tell him that you''re still a virgin. <<$boydesc>> smiles "<<$pcs_nickname>> you finished school, and you''re how old? You think you can take it in your mouth or in your ass."'
-					xgt 'hunterLoveSex', 'din_hunters_bj'
-					act 'To lose innocence':gt 'hunterLoveSex', 'din_hunters_first_sex'
-				end
-			end
-		else
-			act 'Undress':
-				*clr & cla
-				minut += 5
-				gs 'stat'
-				'<center><video autoplay loop src="images/shared/sex/undress/kotovpre1'+rand(1,6)+'.mp4"></video></center>'
-				'You quickly take off his clothes and see <<$boydesc>> naked for the first time.'
-
-				if mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-			end
-		end
-
-	elseif huntersSergeiLove > 0 and huntersSergeiQw > 40:
-		harakBoyH = 1
-		hunters_bj_times = 0
-		boyonceA = 1
-
-		gs 'boyStat', 'A174'
-		npc_sex[$boy] += 1
-		gs 'stat'
-		ihls = rand(1,3)
-		if pcs_horny >= 60:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/sequence/kotovpre4.mp4"></video></center>'
-			'<<$boydesc>> and you begin to hug and kiss. Your hands wander all over eachothers clearly aroused bodies. The raw sexual energy you''re both emitting is overpowering.'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-			if mesec > 0  and klismaday ! daystart:
-				' - <<$boydesc>>, Damn, they weren''t lying about what they said about that body of yours.'
-				'- Only good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-				'- Oh, anal won''t work for me today <<$boydesc>>, I''m not quite ready...if you know what I mean...'
-				' - I understand, <<$boydesc>> says. -  Okay, next time, come with a clean ass.'
-			end
-			if mesec > 0  and klismaday = daystart:
-				' - <<$boydesc>>, Damn, they weren''t lying about what they said about that body of yours.'
-				'- Only good things, <<$pcs_nickname>>. Do you want it in the ass or in the mouth? " he asks you.'
-				'- Well... - you mutter'
-			end
-
-			act 'To jump on him':
-				*clr & cla
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/sequence/kotovpre2'+rand(0,3)+'.mp4"></video></center>'
-				'You jump onto the lap of your boyfriend.'
-				'Continuing to kiss him, you gently rub your hand against his crotch. You can feel his cock stiffen and straighten as you caress it to attention.'
-				gs 'arousal', 'foreplay', 5, 'sub'
-				gs 'stat'
-				if pcs_horny >= 80 and mesec <= 0: act 'Take the dick':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if pcs_horny < 80 and mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			end
-
-			act 'Undress':
-				*clr & cla
-				minut += 5
-				gs 'stat'
-				'<center><H4>Hut</H4></center>'
-				'<center><video autoplay loop src="images/shared/sex/undress/kotovpre1'+rand(1,6)+'.mp4"></video></center>'
-				'You quickly took off <<$boydesc>>''s clothes, exsposing his naked body to your greedy eyes for the first time.'
-
-				if pcs_dom > 50 and mesec <= 0: act 'Jump on top of him':gt 'hunterLoveSex', 'din_hunters_sex_cow'
-				if pcs_dom > 30 and mesec <= 0: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-				if pcs_dom > 10 and mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-				if pcs_dom <= 10 and mesec <= 0: act 'Obey him':gt 'hunterLoveSex', 'din_hunters_sub'
-				if mesec > 0:xgt 'hunterLoveSex', 'din_hunters_bj'
-			end
-		elseif pcs_horny < 60 and ihls = 1:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/kiss/kotovpre30.mp4"></video></center>'
-			'<<$boydesc>> he throws you onto the bed and pounces on top of you.'
-			'As you furiously devour his mouth with your own, <<$boydesc>> somehow manages to tear off your clothes, leaving you naked before him.'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Spread your legs ':gt 'hunterLoveSex', 'din_hunters_sex_misionary'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		elseif pcs_horny < 60 and ihls = 2 and hunters_kuni = 1:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre50.mp4"></video></center>'
-			'<<$boydesc>> throws you on to the bed and, spreading your legs wide, immediately turns his attention to your obviously dripping pussy'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Enjoy':gt 'hunterLoveSex', 'din_hunters_sex_kuni'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		elseif pcs_horny < 60 and ihls = 2 and hunters_kuni = 0:
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre60.mp4"></video></center>'
-			*pl
-			'You kiss <<$boydesc>> while undressing each other. He fondles your boobs and tweaks your nipples as you gently massage his rapidly hardening cock.'
-			'<<$boydesc>> gently pushes down on your shoulders. You know exactly what he''s asking for...'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'Kneel':gt 'hunterLoveSex', 'din_hunters_bj200'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		else
-			'<center><H4>Hut</H4></center>'
-			'<center><video autoplay loop src="images/shared/sex/undress/kotovpre4'+rand(0,2)+'.mp4"></video></center>'
-			'Bursting into the room <<$boydesc>> pushes you down onto the bed while stripping and caressing your ass'
-			gs 'arousal', 'foreplay', 5, 'sub'
-			gs 'stat'
-
-			if mesec <= 0: act 'bend over':gt 'hunterLoveSex', 'din_hunters_sex_dog'
-			if mesec > 0:xgt 'hunterLoveSex', 'din_mesec'
-		end
-	end
-end
-
-
---- hunterLoveSex ---------------------------------
-

locations/IrinaRoom.qsrc

@@ -191,6 +191,9 @@ if $ARGS[0] = 'first5':
 	'You pumped Ira with wine, she is highly intoxicated and spilled wine on myself. She went into the bathroom to change. You, too, went in and offered to help her.'
 	'She undresses and you have decided to follow suit and after undressing climb into the shower. You start lathering her body and see that she is flushed and her nipples erect.'
 
+	dynamic $showerdin
+	if frost > 0:frost = 0
+
 	gs 'arousal', 'foreplay', 10, 'lesbian'
 	gs 'stat'
 	

locations/KatjaHomeTalk.qsrc

@@ -223,8 +223,8 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and KatjaConflict = 0 and kid = 0:
-		if knowKatjaPreg = 1 and pregtime >= 150:
+	if npc_pregtalk['A14'] = 0 and KatjaConflict = 0 and kid = 0:
+		if knowKatjaPreg = 1 and pregchem >= 3600:
 			cla
 			gs 'stat'
 			minut += 5
@@ -233,7 +233,7 @@ if $ARGS[0] = '':
 			'"Are you pregnant? Why didn''t you tell me? I thought we were closer than that. I told you that I was pregnant. I need to think. We''ll talk later"'
 
 			act 'Say goodbye and go home':gt 'pavResidential'
-		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
+		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
 			act 'Tell her you''re pregnant':
 				cls
 				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
@@ -242,7 +242,7 @@ if $ARGS[0] = '':
 				*nl
 				act 'Next':gt 'KatjaHomeTalk', 'katjaknows'
 			end
-		elseif KatjaPreg = 0 and pregtime >= 150:
+		elseif KatjaPreg = 0 and pregchem >= 3600:
 			cla
 			*nl
 			minut += 5
@@ -251,7 +251,7 @@ if $ARGS[0] = '':
 			'"Are you pregnant? Why didn''t you tell me? I thought we were closer than that. I need to think. We''ll talk later"'
 
 			act 'Say goodbye and go home':gt 'pavResidential'
-		elseif KatjaPreg = 0 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
+		elseif KatjaPreg = 0 and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
 			act 'Tell her you''re pregnant':
 				cls
 				'<center><b><font color="maroon"><<$npc_firstname[''A14'']>> <<$npc_lastname[''A14'']>></font></b></center>'
@@ -263,8 +263,8 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and (KatjaConflict = 0 or katjaconflict = 2) and kid > 0:
-		if knowKatjaPreg = 1 and pregtime >= 150:
+	if npc_pregtalk['A14'] = 0 and (KatjaConflict = 0 or katjaconflict = 2) and kid > 0:
+		if knowKatjaPreg = 1 and pregchem >= 3600:
 			cla
 			gs 'stat'
 			minut += 5
@@ -272,7 +272,7 @@ if $ARGS[0] = '':
 			KatConCheck = daystart
 			'"You''re pregnant again?" Her face turns red and her expression is far angrier than you''ve ever seen her. "After everything, you still didn''t trust me enough to tell me," she screams. "I thought there was something special between us." Tears begin rolling down her cheeks. "Just leave me alone, I don''t even want to see you right now."'
 			act 'Say goodbye and go home':gt 'pavResidential'
-		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregtime > 0 and (KatjaConflict = 0 or katjaconflict = 2) and pregtime < 150:
+		elseif knowKatjaPreg = 1 and knowpreg = 1 and pregchem > 0 and (KatjaConflict = 0 or katjaconflict = 2) and pregchem < 3600:
 			act 'Tell her you''re pregnant':
 				cls
 				gs 'stat'
@@ -285,7 +285,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid = 0:
+	if npc_pregtalk['A14'] = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid = 0:
 		act 'Apologize':
 			cls
 			gs 'stat'
@@ -299,7 +299,7 @@ if $ARGS[0] = '':
 		end
 	end
 
-	if pregTalkKatja = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid > 0:
+	if npc_pregtalk['A14'] = 0 and KatjaConflict = 1 and KatConCheck ! daystart and kid > 0:
 		act 'Apologize':
 			cls
 			gs 'stat'
@@ -318,7 +318,7 @@ end
 
 if $ARGS[0] = 'katjaknows':
    cla
-   pregTalkKatja = 1
+   npc_pregtalk['A14'] = 1
 	*nl
 	if KatjaSlut < 60 and $wombthfath = 'Kolka' and npc_rel['A34'] > 50:
 		minut += 10
@@ -416,7 +416,7 @@ end
 
 if $ARGS[0] = 'katjaknows1':
 	cla
-	pregTalkKatja = 1
+	npc_pregtalk['A14'] = 1
 	if KatjaSlut < 60: 
 		'"So, hot stuff. Same father as last time?"'
 	else

locations/Komp.qsrc

@@ -475,6 +475,11 @@ if $ARGS[0] = 'rabota':
 						minut += 20
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/accessories/computer/camwhore2.jpg"></center>'
+						if $pcs_webcamname = '':
+							'You consider which name you''d like to register under.'
+								$pcs_webcamname = input("Which name would you like to use? (Leave blank for <<$pcs_nickname>>)")
+							if $pcs_webcamname = '':$pcs_webcamname = '<<$pcs_nickname>>'
+						end
 						'You fill out the questionnaire and register yourself as a webcam model. Ten minutes later, you have already been approved and you can now earn money as a webcam girl.'
 						'Of course, you will need a functioning webcam to do this! If you don''t have one yet, they are fairly cheap to buy at most local supermarket chains.'
 						act 'Leave this website':gt 'Komp','brows'

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

locations/LakeBoyDy.qsrc

@@ -192,44 +192,7 @@ if $ARGS[0] = 'slap':
 							'The bald guy looks at you indifferently and yawns: "That''s really not my problem, <<$pcs_nickname>>. But you know what, I''m a nice guy," he says with a fake smile. "I will reduce it to <<belgangPayWeekAmount>> <b>₽</b> each week and I''ll get you started."'
 							'He pulls down his trunks, revealing his flacid cock. His associate grabs you by the hair and pushes your head down towards the fat man''s groin: "You want some money, bitch? Go ahead... !"'
 
-							act'Suck him off':
-								cls
-								if sashaBeliSex=0:sashaBeliSex=1&guy+=1
-								spafinloc = 12
-								gs 'cum_manage'
-								belgangday=daystart
-								belgangProstitute = 1
-								swallow +=1
-								gs'stat'
-								
-								'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/beachblow.jpg"></center>'
-								'You take his flacid cock in your mouth and begin to suck, slowly feeling it harden inside your mouth. Once you''ve warmed him up properly, he takes control of you and begins to fuck your throat, while you do your best to surpress your gag reflex. A few minutes later, he shoots his thick ropes of cum deep down your throat, pulling his cock out only to drop the last few gobs onto your tongue. It tastes quite bitter, and you have to force yourself to hide the disgust on your face. When you look over at his accomplice, you see he shot a video of you performing a deepthroating blowjob on your phone. He sends the video to a different number, and then deletes the file from your phone.'
-								'The fat man casually pushes you on your back while he gets up. He looks down at you and indifferently says: "Not bad, whore. You still have a lot to learn but we will work on that. Now listen, that blowjob just took 100 <b>₽</b> off your debt. If you don''t pay me <<belgangPayWeekAmount>> <b>₽</b> each week until you payed of your debts, you''re going to earn them for me one way or the other. I know just the place. For your sake: make sure you bring the money."'
-								if belfirstweek = 1:
-									'"I expect the first payment by the end of next week. By the way, you can call me Mr. Bely."'
-								elseif belfirstweek = 0:
-									'"I expect the first payment next Sunday. By the way, you can call me Mr. Bely."'
-								end	
-								'The two men leave you to collect your thoughts and walk away, taking a seat a bit further down at the beach. The younger guy pulls out his phone and watches the video of you giving the fat man a blowjob again, while the fat man makes a call with your passport in his hand - you hope he''s not digging up more info on you while you quickly gather your things and get ready to leave.'
-								if belfirstweek = 0:
-									belgangPayWeek = belgangPayWeekAmount
-								end
-								belgangPay -= 100
-								belgangPayWeek -= 100
-								' '
-								'You owe him: <<belgangPay>> <b>₽</b>'
-								if belgangPayWeek >= 0:
-									'This week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
-								else
-									'This week you need to pay him: 0 <b>₽</b>'
-									'You have reduced your next weeks payment by: <<-1*belgangPayWeek>> <b>₽</b>'
-								end
-								gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
-								gs 'arousal', 'end'
-								gs 'stat'
-								
-								act 'Move away from them':gt'glake'
-							end
+							act 'Suck him off': gt 'LakeBoyDy', 'sucksasha'
 						end
 					end
 				 
@@ -246,47 +209,7 @@ if $ARGS[0] = 'slap':
 						'The bald guy looks at you indifferently and yawns: "That''s really not my problem, <<$pcs_nickname>>. But you know what, I''ll get you started."'
 						'He pulls down his trunks, revealing his flaccid cock. His associate grabs you by the hair and pushes your head down towards the fat man''s groin: "You want some money, bitch? Go ahead... !"'
 
-						act 'Suck him off':
-							cls
-							if sashaBeliSex=0:sashaBeliSex=1&guy+=1
-							spafinloc = 12
-							gs 'cum_manage'
-							belgangday = daystart
-							belgangProstitute = 1
-							swallow +=1
-							gs 'stat'
-							
-							'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/beachblow.jpg"></center>'
-							'You take his flaccid cock in your mouth and begin to suck, slowly feeling it harden inside your mouth. Once you''ve warmed him up properly, he takes control of you and begins to fuck your throat, while you do your best to surpress your gag reflex. A few minutes later, he shoots his thick ropes of cum deep down your throat, pulling his cock out only to drop the last few gobs onto your tongue. It tastes quite bitter, and you have to force yourself to hide the disgust on your face. When you look over at his accomplice, you see he shot a video of you performing a deepthroating blowjob on your phone. He sends the video to a different number, and then deletes the file from your phone.'
-							'The fat man casually pushes you on your back while he gets up. He looks down at you and indifferently says: "Not bad, whore. You still have a lot to learn but we will work on that. Now listen, that blowjob just took 100 <b>₽</b> off your debt. If you don''t pay me <<belgangPayWeekAmount>> <b>₽</b> each week until you payed of your debts, you''re going to earn them for me one way or the other. I know just the place. For your sake: make sure you bring the money."'
-							if belfirstweek = 1:
-								'"I expect the first payment by the end of next week. By the way, you can call me Mr. Bely."'
-							elseif belfirstweek = 0:
-								'"I expect the first payment next Sunday. By the way, you can call me Mr. Bely."'
-							end	
-							'The two men leave you to collect your thoughts and walk away, taking a seat a bit further down at the beach. The younger guy pulls out his phone and watches the video of you giving the fat man a blowjob again, while the fat man makes a call with your passport in his hand - you hope he''s not digging up more info on you while you quickly gather your things and get ready to leave.'
-							if belfirstweek = 0:
-								belgangPayWeek = belgangPayWeekAmount
-							end
-							belgangPay -= 100
-							belgangPayWeek -= 100
-							' '
-							'You owe him: <<belgangPay>> <b>₽</b>'
-							if belgangPayWeek >= 0:
-								'This week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
-							else
-								'This week you need to pay him: 0 <b>₽</b>'
-								'You have reduced your next weeks payment by: <<-1*belgangPayWeek>> <b>₽</b>'
-							end
-							
-
-							
-							gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
-							gs 'arousal', 'end'
-							gs 'stat'
-							
-							act 'Move away from them': gt'glake'
-						end
+						act 'Suck him off': gt 'LakeBoyDy', 'sucksasha'
 					end
 				end
 			end
@@ -294,5 +217,45 @@ if $ARGS[0] = 'slap':
 	end
 end
 
+if $ARGS[0] = 'sucksasha':
+	cls
+	if sashaBeliSex=0:sashaBeliSex=1&guy+=1
+	spafinloc = 12
+	gs 'cum_manage'
+	belgangday = daystart
+	belgangProstitute = 1
+	swallow +=1
+	gs 'stat'
+	
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/beachblow.jpg"></center>'
+	'You take his flacid cock in your mouth and begin to suck, slowly feeling it harden inside your mouth. Once you''ve warmed him up properly, he takes control of you and begins to fuck your throat, while you do your best to surpress your gag reflex. A few minutes later, he shoots his thick ropes of cum deep down your throat, pulling his cock out only to drop the last few gobs onto your tongue. It tastes quite bitter, and you have to force yourself to hide the disgust on your face. When you look over at his accomplice, you see he shot a video of you performing a deepthroating blowjob on your phone. He sends the video to a different number, and then deletes the file from your phone.'
+	'The fat man casually pushes you on your back while he gets up. He looks down at you and indifferently says: "Not bad, whore. You still have a lot to learn but we will work on that. Now listen, that blowjob just took 100 <b>₽</b> off your debt. If you don''t pay me <<belgangPayWeekAmount>> <b>₽</b> each week until you payed of your debts, you''re going to earn them for me one way or the other. I know just the place. For your sake: make sure you bring the money."'
+	if belfirstweek = 1:
+		'"I expect the first payment by the end of next week. By the way, you can call me Mr. Bely."'
+	elseif belfirstweek = 0:
+		'"I expect the first payment next Sunday. By the way, you can call me Mr. Bely."'
+	end	
+	'The two men leave you to collect your thoughts and walk away, taking a seat a bit further down at the beach. The younger guy pulls out his phone and watches the video of you giving the fat man a blowjob again, while the fat man makes a call with your passport in his hand - you hope he''s not digging up more info on you while you quickly gather your things and get ready to leave.'
+	if belfirstweek = 0:
+		belgangPayWeek = belgangPayWeekAmount
+	end
+	belgangPay -= 100
+	belgangPayWeek -= 100
+	' '
+	'You owe him: <<belgangPay>> <b>₽</b>'
+	if belgangPayWeek >= 0:
+		'This week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
+	else
+		'This week you need to pay him: 0 <b>₽</b>'
+		'You have reduced your next weeks payment by: <<-1*belgangPayWeek>> <b>₽</b>'
+	end
+	
+	gs 'arousal', 'bj', 15, 'sub', 'deepthroat'
+	gs 'arousal', 'end'
+	gs 'stat'
+	
+	act 'Move away from them': gt'glake'
+end
+
 --- LakeBoyDy ---------------------------------
 

locations/MagEncounterFairy.qsrc

@@ -175,7 +175,7 @@ if $ARGS[0] = 'fairy_chat':
 					if clit_size >= 80:'<center><img <<$set_imgh>> src="images/pc/body/clit/clit5.jpg"></center>'
 					'You hear a giggle and you feel a warm tingle at the top of your slit, you reach down and part your pussy lips with your fingers.'
 					'Your clitoris has shunk, and seems to more demure than before! You can''t help but rub all around it, feeling the warm tingling and the moisture build at the entrance.'
-				elseif fairy_surprise <= 7:
+				elseif fairy_surprise <= 6:
 					min_arousal += rand(1,5)
 					'You hear a giggle, then sparkles surround your body and you get all tingly.'
 					'You suddenly feel flustered and more aroused then before.'
@@ -194,7 +194,7 @@ killvar '$din_fairy_chat_no1' & killvar '$din_fairy_shoo' & killvar '$din_fairy_
 
 if $ARGS[0] = 'fairychattopic':
 !!	These are the random chat texts for the Fairy from UsagiTripleSix
-	frandchat = rand(0,14)
+	frandchat = rand(0,16)
 
 	if frandchat = 1:
 		'You spend a while chatting with the fairy. She openly wonders why human children need to go to school, and brags about how fairies already know everything there is to know.'
@@ -224,8 +224,46 @@ if $ARGS[0] = 'fairychattopic':
 		'You have a scary thought while talking to the fairy. Since she''s real, you ask her how many other mythical creatures are real as well. She tells you that she''s sure that there are others out there, but she usually doesn''t stray far from the park.'
 	elseif frandchat = 14:
 		'You get into a pretty heated discussion with the fairy over whether dogs or cats are better. Well, it''s mostly the fairy that gets heated. It would be a mundane discussion for anyone else, but she takes it very seriously.'
-	else
+	elseif frandchat = 15:
 		'Today the fairy introduces you to fairy knock-knock jokes. She spends almost half an hour telling joke after joke, but you failed to understand a single one. By the time you''re ready to leave, she''s complaining about how humans have no sense of humor.'
+	else:
+		! Teleport event
+		if spellKnown['teleport'] = 0:
+			!show and teach Teleport spell
+			'The Fairy wraps her arms around your thumb and lightly tugs you over to a mysterious circle of trees.'
+			''
+			'She says, "You may have seen these circles of trees around the lands.  Fairies planted them long ago and used their magic to tether them together.  Since you also have Fae magic, I can show you how to use them."'
+			''
+			'She continues,"Most of the work was already done in the binding.  In a way, the trees of each circle are the same trees.  You just have to stand inside the circle, then hold in your mind a picture of another circle that you have been to before.  Then you say the word <i>inla</i>.  If your will is strong enough and you have enough magical energy, your energy can be used to enact your will."'
+			''
+			'She giggles.  "This lets you dance through any field you like!  "Let''s go!"'
+			''
+			'She grunts and give you a nudge into the circle.'
+			act 'Stumble into Circle':
+				''
+				'The view outside the circle seems blurry and a little indistinct.  The Fairy''s face scrunches up in concentration as she incants "inla", and the world outside seems to shimmer a little. You feel like you understand how she did that.  Though you can''t tell exactly where you are now in the blurriness, it does look different.'
+				''
+				'The Fairy says, "It''s important to take the time to feel each Fairy Ring, that''s how you can find your way back."  She flies off.'
+				''
+				'You decide it would be wise to memorize your surroundings.'
+				spellKnown['teleport'] = 1
+				tpKnown['GadForest'] = 1
+				cla
+				act 'You step out of the circle...':gt 'gadforest', '1'
+			end
+		else:
+			!take the user to random location
+
+			'The Fairy nudges you into the nearby tree circle, and giggles as you hear her incant "inla", then flies out of the ring.'
+
+			$tpRand[0]='GadForest'
+			$tpRand[1]='PushkinPark'
+			$tpRand[2]='Village'
+
+			gt 'treeCircle', $tpRand[rand(0,2)]
+
+			killvar $tpRand
+		end
 	end
 
 	act 'Go on your way': killvar 'frandchat' & gt $loc, $metka

locations/MartinTalk.qsrc

@@ -445,7 +445,6 @@ if $ARGS[0] = '':
 				'Martin chuckles. "Alright, you can have your secrets." But you can tell that he is a little disappointed you didn''t tell him more about yourself.'
 				*nl
 				'Still, he does what he can to hide that and give the conversation a new direction. "So, where do you live?"'
-			
 			else
 				'"I know that you are... doing porn," Martin tells you quietly.'
 				'Your face falls. You try to keep your cool, but you''re feeling cold all of a sudden. Why is he bringing this up?'
@@ -467,10 +466,9 @@ if $ARGS[0] = '':
 				'His smile infects you too. "Yeah, maybe."'
 				*nl
 				'Despite your relief, both of you fall silent for a while. It''s a lot to process, after all, and the question that goes through your head - if Martin had been jerking off to your videos - is annoyingly persistent. But with apparently nobody in the bar requiring his attention yet, Martin eventually feels like continuing the conversation somehow:' 
-				'"So, where do you live?"'
-					
-				act 'Continue': gt 'MartinTalk','MartinTalkApartment'
+				'"So, where do you live?"'	
 			end
+			act 'Continue': gt 'MartinTalk','MartinTalkApartment'
 		end
 			
 		if SchoolAtestat = 0: 

locations/Military.qsrc

@@ -1,6 +1,7 @@
 # Military
 
 if $ARGS[0] = 'start':
+	CLOSE ALL
 	$metka = $ARGS[0]
 	$loc = $CURLOC
 	$sexloc = $CURLOC

locations/Mirafather.qsrc

@@ -14,185 +14,258 @@ if tempmonth < month or (tempmonth = month and tempday <= day): boyage -= 1
 
 gs 'stat'
 
-if npc_QW['A64'] < 10:'<center><b><font color = maroon>Father Miroslava</font></b></center>'
-if npc_QW['A64'] >= 10:'<center><b><font color = maroon>Afanasiy</font></b></center>'
+if npc_QW['A64'] = 0:'<center><b><font color = maroon>Mira''s Father</font></b></center>'
+if npc_QW['A64'] > 0:'<center><b><font color = maroon>Afanasiy</font></b></center>'
 '<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+*nl
 'Mira''s father, <<boyage>> years old. After his wife died, he drank heavily and looks much older than he actually is. He is still in good shape for a man his age.'
 
-act 'Leave':gt 'miroslavahome', 'start'
+act 'Leave':gt 'MiroslavaHome', 'start'
 
-if MiraFather ! daystart:
-	MiraFather = daystart
-	
-	act 'Greet':
+if Mira_no > 0 and mirafathertalk = 0 and miraday ! daystart:
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+	*nl
+	'You are passing Mira''s house when you see Mira''s father headed in your direction.'
+	'"<<$pcs_firstname>>, wait. I need to speak with you," he says coming closer to you.'
+	'You stop and look at him frightfully. "Did Mira tell him what I made her do?" you think as panicked thoughts race through your head.'
+	'"<<$pcs_nickname>>, do you know what happened to Mira?" Afanasiy asks, looking you in the eye.'
+	'"N-no, what happened to her?" you ask in a confused voice, expecting him to start shouting any second.'
+	'"I don''t know. She is just sitting at home all the time. She doesn''t leave the yard, I''m concerned." Mira''s father answers.'
+	'"Oh, ah...I don''t know," you say, trying to make it sound believable and make your eyes look innocent. "Maybe she was by hurt some local boy, or had a fight with someone..."'
+	'"Okay, I think it will pass...soon I hope. But, I want you to come and visit us, I think your company would do Mira a lot of good. It might bring her out of this funk faster." Mira''s father says good-bye, and leaves to resume working around his house.'
+	'"Close call," you think as you watch his retreating back and exhale with relief.'
+	MiraLoc = 0
+	minut += 10
+	mirafathertalk = 1
+	gs'stat'
+
+	act 'Continue':gt 'Miroslava', 'Start'
+else
+	act 'Ask if Mira is home':
 		menu_off = 1
-		*clr & cla
-		if npc_QW['A64'] < 10:npc_QW['A64'] += 1
-		minut += 2
-		gs 'stat'
+		mira_temp = rand(1,20)
+		if sunWeather = 1:
+			if mira_temp > 15 and npc_QW['A60'] > 15 and hour >= 16 and hour <= 23:
+				*clr & cla
+				minut += 2
+				MiraLoc = 8
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+				*nl
+				'Mira''s father tells you that she''s not home, she left without telling him where she was going.'
+				
+				if mirapimp = 1:
+					'Mira is not home but you know exactly where to find her. She has been working as your prostitute on the highway'
+				elseif miraprost > 1:
+					'Mira is not home but you know exactly where to find her. You have seen her working as a prostitute on the highway.'
+				elseif miraprost = 1:
+					'Mira is not home but you think you know where to find her. Ever since granting your second wish you have heard rumors that Mira has been earning money as a prostitute on the highway.'
+				else
+					'Mira is not home and you have no idea where she might be. Maybe you should go look around town.'
+				end
+				act 'Leave':gt 'Gadukino'
+				if miraprost > 0: act 'Go to the highway': gt 'gadprostitutes','start'
+			elseif mira_temp > 10 and month >= 4 and month <= 10 and hour <= 18:
+				*clr & cla
+				minut += 2
+				MiraLoc = 1
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+				*nl
+				'Mira''s father tells you that she''s not home, she said she was going to the river.'
 
-		act 'Leave': gt 'miroslavahome', 'start'
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-		'You are greeted by Mira''s father and politely inquire about his health.  He responds with a smile and says,"All is well, little lady."'
-		if npc_QW['A64'] >= 10:
+				act 'Leave':gt 'Gadukino'
+				act 'Go to the river':gt 'gadriver','start'
+			else
+				MiraLoc = 0
+				gt 'Miroslava', 'Start'
+			end
+		else
+			MiraLoc = 0
+			gt 'Miroslava', 'Start'
+		end
+	end
 
-			act 'Chat':
+	if MiraFather ! daystart:
+		MiraFather = daystart
+		
+		if npc_QW['A64'] < 5:
+			act 'Ask how he''s doing':
 				*clr & cla
-				if npc_QW['A64'] < 20:npc_QW['A64'] += 1
+				menu_off = 1
+				if npc_QW['A64'] < 5:npc_QW['A64'] += 1
 				minut += 5
 				gs 'stat'
+				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-				'You spend several minutes chatting with Mira''s father about the weather and trivia.'
+				*nl
+				'You are greeted by '+iif(npc_QW['A64'] = 0, 'Mira''s father','Afanasiy')+' and politely inquire about his health.  He responds with a smile and says,"All is well, little lady."'
+				if npc_QW['A64'] = 0:'Mira''s father continues, "I''m glad Mira has finally found a friend here in the village. It will be good for her to have another girl around. By the way, you can call me Afanasiy."'
+				
+				act 'Continue': gt 'Mirafather'
+			end
+		elseif npc_QW['A64'] <= 10:
+			act 'Chat with him':
+				*clr & cla
+				menu_off = 1
+				if npc_QW['A64'] < 10:npc_QW['A64'] += 1
+				minut += 5
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+				*nl
+				'You spend several minutes chatting with Afanasiy about the weather and trivia.'
 
-				act 'Leave': gt 'miroslavahome', 'start'
+				act 'Continue': gt 'Mirafather'
 			end
 		end
-		if npc_QW['A64'] >= 20:
-
-			act 'Flirt':
+		
+		if npc_QW['A64'] >= 10 and npc_QW['A64'] <= 15:
+			act 'Flirt with him':
 				*clr & cla
-				if npc_QW['A64'] < 30:npc_QW['A64'] += 1
+				menu_off = 1
+				if npc_QW['A64'] < 15:npc_QW['A64'] += 1
+				gs 'arousal', 'foreplay', 10
+				gs 'arousal', 'end'
+				gs 'stat'
+				
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-				'You spend several minutes with Afanasiy, playful looking him over and smiling meaningfully at him.  He is glad of the company of a beautiful young woman.  A couple of times during your conversation, you noticed that his eyes roving up and down your body appraisingly.'
+				*nl
+				'You spend several minutes with Afanasiy, playful looking him over and smiling meaningfully at him.  He is happy with the company of a beautiful young woman.  A couple of times during your conversation, you notice his eyes roving up and down your body appraisingly.'
+				
+				act 'Continue': gt 'Mirafather'
+			end
+		end
+		
+		if npc_QW['A64'] = 15:
+			act 'Seduce him':
+				*clr & cla
+				menu_off = 1
+				npc_QW['A64'] = 16
 				gs 'arousal', 'foreplay', 10
 				gs 'stat'
-				if npc_QW['A64'] = 30:
+				
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+				*nl
+				'You move over and stand next to Afanasiy.  You let your hand start to stroke his thigh and slowly move towards his crotch. Afanasiy looks at you for a while deep in thought. Eventually he sighs, and then nods to himself as if he has made a decision. He takes you by the hand and leads you into his house, and then down the hall into his room.'
 
-					act 'Seduce him':
+				act 'Enjoy his touch':
+					*clr & cla
+					
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersexkuni.jpg"></center>'
+					*nl
+					'Afanasiy is a gentle lover. With practiced ease he gently undresses you and crouches before you.  His mouth and fingers play across the lips of your pussy, he skillfully licks you until, until he brings you a powerful orgasm.'
+					
+					$orgasm_or = 'yes'
+					gs 'arousal', 'cuni', 10
+					gs 'arousal', 'vaginal_finger', 10
+					gs 'stat'
+					
+					act 'Turn around for him':
 						*clr & cla
-						npc_QW['A64'] = 31
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-						'You move over and stand next to Afanasiy.  You let your hand start to strokie his thigh and end up on his chest. Afanasiy a releases languid sigh, licking his lips and in a couple of minutes nods to himself as if he has made a decision.  Which he has.  Athanasios, takes you by the hand and leds you into his house, and then down the hall into his room.'
-						gs 'arousal', 'foreplay', 10
-						gs 'stat'
-
-						act 'Enjoy':
-							*clr & cla
-							guy += 1
-							'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersexkuni.jpg"></center>'
-							'Afanasiy'' is a gentle lover.  With practiced ease he gently undresses you and crouches before you.  His mouth and fingers play across the lips of your pussy, he skillfully licks you until, until he brings you a powerful orgasm.'
-							$orgasm_or = 'yes'
-							gs 'arousal', 'cuni', 10
-							gs 'arousal', 'vaginal_finger', 10
-							minut -= 10
-							gs 'stat'
-
-							act 'Give':
-								*clr & cla
-								pose = 0
-								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex.jpg"></center>'
-								if mesec = 0 and pcs_vag > 0:
-									gs 'dinsex', 'boy_puts_condom'
-									gs 'dinsex','vaginal_sex',10
-									gs 'dinsex','sexcum'
-									gs 'arousal', 'vaginal', 10
-								else
-									gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
-									gs 'arousal', 'anal', 10, 'rough'
-								end
-								gs 'arousal', 'end'
-								gs 'stat'
-								act 'Leave': gt 'miroslavahome', 'start'
-							end
+						
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex.jpg"></center>'
+						*nl
+						pose = 0
+						if mesec = 0 and pcs_vag > 0:
+							gs 'dinsex', 'boy_puts_condom'
+							gs 'dinsex','vaginal_sex',10
+							gs 'dinsex','sexcum'
+							gs 'arousal', 'vaginal', 10
+						else
+							gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+							gs 'arousal', 'anal', 10
 						end
+						gs 'arousal', 'end'
+						gs 'stat'
+						
+						act 'Continue': gt 'Mirafather'
 					end
 				end
-				if npc_QW['A64'] > 30:
-
-					act 'Wink at him':
+			end
+		elseif npc_QW['A64'] > 15:
+			act 'Wink at him':	
+				*clr & cla
+				menu_off = 1
+				if npc_QW['A64'] < 20:npc_QW['A64'] += 1		
+				gs 'arousal', 'foreplay', 5
+				gs 'stat'
+				
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+				*nl
+				'You expressly wink at Afanasiy and he understands your meaning.  Looking about for nosy neighbors, he quickly waves for you to enter the house.'
+				
+				act 'Go inside':
+					*clr & cla
+					
+					pose = 0
+					temp_mf = rand(0,9)
+					if temp_mf = 0:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex.jpg"></center>'
+					elseif temp_mf = 1:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex1.jpg"></center>'
+					elseif temp_mf = 2:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex2.jpg"></center>'
+					elseif temp_mf = 3:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex3.jpg"></center>'
+					elseif temp_mf = 4:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex4.jpg"></center>'
+					elseif temp_mf = 5:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj.jpg"></center>'
+					elseif temp_mf = 6:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj1.jpg"></center>'
+					elseif temp_mf = 7:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj2.jpg"></center>'
+					elseif temp_mf = 8:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj3.jpg"></center>'
+					elseif temp_mf = 9:
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj4.jpg"></center>'
+					end
+					*nl
+					if temp_mf < 5:
+						if mesec = 0 or pcs_vag > 0:
+							gs 'dinsex', 'boy_puts_condom'
+							gs 'dinsex','vaginal_sex',10
+							gs 'dinsex','sexcum'
+							gs 'arousal', 'vaginal', 10
+						else
+							gs 'dinsex','boy_wants_anal','lubri'
+							gs 'dinsex','analsex'
+							gs 'arousal', 'anal', 10
+						end
+					else
+						gs 'oral','start'
+						gs 'arousal', 'bj', 10
+					end
+					gs 'stat'
+					
+					act 'Make him cum':
 						*clr & cla
-						pose = 0
-						temp_mf = RAND(0,5)
+						minut += 5
+						pcs_horny += 10
+						gs 'cum_call', 'stomach', $boy, 1,'','',15
+						gs 'cum_call', 'breasts', $boy, 1,'','',20
+						gs 'cum_call', 'mouth', $boy, 1,'','',5
+						gs 'arousal', 'end'
 						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
+						
+						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathercum.jpg"></center>'
+						*nl
 						if temp_mf < 5:
-							'You expressly wink at Afanasiy and he understands your meaning.  Looking about for nosy neighbors, he quickly waves for you to enter the house.'
-							gs 'arousal', 'foreplay', 5
-							gs 'stat'
-
-							act 'Further':
-								*clr & cla
-								temp_mf = RAND(0,9)
-								if temp_mf = 0:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex.jpg"></center>'
-									gs 'arousal', 'vaginal', 10
-								elseif temp_mf = 1:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex1.jpg"></center>'
-									gs 'arousal', 'vaginal', 10
-								elseif temp_mf = 2:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex2.jpg"></center>'
-									gs 'arousal', 'vaginal', 10
-								elseif temp_mf = 3:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex3.jpg"></center>'
-									gs 'arousal', 'vaginal', 10
-								elseif temp_mf = 4:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathersex4.jpg"></center>'
-									gs 'arousal', 'vaginal', 10
-								elseif temp_mf = 5:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj.jpg"></center>'
-									gs 'arousal', 'bj', 10
-								elseif temp_mf = 6:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj1.jpg"></center>'
-									gs 'arousal', 'bj', 10
-								elseif temp_mf = 7:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj2.jpg"></center>'
-									gs 'arousal', 'bj', 10
-								elseif temp_mf = 8:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj3.jpg"></center>'
-									gs 'arousal', 'bj', 10
-								elseif temp_mf = 9:
-									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafatherbj4.jpg"></center>'
-									gs 'arousal', 'bj', 10
-								end
-								gs 'stat'
-								if temp_mf < 5:
-									if mesec = 0 or pcs_vag > 0:
-										gs 'dinsex', 'boy_puts_condom'
-										gs 'dinsex','vaginal_sex',10
-										gs 'dinsex','sexcum'
-										gs 'arousal', 'vaginal', 10
-									else
-										gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
-										gs 'arousal', 'anal', 10, 'rough'
-									end
-									gs 'arousal', 'end'
-									gs 'stat'
-
-									act 'Leave':gt 'miroslavahome', 'start'
-								else
-									minut += 10
-									pcs_horny += 10
-									gs 'stat'
-									gs 'oral','start'
-
-									act 'Further':
-										*clr & cla
-										minut += 5
-										pcs_horny += 10
-										gs 'cum_call', 'stomach', $boy, 1,'','',15
-										gs 'cum_call', 'breasts', $boy, 1,'','',20
-										gs 'cum_call', 'mouth', $boy, 1,'','',5
-										'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/mira/mirafathercum.jpg"></center>'
-										'Afanasiy gently pulls away from you and leaving a couple of pearly drops of semen on your lips, he starts cumming on your tits and abdomen.'
-										gs 'arousal', 'end'
-										gs 'stat'
-
-										act 'Leave':gt 'miroslavahome', 'start'
-									end
-								end
-							end
+							'Afanasiy gently pulls away from you, leaving a couple of pearly drops of semen on your lips, and continues cumming on your tits and abdomen.'
 						else
-							'You expressly wink at Afanasiy, but he just smiles and says,"Too busy today honey, catch me later."'
-
-							act 'Leave': gt 'miroslavahome', 'start'
+							'Afanasiy gently pulls out of you, you kneel in front of him as he begins cumming on your tits and abdomen.'
 						end
+						
+						act 'Continue': gt 'Mirafather'
 					end
 				end
-
-				act 'Leave': gt 'miroslavahome', 'start'
 			end
-		end
-	end	
+		end	
+	end
 end
 
 --- Mirafather ---------------------------------

locations/Miroslava.qsrc

@@ -176,23 +176,42 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/characters/village/mira/girls_walking'+rand(1,3)+'.jpg"></center>'
 						'You invite her along to wander around the village and she gladly accepts, then you walk together around the small village, telling each other different stories from your lives.'
-						if npc_QW['A63'] > 15 and npc_QW['A60'] > 15 and gadriver_gang < 3:
-							temp = rand(1,20)
-							if mitkarand = 1 and hour >= 7 and hour <= 16 and mitkaday ! daystart and week <= 5:
-								gt 'gadukino_event', 'mira_mitka'
-							elseif mitkarand = 2 and hour >= 7 and hour <= 16 and kolyambaday ! daystart and week <= 5:
-								gt 'gadukino_event', 'mira_kolyamba'
-							elseif mitkarand = 3 and hour >= 7 and hour <= 16 and vasyanday ! daystart and week <= 5:
-								gt 'gadukino_event', 'mira_vasyan'
-							elseif mitkarand = 4 and hour >= 17 and hour <= 19 and gadboyday ! daystart and week <= 5:
-								gt 'gadukino_event', 'mira_2boys'
-							elseif mitkarand <= 5 and hour >= 7 and hour <= 19 and gadboyday ! daystart and week > 5:
-								gt 'gadukino_event', 'mira_3boys'
+						if gadriver_gang = 2 and npc_QW['A60'] > 15 and hour >= 7 and hour < 20:
+							mitkarand = rand(1,12)
+							! 33% chance one of the village boys will demand sex from Mira and Sveta
+							if mitkarand <= 4:
+								! 25% chance for more than 1 boy
+								if mitkarand = 4:
+									if mitkaday ! daystart and kolyambaday ! daystart and vasyanday ! daystart:
+										gt 'gadukino_event', 'mira_3boys'
+									elseif mitkaday ! daystart and kolyambaday ! daystart:
+										gt 'gadukino_event', 'mira_2boys', '1'
+									elseif mitkaday ! daystart and vasyanday ! daystart:
+										gt 'gadukino_event', 'mira_2boys', '2'
+									elseif kolyambaday ! daystart and vasyanday ! daystart:
+										gt 'gadukino_event', 'mira_2boys', '3'
+									elseif mitkaday ! daystart:
+										gt 'gadukino_event', 'mira_mitka'
+									elseif kolyambaday ! daystart:
+										gt 'gadukino_event', 'mira_kolyamba'
+									elseif vasyanday ! daystart:
+										gt 'gadukino_event', 'mira_vasyan'
+									end
+								! 75% chance for only 1 boy
+								else
+									if mitkaday ! daystart:
+										gt 'gadukino_event', 'mira_mitka'
+									elseif kolyambaday ! daystart:
+										gt 'gadukino_event', 'mira_kolyamba'
+									elseif vasyanday ! daystart:
+										gt 'gadukino_event', 'mira_vasyan'
+									end
+								end
 							else
-								act 'Leave':mira_guest = 0 & gt 'gadukino'
+								act 'Finish your walk':MiraLoc = 0 & mira_guest = 0 & gt 'Miroslava', 'Start'
 							end
 						else
-							act 'Finish':mira_guest = 0 & gt 'gadukino'
+							act 'Finish your walk':MiraLoc = 0 & mira_guest = 0 & gt 'Miroslava', 'Start'
 						end
 					else
 						minut += 5
@@ -787,204 +806,6 @@ if $ARGS[0] = 'Start' or $ARGS[0] = '':
 			end
 		end
 
-		if npc_QW['A60'] >= 30 and hour < 19 and month >= 5 and month <= 9 and MiraLoc ! 3:
-			act '<b>Make your third wish</b>':
-				menu_off = 1
-				*clr & cla
-				minut += 2
-				mira_guest = 0
-				if ($clothingworntype = 'nude' or $clothingworntype = 'swimwear'):
-					gs 'clothing', 'wear', $lastwornclothingtype, lastwornclothingnumber
-					gs 'underwear', 'wear'
-				end
-				gs 'stat'
-				gs 'Miroslava', 'miraclothes'
-				'You remind Mira about the third wish, and she reluctantly nods her head and says that she remembers it. You, act mysterious and with a sinister smile, command her to follow you...'
-				act 'Go to the street (Walk through village naked)':
-					*clr & cla
-					minut += 15
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/street.jpg"></center>'
-					'You lead Mira out to the village street. Mira stares at her feet, sometimes looking at you with watchful eyes...'
-
-					act 'Order her to undress':
-						*clr & cla
-						minut += 2
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_looks.jpg"></center>'
-						'You lead her to the center of the village square, in front of the market. Here you turn to her and demand in a haughty that see undress. You tell her that this is your final wish and after she completes this task you will forgive her betrayal. Mira''s mouth slowly drops open and she looks at you like you insane.'
-						'"Come on, you`re like a little girl," you snort, "we both know you`re a big whore and can`t live without having cock on a daily basis. And now this is the mother load, entirely for free."'
-						'Mira in silence and looks at you, then looks around at the village street on which people walk about their business.'
-						'"<<$pcs_nickname>>, please don''t make this your wish. I will die of embarrassment!" - Mira plaintively begs hoping it will change your mind.'
-
-						act 'Confirm your wish':
-							*clr & cla
-							minut += 5
-							pcs_horny += RAND(5,10)
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_nude1.jpg"></center>'
-							'"No, you freely made the promise of three wishes. Anything I want. I want you to strip naked and head through the village to the fields. I will meet you there with your cloths. Now, do as you promised," you stated in an adamant voice.'
-							'Mira hesitates for another minute shifting uncomfortably from foot to foot, then nods to herself and finally decides to undress before you. Once nude, she hands you her cloths.'
-							'"Well, now you have get through the entire village and to the fields. Once you get to me you can consider yourself forgiven," you said with a malicious smile and slammed the palm of you hand into Mira''s ass to help her on the way. You slowly follow herand watch with interest.'
-
-							act 'Watch':
-								*clr & cla
-								minut += 5
-								pcs_horny += RAND(5,10)
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_nude2.jpg"></center>'
-								'Mira hesitantly begins to move through the village street. You look at her and the reaction of passers-by.'
-
-								act 'Look further':
-									*clr & cla
-									minut += 15
-									pcs_horny += RAND(5,10)
-									Mira_no += rand(10,30)
-									miraday = daystart
-									npc_QW['A60'] = 33
-									npc_rel['A60'] = 1
-									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_nude3.jpg"></center>'
-									'Finally flushed crimson, Mira gets to the fields just beyond the village. She then turn and rushes up to you.'
-									'"<<$pcs_nickname>>, we`re even!", - Mira states and looks at you emploringly.'
-									'You nodding his head while handing her clothes back. After watching a few more minutes as Mira dresses several of the village men are hooting as she sprint to her house, slowly the men settle down and go about their business.'
-
-									act 'Finish':mira_guest = 0 & MiraLoc = 0 & gt 'gadukino'
-								end
-							end
-						end
-
-						act 'Forgive her':
-							*clr & cla
-							minut += 5
-							npc_rel['A60'] += 5
-							npc_QW['A60'] = 31
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_leaves.jpg"></center>'
-							'"Well Mira, fuck you. I had a good day planned. You can consider yourself forgiven," - you said, after a pause.'
-							'The girl was still for several moments, shifts uncomfortably from foot to foot, unable to believe his ears, then jumps up to you and kisses you on the cheek.'
-							'"Thank you <<$pcs_nickname>>, I.. I.., "- not retrieves as she could and ran home.'
-
-							act 'Finish':mira_guest = 0 & gt 'gadukino'
-						end
-					end
-				end
-
-				if npc_QW['A66'] > 0:
-					!'This one replaced with naked walk in 1.2.5 add back with npc_QW['A66'] check, according to texts by illume'
-
-					act 'Go to your barn (Order her suck Bandit)':
-						*clr & cla
-						minut += 10
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira.jpg"></center>'
-						'You lead Mira to your grandparents barn, where you are welcomed by horny Bandit. His bloodshot swollen member and a huge dick hanging between his legs. Mira, trying not to look up, catches a glimsp at him and promptly gets flushed beet red...'
-
-						act 'Order her to suck Bandit':
-							*clr & cla
-							minut += 2
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira.jpg"></center>'
-							'You tell Mira that she will now fulfill your third wish. You tell her in a demanding voice to suck Bandit bloated dog cock. You tell her that if shw fulfill her vow and grants her wish, all will be forgiven. Her mouth drops open slowly and she looks at you, as if your insane.'
-							'"Come on", you tell the girl. With a contemptuous snort you say, "We both know that you''re a whore and prostitute, and can''t live without dick in you at least a few times a day. And right here," you point at Bandit''s dick, "is a huge cock ready to go! Mitka''s cock is puny next to this one, is it not?"'
-							'Mira stares at you like a deer in headlights, Bandit''s huge pulsating cock and just quivers, she isn''t going for it. You decide to push her and say, "It isn''t his first time with a human. I have been riding this cock for awhile now. It''s heavenly." Mira looks at you after that confession with eyes wide and round, as if seeing you for the first time.'
-
-							act 'Confirm your wish':
-								*clr & cla
-								minut += 5
-								pcs_horny += RAND(5,15)
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira2.jpg"></center>'
-								'As proof of your words, you walk over and sit down next to Bandit, who immediately tries to knock you down and hump you. You stop him by taking his cock in your hand and then bending down and sticking it in your mouth. You withdraw your mouth from the monsterous cock but first plant a kiss on the tip of his cock. Mira is shocked and gasps, and you immediately stand up and say, "You see! A cock is a cock, man or animal makes no difference. Now it''s your turn." Mira keeps looking from you to Bandit for another couple of moments, shifting from foot to foot uncomfortably. Finally, you can see she has made up her mind...'
-
-								act 'Watch':
-									*clr & cla
-									minut += 5
-									pcs_horny += RAND(25,30)
-									gs 'stat'
-									'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira1.jpg"></center>'
-									'Mira hesitantly crouches next to Bandit. He watches her with interest. Mira exhales sharply and with a new found resolve she lowers her head and gently, and with much hesitation takes his throbing cock in hand, after a minute, she sticking out her tongue and starts licking it... You tell her what a good whore she is and how much pleasure she is give to her canine lover.'
-
-									act 'Watch':
-										*clr & cla
-										minut += 15
-										pcs_horny += RAND(25,50)
-										gs 'stat'
-										npc_QW['A60'] = 31 & !back to mira questline by illume
-										mirabandit = 1
-										'<center><img <<$set_imgh>> src="images/beast/bandit/piratmira3.jpg"></center>'
-										'She spends several minutes twisting her tongue over the tip and shaft of the dog''s dick. With a sigh, Mira lays on her back and starts to suck his cock, her lips crawl over Bandit''s massive hard cock. After a minute she pulls away, you see, she is having a hard time taking his cock into her mouth, Bandit''s cock starts to drip pre-cum. You tell her, to swallow every last drop, pro-cum, sperm or even piss if Bandit needs to go. She sighs resignedly and continues to suck. Soon Bandit starts to cum and Mira chokes at the shear volume of his cum, but she swallows it all and then she wipes a finger across her face and gathers up all the stay cum and shoves that into her mouth and swallows. She repeats this on her lips, chin, and the little that escaped to her neck and chest...'
-
-										act 'Finish':mira_guest = 0 & gt 'gadukino'
-									end
-								end
-							end
-						end
-					end
-				end
-
-				act 'Go to your barn (make her your dog)':
-					*clr & cla
-					minut += 10
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/sarai.jpg"></center>'
-					'You lead Mira to his barn, where there is an empty kennel next to Bandit`s. Mira looks at you blankly, waiting for you to continue.'
-
-					act 'Order her to undress':
-						*clr & cla
-						minut += 2
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_looks.jpg"></center>'
-						'Having taken Mira and the booth, appraising look, you certain of, demanding voice Mira ordered to undress and climb into the booth, adding that this is your last wish, after which you will have to forgive her betrayal. She slowly mouth drops open and she looks at you like you insane.'
-						' - Come on, you`re like a girl, ` snort you, we both know you`re a big whore and can`t live without members. And then just want to sit in the booth and posobirat Bandit.'
-						'Mira stares on you, then on the booth, which still bears a dog.'
-						'- <<$pcs_nickname>>, can do not suddenly see who? - plaintively asks hopefully it.'
-
-						act 'Confirm your wish':
-							*clr & cla
-							minut += 5
-							pcs_horny += RAND(5,10)
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel1.jpg"></center>'
-							'- No Peace, your tongue no one pulled, now well, do as you promised, are adamant voice said you.'
-							'The girl for another minute shifts uncomfortably from foot to foot, then finally decided and undresses before the goal.Casting box the last time she gets on all fours and awkwardly tries to get in close box.'
-							'- Now sit a couple of hours and free, you said with a malicious smile and slamming the palm Mira on the back to make the speed began to watch with interest for her.'
-
-							act 'Watch':
-								*clr & cla
-								minut += 5
-								pcs_horny += RAND(5,10)
-								mira_dog += RAND(2,5)
-								npc_QW['A60'] = 32
-								!npc_rel['A60'] = 5
-								gs 'stat'
-								'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_kennel2.jpg"></center>'
-								'After watching Mira for a while, you went on the Affairs.'
-								' - Unbind yourself if you don`t come - threw you she lastly.'
-								'<b>(While this is the end of the event, the sequel will follow in the next versions)</b>'
-
-								act 'Finish':mira_guest = 0 & gt 'Gadsarai'
-							end
-						end
-
-						act 'Forgive her':
-							*clr & cla
-							minut += 5
-							npc_rel['A60'] += 2
-							npc_QW['A60'] = 31
-							gs 'stat'
-							'<center><img <<$set_imgh>> src="images/characters/village/mira/mira_leaves.jpg"></center>'
-							'- Well Mira, fuck you, I have a good day. You can consider yourself forgiven, - you said, after a pause.'
-							'The girl was still a few moments, hesitates from foot to foot, unable to believe his ears, then jumps up to you and smacking you in the cheek.'
-							'- Thank you <<$pcs_nickname>>, I.. I.., - not retrieves as he could and ran home.'
-
-							act 'Finish':mira_guest = 0 & gt 'Gadsarai'
-						end
-					end
-				end
-			end
-		end
-
 		if mira_temp = 0 and mira_go_blok = 0 and meadow > 2 and MiraLoc = 0:
 			menu_off = 1
 			*clr & cla
@@ -1097,7 +918,7 @@ if $ARGS[0] = 'miratalk':
 		gs 'stat'
 
 		act 'Finish':gt $loc, $metka
-		if mirasextimes > 3:
+		!if mirasextimes > 3:
 			act 'Ask Mira if she likes Mitka...':
 				*clr & cla
 				minut += 2
@@ -1110,7 +931,7 @@ if $ARGS[0] = 'miratalk':
 
 				act 'Finish':gt $loc, $metka
 			end
-		end
+		!end
 	elseif npc_QW['A60'] = 3:
 		*clr & cla
 		minut += 10

locations/MiroslavaHome.qsrc

@@ -11,145 +11,41 @@ if $ARGS[0] = 'start':
 
 	*clr & cla
 	minut += 5
-	mira_temp = rand(0,15)
 	gs 'stat'
 
 	'<center><h2>Gadukino Village</h2></center>'
 	'<center><b>Mira''s Yard</b></center>'
-
-	!!MiraLoc tells us where Mira is Located
-	!!----------------------------------------------
-	!!MiraLoc = 0 (Mira at home)
-	!!MiraLoc = 1 (Mira at river)
-	!!MiraLoc = 2 (Mira at meadow)
-	!!MiraLoc = 3 (Mira at forest)
-	!!MiraLoc = 4 (Mira at field)
-	!!MiraLoc = 5 (Mira with gop)
-	!!---------------------------------------------
-
-	act 'Leave': gt 'gadukino'
-
-	if hour >= 8 and hour <= 22:
-		if Mira_no > 0 and mirafathertalk = 0 and miraday ! daystart:
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-			'You are passing Mira''s house when you see Mira''s father headed in your direction.'
-			'"<<$pcs_firstname>>, wait. I need to speak with you," he says coming closer to you.'
-			'You stop and look at him frightfully. "Did Mira tell him what I made her do?" you think as panicked thoughts race through your head.'
-			'"<<$pcs_nickname>>, do you know what happened to Mira?" Afanasiy asks, looking you in the eye.'
-			'"N-no, what happened to her?" you ask in a confused voice, expecting him to start shouting any second.'
-			'"I don''t know. She is just sitting at home all the time. She doesn''t leave the yard, I''m concerned." Mira''s father answers.'
-			'"Oh, ah...I don''t know," you say, trying to make it sound believable and make your eyes look innocent. "Maybe she was by hurt some local boy, or had a fight with someone..."'
-			'"Okay, I think it will pass...soon I hope. But, I want you come and visit us, I think your company would do Mira a lot of good. It might bring her out of this funk faster." Mira''s father says good-bye, and leaves to resume working around his house.'
-			'"Close call," you think as you watch his retreating back and exhale with relief.'
-			MiraLoc = 0
-			minut += 10
-			mirafathertalk = 1
-			gs'stat'
-
-			act 'Continue':gt 'miroslavahome', 'start'
-		elseif temper >= 15 and sunWeather = 1 and npc_QW['A60'] = 7 and hour >= 8 and hour <= 18:
-			*clr & cla
-			'<center><img <<$set_imgh>> src="images/characters/village/mira/miraqw7.jpg"></center>'
-			'Entering the courtyard, you notice Mira, working in the garden. She is bent over and, to your amazement, you see her bare naked crotch...'
-			MiraLoc = 0
-
-			act 'You approach slowly':
-				menu_off = 1
-				*clr & cla
-				gs 'Miroslava', 'miraclothes'
-				'You quietly sneak up to her, but she notices you and turns around, immediately blushing rapidly. You a couple seconds of silently staring at her, and then unceremoniously asked why she without panties. Miroslav took the eye, with rumpled feet and legs, explaining that it turned out very hot, so she... You remind her about the second wish and ask to sit down. Miroslav reluctantly agrees, and when he sits down, you tell her, she`ll show you the crotch, you bad considered. The girl mumbles something unintelligible, but then for half a minute lifts up her skirt and gives you a good look at my crotch.'
-				npc_rel['A60'] = 1
-				minut += 15
-				gs 'stat'
-
-				act 'Watch':
-					*clr & cla
-					'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2.jpg"></center>'
-					'You enjoy the view, then you have a crazy idea, and you decide to make a second wish. Mira sadly said that she thought this was your second wish, but you answer that you just could not resist, after which you ask her to follow you.'
-					pcs_horny += 15
-					minut += 15
-					gs 'stat'
-
-					act 'Lead her to the road':
-						*clr & cla
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2_1.jpg"></center>'
-						'You lead her out to the main road. You tell Mira, that she is to pose as a prostitute and attempt to get a customer or two. This is your second wish. You want Mira to become a prostitute and fulfill the desires of anyone who asks for her services. Mira looks shocked but nods that she will do it, Mira looks around the area and seeing no one else watching begins to pose by the roadside for passing cars...'
-						minut += 15
-						npc_QW['A60'] = 8
-						gs 'stat'
-
-						act 'Go back to the village':gt'gadukino'
-					end
-				end
-			end
+	
+	if month >= 4 and month <= 10:
+		if hour >= 6 and hour < 22:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome.jpg"></center>'
 		else
-			if month >= 4 and month <= 10:
-				if hour >= 6 and hour < 22:
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome_night.jpg"></center>'
-				end
-			else
-				if hour >= 8 and hour < 18:
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome_winter.jpg"></center>'
-				else
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome_winter_night.jpg"></center>'
-				end
-			end
-			if npc_QW['A64'] < 10:
-				'Near the house you see <a href="exec: gt ''mirafather'' ">Mira''s father</a> working.'
-			else
-				'Near the house <a href="exec: gt ''mirafather'' ">Afanasiy</a> is working.'
-			end
-			if month >= 5 and month <= 9 and hour >= 18 and hour <= 21 and rand(0,30) >= 28:'You hear a motorcycle in the village. <a href="exec: gt ''miroslavahome'', ''mirabrother''">Miras brother</a> has come in from the city to visit his siblings and father.'
-			if MiraLoc > 0 and npc_QW['A60'] > 30:
-				act 'Check on Mira':
-					menu_off = 1
-					*clr & cla
-					minut += 2
-					gs 'stat'
-					'Mira isn''t home.'
-					if miraprost > 0 and month >= 5 and month <= 9 and hour >= 18 and hour >= 0 and rand(0,5) >= 4:
-						'You think you know where to find her. Ever since granting your second wish Mira has been earning money as a prostitute on the highway.'
-						act 'Go to the highway': gt 'gadprostitutes','start'
-					else
-						'She definitely isn''t around here, and you have no idea where she might be. Maybe you should ask her father, or go look around town.'
-					end
-					act 'Leave': gt 'gadukino'
-				end
-			end
-
-			act 'Ask for Mira':
-				menu_off = 1
-				if mira_temp >= 10 and sunWeather = 1 and temper >= 15 and hour < 20 and Mira_no = 0:
-					*clr & cla
-					minut += 2
-					mira_no_home += rand(1,4)
-					MiraLoc = 1
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-					'Mira''s father tells you that she''s not home, she is over at the river.'
-
-					act 'Leave':gt 'Gadukino'
-					act 'Go to the river':gt 'gadriver','start'
-				elseif mira_temp >= 10 and sunWeather = 0 and hour < 20 and MiraLoc ! 0 and Mira_no = 0:
-					*clr & cla
-					minut += 2
-					mira_no_home += rand(1,4)
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirafather.jpg"></center>'
-					'Mira''s father tells you that she isn''t home.'
-
-					act 'Leave':gt 'Gadukino'
-				else
-					MiraLoc = 0
-					gt 'Miroslava', 'Start'
-				end
-			end
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome_night.jpg"></center>'
+		end
+	else
+		if hour >= 8 and hour < 18:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome_winter.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome_winter_night.jpg"></center>'
+		end
+	end
+	
+	if hour >= 8 and hour <= 22:
+		*nl
+		'Near the house you see '+iif(npc_QW['A64'] = 0, 'Mira''s father','Afanasiy')+' working.'
+		
+		act 'Leave': gt 'gadukino'
+		
+		act 'Talk to '+iif(npc_QW['A64'] = 0, 'Mira''s father','Afanasiy'): gt 'Mirafather'
+		
+		! Mira''s brother now visits on Friday nights during the summer - if he ever gets more content then he can stay the whole weekend - he is not even a fully set up NPC at the moment
+		if month >= 5 and month <= 9 and hour >= 18 and hour <= 21 and week = 5 and mirabrotherday ! daystart:
+			*nl
+			'You see a motorcycle parked outside of Mira''s house. Mira''s brother has come in from the city to visit his sister and father.'
+			act 'Talk to Mira''s brother': gt 'MiroslavaHome', 'mirabrother'
 		end
 	else
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mirahome.jpg"></center>'
+		*nl
 		if hour > 22 or hour < 3: 'It''s too late, most of Mira''s family is asleep, no need to wake them up unnecessarily.' else 'It''s too early, most of Mira''s family is still asleep, no need to wake them up unnecessarily.'
 		act 'Leave': gt 'gadukino'
 	end
@@ -157,6 +53,7 @@ end
 
 if $ARGS[0] = 'mirabrother':
 	*clr & cla
+	mirabrotherday = daystart
 	minut += 2
 	menu_off = 1
 	gs 'stat'

locations/NatBelHome.qsrc

@@ -291,14 +291,14 @@ elseif lernHome = 0:
 									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t seems to bother her that Kolka may knock her up.'
 								elseif natpregday > 0 and (daystart-natpregday) >= 84:
 									'Natasha looks at you questioningly, whether will you let him cum inside of her. It doesn''t really matter now, since Kolka has already knocked her up.'
-								elseif natpregday = 0 and pregtalknat = 1 and natbabycount = 0:
+								elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount = 0:
 									'Natasha looks at you and almost inaudably whispers "Please let him cum inside me. I want a baby too."'
-								elseif natpregday = 0 and pregtalknat = 1 and natbabycount > 0:
+								elseif natpregday = 0 and npc_pregtalk['A16'] = 1 and natbabycount > 0:
 									'Natasha looks at you and moans "Please let him cum inside me. I need him to give me another baby."'		
 								else
 									'Natasha looks at you questioningly, whether will you let him cum inside of her and risking her getting pregnant with your niece or nephew, or letting her pull away from you brother.'
 								end
-								if natsub >= 20 and pcs_dom > 20 and natcp > 0 and pregtalknat = 0:
+								if natsub >= 20 and pcs_dom > 20 and natcp > 0 and npc_pregtalk['A16'] = 0:
 									act 'Let him cum inside her':
 										cla
 										natcp += 1
@@ -311,7 +311,7 @@ elseif lernHome = 0:
 										gs 'stat'
 										act 'Next':gt $curloc
 									end
-								elseif natsub >= 20 and pcs_dom > 20 and natcp > 0 and pregtalknat = 1:
+								elseif natsub >= 20 and pcs_dom > 20 and natcp > 0 and npc_pregtalk['A16'] = 1:
 									act 'Let him cum inside her':
 										cla
 										natcp += 1
@@ -475,14 +475,14 @@ elseif lernHome = 0:
 	end
 end
 
-if pregTalkNat = 0 and kid = 0:
-	if natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and pregtime >= 150:
+if npc_pregtalk['A16'] = 0 and kid = 0:
+	if natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and pregchem >= 3600:
 		*clr & cla
 		gs 'stat'
 		'"<<$pcs_nickname>>, are you pregnant, too? Well, I guess I don''t have to worry about being the only pregnant girl at school," she giggles.'
 
 		act 'Next':gt 'NatBelhome', 'natknows'
-	elseif natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and knowpreg = 1 and pregtime > 0 and pregtime < 150:
+	elseif natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday) < 200 and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
 		act 'Tell her you''re pregnant':
 			*clr & cla
 			'"If you were worried about being the only pregnant girl at school, that won''t be a problem anymore." You smirk while rubbing your midriff. "It looks like I got myself knocked up as well."'
@@ -490,15 +490,15 @@ if pregTalkNat = 0 and kid = 0:
 			*nl
 			act 'Next':gt 'NatBelhome', 'natknows'
 		end
-	elseif pregtime > 0 and knowpreg = 1 and natsub = 0 and (daystart-natpregday) < 84:
+	elseif pregchem > 0 and knowpreg = 1 and natsub = 0 and (daystart-natpregday) < 84:
 		act 'Tell her you''re pregnant':
 			cla
 			*nl
 			'"<<$pcs_nickname>>, you''re," she pauses momentarily before continuing in a tone of shock mixed with disgust, "pregnant? Have you been sleeping around? This will definitely impact your studies."'
 			act 'Continue' :gt 'NatBelhome'
-			pregTalkNat = 1
+			npc_pregtalk['A16'] = 1
 		end
-	elseif pregtime > 0 and knowpreg = 1 and natsub > 0 and (daystart-natpregday) < 84:
+	elseif pregchem > 0 and knowpreg = 1 and natsub > 0 and (daystart-natpregday) < 84:
 		act 'Tell her you''re pregnant':
 			cla
 			*nl
@@ -508,26 +508,26 @@ if pregTalkNat = 0 and kid = 0:
 				'"Honestly, I don''t even know."'
 				'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
 				act 'Continue' :gt 'NatBelhome'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 			else
 				'You tell her that <<$wombthfath>> is the father and then give her brief details as to how you got pregnant, without getting too explicit.'
 				*nl
 				'"Really? That''s crazy." Natasha whispers, rubbing her midriff longingly.'
 				act 'Continue' :gt 'NatBelhome'
-				pregTalkNat = 1
+				npc_pregtalk['A16'] = 1
 			end
 		end
 	end
 end
 
-if pregTalkNat = 0 and kid > 0:
-	if (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and pregtime >= 150:
+if npc_pregtalk['A16'] = 0 and kid > 0:
+	if (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and pregchem >= 3600:
 		*clr & cla
 		gs 'stat'
 		'"Wow, <<$pcs_nickname>>, you''re pregnant again? You''re really committed to making sure I''m not the only young mother around here, huh?" She playfully smiles and puts a hand on your shoulder. "It''s good to know you''re looking out for me."'
 
 		act 'Next':gt 'NatBelhome', 'natknows1'
-	elseif (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and knowpreg = 1 and pregtime > 0 and pregtime < 150:
+	elseif (natpregday > 0 and (daystart-natpregday) > 84 and (daystart-natpregday)< 200) or (natbabycount > 0) and knowpreg = 1 and pregchem > 0 and pregchem < 3600:
 		act 'Tell her you''re pregnant':
 			*clr & cla
 			'"Hey, guess who''s pregnant again. You know, I''m glad I forced you to let Kolka impregnate you so that I could have someone I can relate to."'
@@ -535,28 +535,28 @@ if pregTalkNat = 0 and kid > 0:
 			*nl
 			act 'Next':gt 'NatBelhome', 'natknows1'
 		end
-	elseif pregtime > 0 and natsub = 0 and knowpreg = 1:
+	elseif pregchem > 0 and natsub = 0 and knowpreg = 1:
 		act 'Tell her you''re pregnant':
 			*clr & cla
 			*nl
 			'"Really? You''re pregnant again? You should really try to be more careful."'
 			act 'Continue' :gt 'NatBelhome'
-			pregTalkNat = 1
+			npc_pregtalk['A16'] = 1
 		end
-	elseif pregtime > 0 and natsub > 0 and (daystart-natpregday) < 84 and knowpreg = 1:
+	elseif pregchem > 0 and natsub > 0 and (daystart-natpregday) < 84 and knowpreg = 1:
 		act 'Tell her you''re pregnant':
 			*clr & cla
 			*nl
 			'"You got pregnant again. It must be wonderful…" She trails off, clearly envious.'
 			act 'Continue' :gt 'NatBelhome'
-			pregTalkNat = 1
+			npc_pregtalk['A16'] = 1
 		end
 	end
 end
 
 if $ARGS[0] = 'natknows':
 	cla
-	pregTalkNat = 1
+	npc_pregtalk['A16'] = 1
 	if pav_slut < 125: '"So, who''s the father?"'
 	if pav_slut >= 125: '"So, do you know who the father is?"'
 	*nl
@@ -578,7 +578,7 @@ end
 !When pregnancy fetish is added, another reaction will be added here
 if $ARGS[0] = 'natknows1':
 	cla
-	pregTalkNat = 1
+	npc_pregtalk['A16'] = 1
 	if pav_slut < 125: '"Is it the same father as last time?"'
 	if pav_slut >= 125: '"Do you know if it''s the same father as last time?"'
 	*nl

locations/NewCloShop.qsrc

@@ -7,6 +7,9 @@ if $ARGS[0] = 'start':
 	$menu_loc = 'NewCloShop'
 	$menu_arg = 'start'
 	menu_off = 0
+	!!Variable for buying underwear for Natasha so it only procs once per changingroom event
+	natund = 0
+	
 	gs 'stat'
 
 	gs 'themes', 'indoors'
@@ -27,8 +30,222 @@ if $ARGS[0] = 'start':
 	act 'View bras': minut += 5 & gt 'NewCloShop', 'bras'
 
 	act 'View purses': minut += 5 & gt 'NewCloShop', 'purses'
+	
+	act 'Try on some clothes': gt 'NewCloShop', 'changingroom'
+end
+
+if $ARGS[0] = 'changingroom':
+	$locclass = 'changingroom'
+	$metka = 'changingroom'
+	$loc = 'NewCloShop'
+	gs 'stat'
+	menu_off = 0
+	
+	*clr & cla
+	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/changingroom.jpg"</center>'
+	'As you walk through the store you notice that there''s nobody in the changing rooms. Feeling a bit bored you go look at some clothes and grab several items to try on before heading into one of the changing rooms.'
+	
+	if $clothingworntype = 'nude':
+		act 'Try on clothes': gt 'NewCloShop', 'dressingclothes'
+		act 'Try on bra':
+			if natseethrough = 0 and NatashaQW > 5 and natund = 0:
+				*clr & cla
+				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/nude.jpg"</center>'
+				'As you try on a particularly spicy set of seethrough underwear you notice that it doesn''t quite fit you.'
+				'"This should fit Natasha perfectly though. And it only costs 750 <b>₽</b>." You think to yourself, imagining the look on her face if you make her wear it.'
+				act 'Buy it':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/nude.jpg"</center>'
+					'You put the underwear aside for now so that you can take it to the register with you.'
+					money -= 750
+					natseethrough = 1
+					act 'Stay in the changingroom': gt 'NewCloShop', 'changingroom'
+					act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+				end			
+				act 'Don''t buy it':
+					*clr & cla
+					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/nude.jpg"</center>'
+					'Deciding against it, you look through the rest of the underwear for something that would fit you better.'
+					natund = 1
+					act 'Stay in the changingroom': gt 'NewCloShop', 'changingroom'
+					act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+				end
+			else
+				gt 'NewCloShop', 'dressingbra'
+				!*clr & cla
+				!clorand = rand(1, 38)
+				!gt 'bras', 'view_bra_item', 'shop', 'fashionista',clorand, 750
+			end
+		end
+		act 'Try on panties': gt 'NewCloShop', 'dressingpanties'
+			!*clr & cla
+			!clorand = rand(1, 75)
+			!gt 'panties', 'view_panty_item', 'shop', 'fashionista',clorand, 750
+		!end
+	end
+	if $clothingworntype = 'nude':
+		act 'Put on clothes':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/dressed.jpg"</center>'
+			gs 'clothing', 'wear_last_worn'
+			act 'Stay in the changingroom': gt 'NewCloShop', 'changingroom'
+			act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+		end
+	end
+	if $clothingworntype ! 'nude' and $pantyworntype ! 'none':
+		act 'Strip to your underwear':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/underwear.jpg"</center>'
+			gs 'clothing', 'strip'
+			act 'Stay in the changingroom': gt 'NewCloShop', 'changingroom'
+			act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+		end
+	end
+	if $clothingworntype = 'nude' and $pantyworntype = 'none':
+		act 'Put on underwear':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/underwear.jpg"</center>'
+			gs 'underwear', 'wear'
+			act 'Stay in the changingroom': gt 'NewCloShop', 'changingroom'
+			act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+		end
+	end
+	if $clothingworntype ! 'nude' or $pantyworntype ! 'none':
+		act 'Get naked':
+			*clr & cla
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/mall/fashionista/nude.jpg"</center>'
+			gs 'clothing', 'strip'
+			gs 'underwear', 'remove'
+			act 'Stay in the changingroom': gt 'NewCloShop', 'changingroom'
+			act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+		end
+	end
+	if $clothingworntype = 'nude':
+		act 'Get dressed and go back to the store': gt 'NewCloShop', 'changingend'
+	else
+		act 'Go back to the store': gt 'NewCloShop', 'changingend'
+	end
+end
+
+if $ARGS[0] = 'dressingclothes':
+	*clr & cla
+	$metka = 'dressingclothes'
+	$loc = 'NewCloShop'
+	!clorand = rand(1,ARRSIZE('expensive'))
+	!gt 'clothing', 'view_clothing_item', 'shop', 'expensive', clorand, 8000
+	menu_off = 1
+	*clr & cla
+	gs'stat'
+	'<center><b><font color="maroon">Viewing Fashionista clothing</font></b></center>'
+	*nl
+
+	gs 'clothing_QV', 'shop_header'
+
+	act 'Return':
+		minut += 1
+		gt 'NewCloShop', 'changingroom'
+	end
+
+	i = Clothingstock +1
+
+	if Clothingstock - 12 > 0:i -= 12
+
+	:loopexpensive2
+		if expensive[i] = 0:
+			gs 'clothing_attributes', 'expensive', i
+			gs 'clothing_QV', 'shop_filter'
+			if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''NewCloShop'', ''dressingshmotmag''"><img src="images/pc/clothing/3expensive/<<i>>.jpg" 	height="250" /></a>  '
+		end
+		i += 12
+	if i <= 425:jump 'loopexpensive2'
+end
+
+if $ARGS[0] = 'dressingshmotmag':
+	cla
+	
+	if expensive[i] ! 0:
+		msg 'You already own these clothes.'
+		gt 'NewCloShop', 'dressingclothes'
+	end
+
+	gt 'clothing', 'view_clothing_item', 'shop', 'expensive',i, 8000
 end
 
+if $ARGS[0] = 'dressingbra':
+	$metka = 'dressingbra'
+	$loc = 'NewCloShop'
+	menu_off = 1
+	*clr & cla
+	gs'stat'
+
+	act 'Return':
+		cla
+		minut += 1
+		gt 'NewCloShop', 'changingroom'
+	end
+
+	i = 1
+
+	:loopfashionista_bras2
+		if fashionista_bras[i] = 0:*p '<a href="exec: i = <<i>> & gt ''NewCloShop'', ''dressingbras2''"><img src="images/pc/bras/fashionista/<<i>>.jpg" 	height="150" /></a> '
+		i += 1
+	if i <= 38:jump 'loopfashionista_bras2'
+end
+
+if $ARGS[0] = 'dressingbras2':
+	cla
+	
+	if fashionista_bras[i] ! 0:
+		msg 'You already own this bra.'
+		gt 'NewCloShop', 'bras'
+	end
+
+	gt 'bras', 'view_bra_item', 'shop', 'fashionista',i, 750
+end
+
+
+
+if $ARGS[0] = 'changingend':
+	!! Sveta dresses again
+	gs 'underwear', 'wear'
+	gs 'clothing', 'wear_last_worn'
+	gt 'NewCloShop', 'start'
+end
+
+if $ARGS[0] = 'dressingpanties':
+	$metka = 'dressingpanties'
+	$loc = 'NewCloShop'
+	menu_off = 1
+	*clr & cla
+	gs'stat'
+
+	act 'Return':
+		cla
+		minut += 1
+		gt 'NewCloShop', 'changingroom'
+	end
+
+	i = 1
+
+	:loopfashionista_panties2
+		if fashionista_panties[i] = 0:*p '<a href="exec: i = <<i>> & gt ''NewCloShop'', ''dressingpanties2''"><img src="images/pc/panties/fashionista/<<i>>.jpg" 	height="150" /></a> '
+		i += 1
+	if i <= 75:jump 'loopfashionista_panties2'
+end
+
+if $ARGS[0] = 'dressingpanties2':
+	cla
+	
+	if fashionista_panties[i] ! 0:
+		msg 'You already own these panties.'
+		gt 'NewCloShop', 'dressingpanties'
+	end
+
+	gt 'panties', 'view_panty_item', 'shop', 'fashionista',i, 750
+end
+
+
+!! Old code
 if $ARGS[0] = 'clothes':
 	$metka = 'clothes'
 	$loc = 'NewCloShop'

locations/Sgrup.qsrc

@@ -12,20 +12,26 @@ if $loc = 'gschool_grounds' or $loc = 'gschool_lunch':
 	'You stay in the cafeteria where some of the teachers are eating or watching over the kids making sure there is no trouble.'
 end
 *nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-if count1 = 6 : $textgrup += '<tr>'
-
-if grupTipe[i] = 6:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1< 6 and grupTipe[i] = 6 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 6:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
 
-if i < ARRSIZE('school_static_num'):jump 'markgruploop'
+gs 'gschool_lessons', 'npc_data'
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
+
+	if grupTipe[i] = 6 and schoolenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 6:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 6:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
 '<<$textgrup>>'
 

locations/Sgrup1.qsrc

@@ -12,20 +12,26 @@ if $loc = 'gschool_grounds' or $loc = 'gschool_lunch':
 	'You decide to spend your break in a classroom. As you enter, you find several of your classmates already sitting there: the smart kids decided to get an early start on their homework assignments, while the outcasts are mostly hiding away from everyone else, hoping that no one will pick on them today.'
 end
 *nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-if count1 = 6 : $textgrup += '<tr>'
-
-if grupTipe[i] = 3:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1< 6 and grupTipe[i] = 3 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 3:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
 
-if i < ARRSIZE('school_static_num'):jump 'markgruploop'
+gs 'gschool_lessons', 'npc_data'
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
+
+	if grupTipe[i] = 3 and schoolenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 3:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 3:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
 '<<$textgrup>>'
 

locations/Sgrup2.qsrc

@@ -12,20 +12,26 @@ if $loc = 'gschool_grounds' or $loc = 'gschool_lunch':
 	'When the break finally comes, the girls wander through the hallways of the school, gossiping about pretty much everyone they know. The guys are standing around in small groups, some of them sneaking off to have a smoke behind the school building. The cool kids are hanging out in one area, and on the other side of the hallway the sporty kids are talking about their upcoming competitions.'
 end
 *nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-if count1 = 6 : $textgrup += '<tr>'
-
-if grupTipe[i] = 2:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1< 6 and grupTipe[i] = 2 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 2:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
 
-if i < ARRSIZE('school_static_num'):jump 'markgruploop'
+gs 'gschool_lessons', 'npc_data'
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
+
+	if grupTipe[i] = 2 and schoolenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 2:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 2:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
 '<<$textgrup>>'
 

locations/Sgrup3.qsrc

@@ -12,20 +12,26 @@ if $loc = 'gschool_grounds' or $loc = 'gschool_lunch':
 	'When the break finally comes, the girls wander through the hallways of the school, gossiping about pretty much everyone they know. The guys are standing around in small groups, some of them sneaking off to have a smoke behind the school building. The cool kids are hanging out in one area, and on the other side of the hallway the sporty kids are talking about their upcoming competitions.'
 end
 *nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-if count1 = 6 : $textgrup += '<tr>'
-
-if grupTipe[i] = 1:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1< 6 and grupTipe[i] = 1 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 1:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
 
-if i < ARRSIZE('school_static_num'):jump 'markgruploop'
+gs 'gschool_lessons', 'npc_data'
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
+
+	if grupTipe[i] = 1 and schoolenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 1:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 1:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
 '<<$textgrup>>'
 

locations/Sgrup4.qsrc

@@ -12,20 +12,26 @@ if $loc = 'gschool_grounds' or $loc = 'gschool_lunch':
 	'You need to use the restroom and as you enter you notice a lot of beautiful girls from your school there. They check their make-up, doing minor touch-ups while they gossip about their classmates who happen to not be there. Some people are standing by the windows, smoking. The Gopniks from your class are standing near the toilets.'
 end
 *nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-if count1 = 6 : $textgrup += '<tr>'
-
-if grupTipe[i] = 4:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1< 6 and grupTipe[i] = 4 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 4:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
 
-if i < ARRSIZE('school_static_num'):jump 'markgruploop'
+gs 'gschool_lessons', 'npc_data'
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
+
+	if grupTipe[i] = 4 and schoolenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 4:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 4:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
 '<<$textgrup>>'
 

locations/Sgrup5.qsrc

@@ -12,20 +12,26 @@ if $loc = 'gschool_grounds' or $loc = 'gschool_lunch':
 	'You decide to spend your break in a classroom. As you enter, you find several of your classmates already sitting there: the smart kids decided to get an early start on their homework assignments, while the outcasts are mostly hiding away from everyone else, hoping that no one will pick on them today.'
 end
 *nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-
-if count1 = 6 : $textgrup += '<tr>'
-if grupTipe[i] = 5:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1 < 6 and grupTipe[i] = 5 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 5:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
 
-if i < ARRSIZE('school_static_num'):jump 'markgruploop'
+gs 'gschool_lessons', 'npc_data'
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
+
+	if grupTipe[i] = 5 and schoolenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 5:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 5:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
 '<<$textgrup>>'
 

locations/SgrupDisco.qsrc

@@ -3,41 +3,55 @@
 *clr & cla
 gs 'themes', 'food_menu'
 gs 'stat'
-$textgrup = ''
-$textgrup2 = ''
 
 act 'Move away':gt $loc, $metka
 
 '<center><b><font color="maroon">Disco</font></b></center>'
-!'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/club_yaho.jpg"></center>'
-*nl
-i = 0
-'<center><table cellspacing="3">'
-:markgruploop
-i += 1
-if count1 = 6 : $textgrup += '<tr>'
 
-if grupTipe[i] = 1:count1 += 1 & $textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
-if count1 < 6 and grupTipe[i] = 1 :
-	$textgrup += '</td>'
-elseif count1 = 6 and grupTipe[i] = 1:
-	$textgrup +='</td></tr><tr>' & count1 = 0
-end
+gs 'gschool_lessons', 'npc_data'
+
+!! First string for popular kids
+$textgrup = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop	
+	if count1 = 6 : $textgrup += '<tr>'
 
-!hack to force a new section for gopniks
-if i = 9 : $textgrup2 += '<tr></tr>'
-!end hack
+	if grupTipe[i] = 1 and discoenable[i] = 1:
+		count1 += 1
+		$textgrup += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 1:
+		$textgrup += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 1:
+		$textgrup +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop'
 
-if count2 = 6 : $textgrup2 += '<tr>'
-if grupTipe[i] = 4: count2 += 1 & $textgrup2 += '' + '<td bgcolor=<<$bcolor1>> align="center"><img height="100" src="images/characters/pavlovsk/school/head/<<i>>.jpg"><br>' + $npcGo[i]
+!! Force new line for gopniks
+$textgrup +='</td></tr><tr>'
 
-if count2 < 6 and grupTipe[i] = 4:
-	$textgrup2 += '</td>'
-elseif count2 = 6 and grupTipe[i] = 4:
-	$textgrup2 +='</td></tr><tr>' & count2 = 0
-end
+!! Second string for gopniks
+$textgrup2 = ''
+count1 = 0
+i = 1
+'<center><table cellspacing="3">'
+:gruploop2	
+	if count1 = 6 : $textgrup2 += '<tr>'
 
-if i < 61:jump 'markgruploop'
+	if grupTipe[i] = 4 and discoenable[i] = 1:
+		count1 += 1
+		$textgrup2 += '' + '<td bgcolor=<<$bcolor2>> align="center"><img  height="100" src="images/pc/npc_headshots/<<i>>.jpg"><br>' + $npcGo[i]
+	end
+	if count1< 6 and grupTipe[i] = 4:
+		$textgrup2 += '</td>'
+	elseif count1 = 6 and grupTipe[i] = 4:
+		$textgrup2 +='</td></tr><tr>' & count1 = 0
+	end
+	i += 1
+if i <= maxnpcs:jump 'gruploop2'
 
 '<<$textgrup>>'
 *nl
@@ -46,5 +60,6 @@ if i < 61:jump 'markgruploop'
 if hour >= 21 and hour < 23 and week=5: '<center>At the entrance of the disco hall stands <a href="exec:gt ''VolleyTrenerSpeak''">Coach Mikhail Nikolayevich</a></center>'
 '</table><center>'
 
+
 --- SgrupDisco ---------------------------------
 

locations/Snpc.qsrc

@@ -109,8 +109,7 @@ if numnpc = 45:
 !!I would like to change this so even if all the requirements are meet it only fires one in 5 times. 
 	if $loc ! 'gdkin' and npc_rel[$static_num] > 50 and (Anush_sex > 0 or hotcat >= 7) and rand(0,4) = 0:
 		act 'You''re looking flushed':
-			*clr
-			cla
+			*clr & cla
 			if Anush_lunch = 0:
 				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/45.jpg"></center>'
 				'"Hey Anush you feeling ok? You kinda look flush, is something wrong? Would you like to talk about it?"'
@@ -119,114 +118,61 @@ if numnpc = 45:
 				gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
 				minut -= 5
 				gs 'stat'
-				act 'Um that''s not what I meant':
-					*clr
-					cla
-					npc_rel['A45'] -= 2
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/nomake.jpg"></center>'
-					'You place your hand on her shoulders and gentle push her away. "No I don''t want to."'
-					'She rolls her eyes. "Fine what ever, if you don''t want to have a little fun, I will find someone that does." With that she turns and walks off, leaving you unsure what just happened.'
-					act 'Continue': gt 'gschool_lessons', 'short_break'
-				end
-				act 'Kiss her back.':
-					*clr
-					cla
-					Anush_lunch = 1
-					npc_rel['A45'] += 1
-					pav_sex +=1
-					gs 'stat'
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
-					'You kiss her back. Your hands are roaming each others bodies, several of the other gopniks are checking the two of you out, especially the guys. Several of them starting hooting, hollering or whistling as the two of you make out hard right in front of them. After a couple of minutes she grabs you by the hands and says "Come on lets go some place more private to continue this.'
-					gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
-					minut -= 5
-					gs 'stat'
-					act 'Not today':
-						*clr
-						cla
-						npc_rel['A45'] -= 2
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/nomake.jpg"></center>'
-						'You place your hand on her shoulders and gentle push her away. "No I don''t want to."'
-						'She rolls her eyes. "Fine what ever, if you don''t want to have a little fun, I will find someone that does." With that she turns and walks off, leaving you unsure what just happened.'
-						act 'Continue': gt 'gschool_lessons', 'short_break'
-					end
-					act 'Go with it':
-						*clr
-						cla
-						Anush_lunch = 1
-						pcs_horny += 10
-						npc_rel['A45'] += 1
-						grupvalue[4] +=1
-						pav_sex +=1
-						gs 'stat'
-						'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
-						'You breath heavily feeling yourself turned on. "Ok, where?"'
-						'Her hand slides up your skirt and rubs your clit. "Come with me, I know just the place." With that she takes you by the hand and the two of your head off, with the whistles and cat calls of the other gopniks behind you.'
-						gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
-						minut -= 5
-						gs 'stat'
-						act 'Go somewhere private':  gt 'gschool_sex', 'Anush_private'
-					end
-				end
+				act 'Um that''s not what I meant': gt 'Snpc', 'anushnottoday'
+				act 'Kiss her back.': gt 'Snpc', 'kissback'
 			else
 				'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
 				'Noticing she is looking fairly turned on today, well more so than usual, you say to her. "You ok? You are looking pretty flush again today."'
-				'You barely even have time to get the words out when she is leaning in and kissing you, her hands reach around to squeeze you butt.'
+				'You barely even have time to get the words out when she is leaning in and kissing you, her hands reach around to squeeze your butt.'
 				gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
 				minut -= 5
 				gs 'stat'
-				act 'Not today':
-					*clr
-					cla
-					npc_rel['A45'] -= 2
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/nomake.jpg"></center>'
-					'You place your hand on her shoulders and gentle push her away. "No I don''t want to."'
-					'She rolls her eyes. "Fine what ever, if you don''t want to have a little fun, I will find someone that does." With that she turns and walks off, leaving you unsure what just happened.'
-					act 'Continue': gt 'gschool_lessons', 'short_break'
-				end
-				act 'Kiss her back.':
-					*clr
-					cla
-					Anush_lunch = 1
-					npc_rel['A45'] += 1
-					pav_sex +=1
-					gs 'stat'
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
-					'You kiss her back. Your hands are roaming each others bodies, several of the other gopniks are checking the two of you out, especially the guys. Several of them starting hooting, hollering or whistling as the two of you make out hard right in front of them. After a couple of minutes she grabs you by the hands and says "Come on lets go some place more private to continue this.'
-					gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
-					minut -= 5
-					gs 'stat'
-					act 'Not today':
-						*clr
-						cla
-						npc_rel['A45'] -= 2
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/nomake.jpg"></center>'
-						'You place your hand on her shoulders and gentle push her away. "No I don''t want to."'
-						'She rolls her eyes. "Fine what ever, if you don''t want to have a little fun, I will find someone that does." With that she turns and walks off, leaving you unsure what just happened.'
-						act 'Continue': gt 'gschool_lessons', 'short_break'
-					end
-					act 'Go with it':
-						*clr
-						cla
-						Anush_lunch = 1
-						pcs_horny += 10
-						npc_rel['A45'] += 1
-						grupvalue[4] +=1
-						pav_sex +=1
-						gs 'stat'
-						'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
-						'You breath heavily feeling yourself turned on. "Ok, where?"'
-						'Her hand slides up your skirt and rubs your clit. "Come with me, I know just the place." With that she takes you by the hand and the two of your head off, with the whistles and cat calls of the other gopniks behind you.'
-						gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
-						minut -= 5
-						gs 'stat'
-						act 'Go somewhere private':  gt 'gschool_sex', 'Anush_private'
-					end
-				end
+				act 'Not today': gt 'Snpc', 'anushnottoday'
+				act 'Kiss her back.': gt 'Snpc', 'kissback'
 			end
 		end
 	end
 end
 
+if $ARGS[0] = 'kissback':
+	*clr & cla
+	Anush_lunch = 1
+	npc_rel['A144'] += 1
+	pav_sex +=1
+	gs 'stat'
+	'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
+	'You kiss her back. Your hands are roaming each others bodies, several of the other gopniks are checking the two of you out, especially the guys. Several of them starting hooting, hollering or whistling as the two of you make out hard right in front of them. After a couple of minutes she grabs you by the hands and says "Come on lets go some place more private to continue this.'
+	gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
+	minut -= 5
+	gs 'stat'
+	act 'Not today': gt 'Snpc', 'anushnottoday'
+	act 'Go with it':
+		*clr & cla
+		Anush_lunch = 1
+		pcs_horny += 10
+		npc_rel['A144'] += 1
+		grupvalue[4] +=1
+		pav_sex +=1
+		gs 'stat'
+		'<center><video autoplay loop src="images/characters/pavlovsk/school/girl/anushka/makeout.mp4"></video></center>'
+		'You breath heavily feeling yourself turned on. "Ok, where?"'
+		'Her hand slides up your skirt and rubs your clit. "Come with me, I know just the place." With that she takes you by the hand and the two of your head off, with the whistles and cat calls of the other gopniks behind you.'
+		gs 'arousal', 'foreplay', 5, 'lesbian', 'exhibitionism'
+		minut -= 5
+		gs 'stat'
+		act 'Go somewhere private':  gt 'gschool_sex', 'Anush_private'
+	end
+end
+
+if $ARGS[0] = 'anushnottoday':
+	*clr & cla
+	npc_rel['A144'] -= 2
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/anushka/nomake.jpg"></center>'
+	'You place your hand on her shoulders and gentle push her away. "No I don''t want to."'
+	'She rolls her eyes. "Fine what ever, if you don''t want to have a little fun, I will find someone that does." With that she turns and walks off, leaving you unsure what just happened.'
+	act 'Continue': gt 'gschool_lessons', 'short_break'
+end
+
 !!!!!!!!!!!!!!!!!!!!!!!!
 !!!Albina Barlovskaya!!!
 !!!!!!!!!!!!!!!!!!!!!!!!
@@ -447,7 +393,7 @@ if numnpc = 14:
 			minut += 1
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga_kiss1.jpg"></center>'
-		elseif $loc ! 'gdkin':
+		else
 			minut += 1
 			gs'stat'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/katja/tanga_kiss.jpg"></center>'
@@ -595,8 +541,8 @@ if numnpc = 16:
 			'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/<<numnpc>>.jpg"></center>'
 
-			if pav_slut < 125:'You approach Natasha and explain how you''re struggling in school and could really use his help studying. She thinks it over for a second, but happily agrees: "Sure <<$pcs_nickname>>, that could be fun!"'
-			if pav_slut >= 125:'You approach Natasha and explain how you''re struggling in school and could really use his help studying. She makes some comments about your lousy reputation in school, but at the same time doesn''t seem to care too much about it and agrees to help you anyway. As long as you don''t tell anyone.'
+			if pav_slut < 125:'You approach Natasha and explain how you''re struggling in school and could really use her help studying. She thinks it over for a second, but happily agrees: "Sure <<$pcs_nickname>>, that could be fun!"'
+			if pav_slut >= 125:'You approach Natasha and explain how you''re struggling in school and could really use her help studying. She makes some comments about your lousy reputation in school, but at the same time doesn''t seem to care too much about it and agrees to help you anyway. As long as you don''t tell anyone.'
 			if $loc ! 'gdkin':
 				xgt 'gschool_lessons', 'short_break', 'nopict'
 			else
@@ -666,5 +612,105 @@ if numnpc = 31:
 	end
 end
 
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+!!!!!Aleksandra Kirilenko!!!!!
+!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
+
+if numnpc = 62:
+	if npc_rel[$static_num] >= 100 and grupTipe = 3 and npc_QW[$static_num] = 0 and temper >= 15:
+		act 'Ask to join at library after school':
+			*clr & cla
+			minut += 5
+			npc_QW[$static_num] = 1
+			gs 'stat'
+			'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+			'"Hi <<$npc_nickname[''<<$static_num>>'']>>! I just finished my last book at home and I''m not sure what I should read next. Can I join you at the library this afternoon so that you can help me find another good one to read?"'
+			'<<$npc_firstname[''<<$static_num>>'']>>''s face quickly shifts from a smile to confusion. You can tell she''s not sure how to respond and there is a long pause as a result.  Finally after about 30 seconds of thought she responds "Sure, that should be alright.  Do you mind going home with me first so that I can change out of our uniform?"'
+			'"That is no problem at all" you reply. "I''ll meet you outside of school after our last period, and then we can head to your house together."'
+			'"Sounds good <<$pcs_nickname>>. See you then" <<$npc_firstname[''<<$static_num>>'']>> replies as she heads off.'
+			if $loc ! 'gdkin':
+				xgt 'gschool_lessons', 'short_break', 'nopict'
+			else
+				act 'Move away': gt $loc, $metka
+			end
+		end
+	elseif npc_rel[$static_num] >= 100 and grupTipe = 3 and npc_QW[$static_num] = 2 and schoolprogul > 0:
+		act 'Ask to study at her house after school':
+			*clr & cla
+			minut += 5
+			npc_QW[$static_num] = 3
+			gs 'stat'
+			'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+			'"Hi <<$npc_nickname[''<<$static_num>>'']>>! I ended up missing school the other day because I was sick. Would it be alright with you if we went to your house after school so that you can help me catch up?"'
+			'<<$npc_firstname[''<<$static_num>>'']>> replies "Sure <<$pcs_nickname>>, just as long as you aren''t sick anymore.  I don''t want to get sick with whatever you had and miss school as well."'
+			'You giggle a little bit and reply "Nah, I got over my sickness so you should be fine. I''ll meet you outside of school after our last period, and then we can head to your house together."'
+			'"Sounds good <<$pcs_nickname>>. See you then" <<$npc_firstname[''<<$static_num>>'']>> replies as she heads off.'
+			if $loc ! 'gdkin':
+				xgt 'gschool_lessons', 'short_break', 'nopict'
+			else
+				act 'Move away': gt $loc, $metka
+			end
+		end
+	elseif npc_rel[$static_num] >= 100 and npc_QW[$static_num] = 4 and pcs_dom >= 20:
+		act 'Serious talk':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+			npc_QW['A231'] = 5
+			'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+			'As you walk to up <<$npc_firstname[''<<$static_num>>'']>>, you feel your stomach drop to the floor due to how awkward the situation is. However you''re not about to let what happened end your friendship without at least clearing the air.'
+			'After about a minute or so of eye contact, you finally develop enough courage to speak first.'
+			'"Hi <<$npc_nickname[''<<$static_num>>'']>>...." You say in a nervous and defeated voice.'
+			'"Hi <<$pcs_nickname>>...." she replies in an equally nervous voice.'
+			'After taking a couple more seconds to fully collect your thoughs, you say "Look, I think we need to talk about what happened last time at your house. Given the subject, it would be best to do so privately.  Can we meet after school to talk about it?"'
+			'<<$npc_nickname[''<<$static_num>>'']>> doesn''t respond, and almost looks like she''s about to start crying. She finally wimpers "Are you mad at me or are you sickened by me?"'
+			'Not completely surprised by what she said, you hold firm in making sure to wait until the two of you are alone. "I don''t wan''t to discuss things here. Meet me after school so we can talk about this more. I promise I''m not going to hurt you if that is what you''re afraid of."'
+			'Looking a little releaved, <<$npc_firstname[''<<$static_num>>'']>> nods her head in a slow manner and sheds a couple of tears. You walk away without either of you saying another word."'
+			if $loc ! 'gdkin':
+				xgt 'gschool_lessons', 'short_break', 'nopict'
+			else
+				act 'Move away': gt $loc, $metka
+			end
+		end	
+	elseif npc_rel[$static_num] >= 100 and npc_QW[$static_num] = 4 and pcs_dom < 20:
+		act 'Chicken Out':
+			*clr & cla
+			minut += 5
+			gs 'stat'
+			'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/62.jpg"></center>'
+			'As you see <<$npc_firstname[''<<$static_num>>'']>>, you feel your stomach drop to the floor due to how awkward the situation is. You don''t have enough courage to bring up what happened the last time you were at <<$npc_firstname[''<<$static_num>>'']>>''s house, so you pretend to not see her and carry on your way.'
+			if $loc ! 'gdkin':
+				xgt 'gschool_lessons', 'short_break', 'nopict'
+			else
+				act 'Move away': gt $loc, $metka
+			end
+		end
+	elseif npc_QW[$static_num] > 5:
+		'Ever since you asked <<$npc_nickname[''<<$static_num>>'']>> to be your girlfriend, she has come out of her shell a bit more. She even kisses you while at school!'
+		act 'Kiss her':
+			*clr & cla
+			minut += 5
+			npc_rel[$static_num] += 10
+			npc_love[$static_num] += 5
+			npc_horny[$static_num] += 15
+			gs 'arousal', 'kiss', '5', 'futa'
+			gs 'stat'
+			'<center><b><font color="maroon"><<$npc_firstname[$static_num]>> <<$npc_lastname[$static_num]>></font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/girl/aleksandra/school_kiss.jpg"></center>'
+			'You lean in to kiss <<$npc_firstname[''<<$static_num>>'']>> and you both close your eyes as your lips meet. You don''t really care what anyone else thinks, you both just enjoy the moment.' 
+			'You eventually break off the kiss and say "See you later cutie" and head on your way.'
+			if $loc ! 'gdkin':
+				xgt 'gschool_lessons', 'short_break', 'nopict'
+			else
+				act 'Move away': gt $loc, $metka
+			end
+		end
+	end
+end
+
 --- Snpc ---------------------------------
 

locations/_body_image.qsrc

@@ -6,23 +6,31 @@
 $body_image_msg = ''
 if $ARGS[0] = 'body':
 !!	This displays the body image; $bodimgsets[x9] is the folder name
-	if salocatnow >= 1 and salocatnow <= 5:
-		$RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/<<salocatnow>>.jpg'
-	elseif salocatnow <= 0:
-		$RESULT = 'images/pc/body/shape/0.jpg'
-	elseif salocatnow = 6:
-		if imgset6ovr[bodset] = 1:
-			$RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/6.jpg'
-		else
-			$RESULT = 'images/pc/body/shape/6.jpg'
-		end
-	else
-		if imgset7ovr[bodset] = 1:
-			$RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/7.jpg'
-		else
-			$RESULT = 'images/pc/body/shape/7.jpg'
-		end
-	end
+	if (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)) and bodset = 3:
+                if PregChem > 6216:
+                        $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10)+9)]>>/8.jpg'
+                elseif PregChem < 2688:
+                        $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10)+9)]>>/0.jpg'
+                else
+                        $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10)+9)]>>/<<((PregChem - 2184)/504)>>.jpg'
+                end
+        elseif salocatnow >= 1 and salocatnow <= 5:
+                $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/<<salocatnow>>.jpg'
+        elseif salocatnow <= 0:
+                $RESULT = 'images/pc/body/shape/0.jpg'
+        elseif salocatnow = 6:
+                if imgset6ovr[bodset] = 1:
+                        $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/6.jpg'
+                else
+                        $RESULT = 'images/pc/body/shape/6.jpg'
+                end
+        else
+                if imgset7ovr[bodset] = 1:
+                        $RESULT = 'images/pc/body/shape/<<$bodimgsets[((bodset * 10) + 9)]>>/7.jpg'
+                else
+                        $RESULT = 'images/pc/body/shape/7.jpg'
+                end
+        end
 	$body_image_msg += 'You are <<pcs_hgt>>cm tall and <<$body>>'
 end
 

locations/andrey.qsrc

@@ -11,7 +11,7 @@ if $ARGS[0] = '':
 
 	if (young_shop_work = 1 and week = 5 and hour = 20) or (young_shop_work1 = 1 and week = 7 and hour = 15) or (young_shop_work2 = 1 and week = 5 and hour = 15):
 		gs 'andrey', 'regular'
-	elseif hour >= 20 or (week > 4 and hour >= 16):
+	elseif hour >= 20 or (week > 5 and hour >= 16):
 		msg '<center>Andrew M. Sobulyagin says goodbye and leaves. His workday has ended.</center>'
 		gt 'young_shop', 'start'
 	end

locations/anushapt.qsrc

@@ -248,6 +248,9 @@ if $ARGS[0] = 'bathroom':
 			'<center><h4><font color="maroon">Bathroom</font></h4></center>'
 			'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></video></center>'
 			'You take a quick shower.'
+			act 'Take a selfie':
+				gs 'telefon', 'Phone_selfie_image_bathing', 'shower'
+			end
 			act 'Get out of the shower': gt 'anushapt','bathroom'
 		end
 	end
@@ -1331,6 +1334,8 @@ if $ARGS[0] = 'livingroom':
 end
 
 if $ARGS[0] = 'kitchen':
+	$loc = 'anushapt'
+	$metka = 'kitchen'
 	$menu_loc = 'anushapt'
 	$menu_arg = 'kitchen'
 	menu_off = 0
@@ -1339,11 +1344,14 @@ if $ARGS[0] = 'kitchen':
 	minut += 1
 	$locclass = 'kitr'
 	gs 'stat'
+	gs 'kit_din'
 	'<center><b><font color = maroon>Kitchen</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/anushapt/kitchen.jpg"></center>'
 	'The room is not clean and there are dishes on most of the surfaces. The wood floor is not polished and only covers the areas being used. You''re surprised by the lack of a dinner table.'
 	act 'Leave':gt 'anushapt','hallway'
 	act 'Look in the fridge': gt 'anushapt', 'holodilnik'
+	dynamic $fill_bottle
+	dynamic $driwater
 end
 
 if $ARGS[0] = 'holodilnik':

locations/backwater.qsrc

@@ -178,7 +178,7 @@ else
 			'You pick up your clothes laying on the ground.'
 			gt $loc, $metka
 		end
-	else
+	elseif forced_naked_day < daystart:
 		act 'Get dressed':
 			cla
 			*clr

locations/banditbreak.qsrc

@@ -1,537 +0,0 @@
-# banditbreak
-
-!! Bandit the Dog - npc static id A66
-
-cls
-menu_off = 1
-gs 'boyStat', 'A66'
-sexpartkno = 1
-sexvolume = rand(20,590)
-sexspecpot = 0
-minut += 2
-pcs_horny += RAND(5,10)
-gs 'stat'
-
-'<center><img <<$set_imgh>> src="images/beast/bandit/piratbreak.jpg"></center>'
-
-act 'Vaginal':
-	if vgape > 1:
-		cls
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/predoggy.jpg"></center>'
-		'You pussy is too sore, let it recover, bitch.'
-		act 'Close':gt 'Gadsarai'
-	else
-		cls
-		npc_horny['A66'] = 0
-		pcs_mood = pcs_mood/2
-		gs 'stat'
-
-		'<center><img <<$set_imgh>> src="images/beast/bandit/piratvag.jpg"></center>'
-		'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify...'
-		gs 'arousal', 'foreplay', 2, 'sub', 'beast'
-		gs 'stat'
-		act 'Allow':
-			cls
-			pcs_mood = pcs_mood/2
-			gs 'stat'
-
-			'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagknot.jpg"></center>'
-			'You hands rest against the floor and you arch your ass backwards, literally begging Bandit to give your pussy the knotting it needs so badly. As expected from a dog, he is too focused on fucking that warm fuckhole of yours to understand or simply care about your desires, but without any warning, you feel his pointed tip hitting your cervix with a deep hard thrust from your dog lover, and before you realize it, his knot has slipped past your damp petals like a knife through butter... Which leaves you shocked in bliss, relishing from the warm jets of spunk being poured inside your well fucked cumdump.'
-			gs 'arousal', 'vaginal', 2, 'sub', 'beast'
-			gs 'stat'
-			banditboggle = RAND(0,5)
-			if banditboggle <= 3:
-				if pcs_vag < 10:
-					pcs_vag += 4
-					vgape = 3
-					gs 'cum_manage'
-					gs 'stat'
-					'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-					gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 10 and pcs_vag < 25:
-					pcs_vag += 3
-					vgape = 2
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-						'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 25 and pcs_vag < 35:
-					pcs_vag += 2
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-						'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 35:
-					pcs_vag += 1
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-						'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				end
-			else
-				if pcs_vag < 10:
-					minut += 20
-					pcs_vag += 4
-					vgape = 3
-					pcs_horny = 0
-					gs 'cum_manage'
-					gs 'stat'
-					'The knot continues to grow bigger and bigger as Bandit climaxes, filling your pussy to the brim with his warm load. Too worried of being hurt, you patiently wait for Bandit''s knot to deflate, and twenty minutes later he finally slips out, which leaves you with a feeling of emptiness as a torrent of dog cum flows out from your snatch.'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 10 and pcs_vag < 25:
-					pcs_vag += 3
-					vgape = 1
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum.jpg"></center>'
-						'Knot all continues and continues to increase in size until it finally reaches its maximum size. Your excitement is so great that you start to finish even though mild aching pain in the vagina...'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'arousal', 'end'
-						gs 'stat'
-					else
-						'Knot all continues and continues to increase in size until it finally reaches its maximum size. Your excitement is so great that you start to finish even though mild aching pain in the vagina...'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 25:
-					pcs_vag += 2
-					gs 'stat'
-
-					'<center><img <<$set_imgh>> src="images/beast/bandit/piratbreak.jpg"></center>'
-					'Bandit mounts you once again and vigorously starts to fuck your vagina, but it is so loose that there is just no way you it can hold the knot, and as soon as Bandit''s cock slips out from your gaping fuckhole he starts moving away from you...'
-					gs 'arousal', 'vaginal', 5, 'sub', 'beast'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'try again':gt 'banditbreak'
-				end
-			end
-		end
-		act 'Prevent':
-			cls
-			minut += 2
-			pcs_mood = pcs_mood/2
-			gs 'stat'
-
-			'<center><img <<$set_imgh>> src="images/beast/bandit/piratvag.jpg"></center>'
-			'You decide you don''t want Bandit to knot your pussy and clench your inner walls around his girth before quickly sending one of your shaky hands to his warm cock, you carefully pull him out of you between two thrusts, leaving the poor dog all frustrated, you quickly stand up before Bandit comes back.'
-			banditboggle = RAND(0,5)
-			if banditboggle <= 2:
-				if pcs_vag < 15:
-					pcs_vag += 1
-					vgape = 1
-					sexvolume = rand(20,50)
-					gs 'cum_manage'
-					gs 'stat'
-					'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-					gs 'arousal', 'vaginal', 10, 'sub', 'beast'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 15 and pcs_vag < 25:
-					pcs_vag += 1
-					sexvolume = rand(20,50)
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum1.jpg"></center>'
-						'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 10, 'sub', 'beast'
-						gs 'stat'
-					else
-						'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-						gs 'arousal', 'vaginal', 10, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 25 and pcs_vag < 35:
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum1.jpg"></center>'
-						'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_vag >= 35:
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/piratvagcum1.jpg"></center>'
-						'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'You extend one of your arms between your legs and carefully guide Bandit''s penis to your twat, as soon as he feels how wet you are, the dog powerfully thrusts forwards and fills your main fuckhole with his canine boner. You grit your teeth as your grandparents dog mercilessly uses your snatch for what it''s worth, bestially having his way with you without any care for your own pleasure, which is still a thrilling enough experience. Soon you can feel his panting and the relentless pounding intensify and you feel him ejaculating deep inside your twat...'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				end
-			else
-				cls
-				if pcs_vag < 15:
-					minut += 10
-					pcs_vag += 1
-					if vgape <3:vgape += 1
-					pcs_horny -= RAND(10,20)
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/piratbreak.jpg"></center>'
-					'Bandit begins to vigorously fuck your vagina, but it is so loose that there is just no way you it can hold the knot, and as soon as Bandit''s cock slips out from your gaping fuckhole he starts moving away from you...'
-					gs 'arousal', 'end'
-					gs 'stat'
-				elseif pcs_vag >= 15 and pcs_vag < 25:
-					pcs_vag += 1
-					sexvolume = rand(20,50)
-					gs 'cum_manage'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/piratbreak.jpg"></center>'
-					'Bandit begins to vigorously fuck your vagina, but it is so loose that there is just no way you it can hold the knot, and as soon as Bandit''s cock slips out from your gaping fuckhole he starts moving away from you...'
-					gs 'arousal', 'vaginal', 10, 'sub', 'beast', 'rough'
-					gs 'arousal', 'end'
-					gs 'stat'
-				elseif pcs_vag >= 25 and pcs_vag < 35:
-					minut += 20
-					pcs_horny += RAND(30,50)
-					gs 'cum_manage'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/piratbreak.jpg"></center>'
-					'Bandit begins to vigorously fuck your vagina, but it is so loose that there is just no way you it can hold the knot, and as soon as Bandit''s cock slips out from your gaping fuckhole he starts moving away from you...'
-					gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-					gs 'arousal', 'end'
-					gs 'stat'
-				elseif pcs_vag >= 35:
-					gs 'cum_manage'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/piratbreak.jpg"></center>'
-					'Bandit begins to vigorously fuck your vagina, but it is so loose that there is just no way you it can hold the knot, and as soon as Bandit''s cock slips out from your gaping fuckhole he starts moving away from you...'
-					gs 'arousal', 'vaginal', 20, 'sub', 'beast'
-					gs 'arousal', 'end'
-					gs 'stat'
-				end
-				act 'Try again':gt 'banditbreak'
-			end
-		end
-	end
-end
-act 'Anal':
-	if agape > 1:
-		cls
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/predoggy.jpg"></center>'
-		'Your ass is too sore, let it recover, dumb slut.'
-		act 'Close':gt 'Gadsarai'
-	else
-		cls
-		npc_horny['A66'] = 0
-		pcs_mood = pcs_mood/2
-		gs 'stat'
-
-		'<center><img <<$set_imgh>> src="images/beast/bandit/piratanal.jpg"></center>'
-		'You lower your ass a bit and cover your pussy with one of your hand to make your ass the only possible target for Bandit then blush in shame as you realize how much of a dog slut you''ve become and brace yourself as the dog starts to furiously poke your ass and fingers with his pointed tip, smearing small amount of precum on your skin as he does. After a few attempts, Bandit''s cock savagely makes its way past your anal pucker and roughly starts moving in and out of you, claiming your asshole as his new personal playroom, you crie out both from pain and pleasure, doing your best to relax your backdoor and make it as enjoyable as possible for your canine lover. Bandit continues to use you like the filthy bitch you are for several minutes, you groan under him and feel his warm breath in the back of your neck, the pounding increasing in speed and strenght makes you instinctively clench your ass around his girth, and the feeling of his swollen knot hitting the ravaged ring of your ass with every single thrust makes you very aware of the horny dog''s intentions, he wants to knot your ass !'
-		gs 'arousal', 'foreplay', 2, 'sub', 'beast'
-		gs 'stat'
-		act 'Allow':
-			cls
-			pcs_mood = pcs_mood/2
-			gs 'stat'
-
-			'<center><img <<$set_imgh>> src="images/beast/bandit/analknot.jpg"></center>'
-			'You brace yourself and dig your nails in the dirty ground as you prepare yourself to be anally knotted by your grandparents dog. Bandit doesn''t seem to pay attention an casually continues to pound your ass, you grit your teeth in anticipation when you feel the swollen orb hitting your ravaged anal spincher again, it''s gonna slip in soon !! And it finally happens, with one hell of a hard thrust, Bandit mercilessly pushes his knot inside your ass, you cry out in pain and bliss, your legs shaking from the intense orgasm you''re experiencing, and the endless amount of canine spunk he is pouring in your bowels only intensify your shameful orgasm further.'
-			gs 'arousal', 'anal', 2, 'sub', 'beast'
-			gs 'stat'
-			banditboggle = RAND(0,5)
-			if banditboggle <= 4:
-				if pcs_ass < 15:
-					minut += 20
-					pcs_ass += 4
-					agape = 3
-					pcs_horny = 0
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_ass >= 15 and pcs_ass < 25:
-					minut += 20
-					pcs_ass += 3
-					agape = 2
-					pcs_horny -= RAND(15,30)
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_ass >= 25 and pcs_ass < 35:
-					pcs_ass += 2
-					agape = 1
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/analcum.jpg"></center>'
-						'As soon as you feel Bandit''s knot in your ass you bring one hand between your legs and start rubbing your clit with eager lust, sadly, your ass is so loose that the cock almost instantly slips out from your butt, you barely had enough time to enjoy your anal creampie when you notice his tip still shooting thick jets of spunk which you wish would have been poured in your bowels instead of painting the dirty floor of the barn...'
-						$orgasm_or = 'yes'
-						gs 'arousal', 'anal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-						gs 'arousal', 'anal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_ass >= 35:
-					pcs_ass += 1
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					if pcs_horny >= 100:
-						cls
-						pcs_mood = 100
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/beast/bandit/analcum.jpg"></center>'
-						'As soon as you feel Bandit''s knot in your ass you bring one hand between your legs and start rubbing your clit with eager lust, sadly, your ass is so loose that the cock almost instantly slips out from your butt, you barely had enough time to enjoy your anal creampie when you notice his tip still shooting thick jets of spunk which you wish would have been poured in your bowels instead of painting the dirty floor of the barn...'
-						gs 'arousal', 'anal', 20, 'sub', 'beast'
-						gs 'stat'
-					else
-						'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-						gs 'arousal', 'anal', 20, 'sub', 'beast'
-						gs 'stat'
-					end
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				end
-			else
-				cls
-				if pcs_ass < 15:
-					minut += 20
-					pcs_ass += 5
-					agape = 3
-					pcs_horny = 0
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analpain.jpg"></center>'
-					'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_ass >= 15 and pcs_ass < 25:
-					minut += 20
-					pcs_ass += 5
-					agape = 3
-					pcs_horny = 0
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analpain.jpg"></center>'
-					'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_ass >= 25 and pcs_ass < 35:
-					minut += 20
-					pcs_ass += 4
-					agape = 2
-					pcs_horny -= RAND(40,60)
-					spafinloc = 3
-					gs 'cum_manage'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analpain.jpg"></center>'
-					'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				elseif pcs_ass >= 35:
-					pcs_ass += 3
-					agape = 1
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analpain.jpg"></center>'
-					'You can feel Bandit''s cock bathing in its own sperm within your ass now, and you endure the filling he''s giving you like a good bitch, trapped under your canine mate, his huge knot sealed past your puckered asshole for about ten long minutes before the knot starts to deflate and slips out from your well used butthole, followed by a thick torrent of sperm which creates a funny puddle on the floor.'
-					gs 'arousal', 'anal', 5, 'sub', 'beast'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Leave':gt 'Gadsarai'
-				end
-			end
-		end
-		act 'Prevent':
-			cls
-			minut += 2
-			pcs_mood = pcs_mood/2
-			sub += 1
-			gs 'stat'
-
-			'<center><img <<$set_imgh>> src="images/beast/bandit/piratanal.jpg"></center>'
-			'You grin as you realizee Bandit is trying to knot your ass and decide to stop him, you extend one of your hands between your legs to grab the base of his cock, your fingers carefully placed on each side of the knot, which prevents it from slipping past your well used anal pucker, but still, it doesn''t prevent Bandit from giving you one hell of a messy anal creampie.'
-
-			if pcs_ass < 15:
-				minut += 10
-				pcs_ass += 1
-				agape = 2
-				pcs_horny -= RAND(15,30)
-				spafinloc = 3
-				sexvolume = rand(20,50)
-				gs 'cum_manage'
-				gs 'stat'
-				'You shudder in pleasure as Bandit furiously pounds away at your butthole without any care about your well being, you moan in bliss when you feel his warm load filling your bowels and groan when he pulls out without knotting you, leaving you panting with his viscous gift dripping out of your freshly used anus.'
-				act 'Leave':gt 'Gadsarai'
-			elseif pcs_ass >= 15 and pcs_ass < 25:
-				pcs_ass += 1
-				spafinloc = 3
-				gs 'cum_manage'
-				gs 'stat'
-				if pcs_horny >= 100:
-					cls
-					pcs_mood = 100
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analcum2.jpg"></center>'
-					'Soon Bandit finishes and you powerfully orgasm, the flow of semen into your rectum driving you over the edge. Still holding the base of his cock in one hand while the other is shakily stroking your clit and getting drenched in your love juices.'
-					$orgasm_or = 'yes'
-					gs 'arousal', 'anal', 20, 'sub', 'beast'
-					gs 'stat'
-				else
-					'You shudder in pleasure as Bandit furiously pounds away at your butthole without any care about your well being, you moan in bliss when you feel his warm load filling your bowels and groan when he pulls out without knotting you, leaving you panting with his viscous gift dripping out of your freshly used anus.'
-					gs 'arousal', 'anal', 20, 'sub', 'beast'
-					gs 'stat'
-				end
-				gs 'arousal', 'end'
-				gs 'stat'
-				act 'Leave':gt 'Gadsarai'
-			elseif pcs_ass >= 25 and pcs_ass < 35:
-				spafinloc = 3
-				gs 'cum_manage'
-				gs 'stat'
-				if pcs_horny >= 100:
-					cls
-					pcs_mood = 100
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analcum2.jpg"></center>'
-					'Soon Bandit finishes and you powerfully orgasm, the flow of semen into your rectum driving you over the edge. Still holding the base of his cock in one hand while the other is shakily stroking your clit and getting drenched in your love juices.'
-					$orgasm_or = 'yes'
-					gs 'arousal', 'anal', 20, 'sub', 'beast'
-					gs 'stat'
-				else
-					'You shudder in pleasure as Bandit furiously pounds away at your butthole without any care about your well being, you moan in bliss when you feel his warm load filling your bowels and groan when he pulls out without knotting you, leaving you panting with his viscous gift dripping out of your freshly used anus.'
-					gs 'arousal', 'anal', 20, 'sub', 'beast'
-					gs 'stat'
-				end
-				gs 'arousal', 'end'
-				gs 'stat'
-				act 'Leave':gt 'Gadsarai'
-			elseif pcs_ass >= 35:
-				spafinloc = 3
-				gs 'cum_manage'
-				gs 'stat'
-				if pcs_horny >= 100:
-					cls
-					pcs_mood = 100
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/beast/bandit/analcum2.jpg"></center>'
-					'Soon Bandit finishes and you powerfully orgasm, the flow of semen into your rectum driving you over the edge. Still holding the base of his cock in one hand while the other is shakily stroking your clit and getting drenched in your love juices.'
-					$orgasm_or = 'yes'
-					gs 'arousal', 'anal', 20, 'sub', 'beast'
-					gs 'stat'
-				else
-					'You shudder in pleasure as Bandit furiously pounds away at your butthole without any care about your well being, you moan in bliss when you feel his warm load filling your bowels and groan when he pulls out without knotting you, leaving you panting with his viscous gift dripping out of your freshly used anus.'
-					gs 'arousal', 'anal', 20, 'sub', 'beast'
-					gs 'stat'
-				end
-				gs 'arousal', 'end'
-				gs 'stat'
-				act 'Leave':gt 'Gadsarai'
-			end
-		end
-	end
-end
-
---- banditbreak ---------------------------------
-

locations/bass.qsrc

@@ -143,9 +143,12 @@ if $ARGS[0] = 'a':
 		gs 'exercise', 'tier1', 60, 'stren_exp'
 		pcs_sweat = 10 + rand(0,4)
 		if pcs_inhib < 50:inhib_exp += rand(1,2)
-			
-		'<center><img <<$set_imgh>> src="images/locations/shared/lake/swim.jpg"></center>'
-		'You take a swim in the pool, which invigorates you making you feel refreshed.'
+		if pregchem < 3600:	
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/pool/poolswim.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/pool/poolswimpreg.jpg"></center>'
+		end
+		'You take a swim in the pool, which invigorates you, making you feel refreshed.'
 
 		act 'Get out of the water':gt 'bass', 'start'
 	end

locations/bed.qsrc

@@ -112,7 +112,7 @@ if $ARGS[0] = 'mast':
 							'<center><img <<$set_imgh>> src="images/characters/city/husband/sex/m22.jpg"></center>'
 							'You pull the dildo out of your pussy and winking at your husband, insert it in your anus. <<$husName>> watches closely as you pump the dildo in and out of your ass.'
 							'You see how his pants swell. "Anything else you want, dear?" you ask, smiling.'
-							'"I don''t just want something, I''ll do somthing." He says, unbuttoning his pants and brings his cock to your mouth.'
+							'"I don''t just want something, I''ll do something." He says, unbuttoning his pants and brings his cock to your mouth.'
 
 							act 'Suck him':
 								cla
@@ -153,7 +153,7 @@ if $ARGS[0] = 'mast':
 							end
 						elseif izvratH = 1:
 							husband += 1
-							'"You''re going to insert this stupid toy in your pussy, ass and mouth, You''ll pulverise them, for as long as I like." He says, sitting down to watch.'
+							'"You''re going to insert this stupid toy in your pussy, ass and mouth, You''ll pulverize them, for as long as I like." He says, sitting down to watch.'
 							'Submissively, you quickly use the dildo to fuck your pussy, ass and mouth.'
 							
 							gs 'arousal', 'masturbate', 10
@@ -179,13 +179,20 @@ if $ARGS[0] = 'mast':
 				end
 			else
 				'<center><video autoplay loop src="images/shared/sex/mast/mastr.mp4"></video></center>'
-				$orgasm_or = 'custom'
-				$orgasm_txt = 'You stick the dildo to the floor and plant your wet pussy on it, bouncing up and down on the artificial cock, you quickly feel the excitement and orgasm.'
+				'Unable to control yourself anymore you immediately reach for your dildo so you can finally take care of your lustful desires. You waste no time to attach the suction base of the dildo onto the floor before lowering yourself slowly to it''s tip.'
+				'Shivers run down your spine as you feel that thick head spreading your pussy-lips and soon the whole length begin to slide deep inside your hole. A throaty moan overwhelms the room when that delicious cock finally bottoms out in your cunt, sending you to the heavens and back.'
+				'After shifting your legs and getting more comfortable you start to rock your hips and bounce on it, moaning louder and louder as you keep increasing the power and pace of your thrusts- soon hammering your ass against the cold floor time and time again. It takes you just a few minutes to reach that so wanted orgasm, your toes curling tightly as that wonderful feeling run through your entire body...'
+				'Soon you''re twitching onto that dildo and juices drip down its length, soaking the floor beneath you. You take a few deep breaths and a smile grows along your face after cumming so hard there. That was just what you needed!'
 
+				
+				$orgasm_or = 'yes'
+				gs 'arousal', 'vaginal_dildo', 10
+				gs 'arousal', 'end'
+				
 				act 'Breathe':gt 'bed', 'start'
 			end
 		elseif week > 5 or week < 6 and hour > 16:
-			'You feel the need for somthing inside you and think that your husband would be a better option.'
+			'You feel the need for something inside you and think that your husband would be a better option.'
 		else
 			gt 'selfplay', 'start'
 		end

locations/bed2.qsrc

@@ -494,9 +494,9 @@ if $ARGS[0] = 'succubinit':
 		preg = 0
 		pregtime = 0
 		pregtalk = 0
-		pregTalkPC = 0
-		pregTalkNat = 0
-		pregTalkbrother = 0
+		pcs_pregtalk = 0
+		npc_pregtalk['A16'] = 0
+		npc_pregtalk['A34'] = 0
 		thinkpreg = 0
 		knowpreg = 0
 		pregchem = 0

locations/bedrPar.qsrc

@@ -214,15 +214,15 @@ if pcs_sewng >= 80:
 end
 
 if sisterHere = 0 and breastpump = 1 and bp_unbox <= 0:
-	'<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Unbox</a> your breast pump'
+	'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
 elseif kid >= 1 and breastpump = 1 and bp_unbox <= 0:
-	'<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Unbox</a> your breast pump'
+	'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
 elseif sisterHere = 0 and breastpump = 1 and bp_unbox = 1 and pcs_inbition > 40:
-	'<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Try out</a> your breast pump'
+	'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
 elseif kid >= 1 and breastpump = 1 and bp_unbox = 1 and pcs_inbition > 30:
-	'<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Try out</a> your breast pump'
+	'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Try out</a> your breast pump'
 end
-gs 'lact_lib', 'massage'
+gs 'lact_bp', 'massage'
 
 act 'Relax on your bed': gt 'bed', 'start'
 
@@ -235,6 +235,8 @@ if $ARGS[0] = 'intro':
 	menu_off = 1
 	hour = 6
 	gs 'stat'
+	music_loop = 0
+	CLOSE ALL
 	'<center><h1><font color="maroon">Your Bedroom</font></h1></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/mom/prost4.jpg"></center>'
 	*nl

locations/beg1.qsrc

@@ -87,22 +87,31 @@ if $ARGS[0] = 'br':
 	if begresult <= 18:  
 		'Sadly, you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
 	elseif begresult <= 23:
+		gs 'fame', 'city', 'running', 1
 		'You performed well for an amateur but still only came in last (8th place).'
 	elseif begresult < 19:
+		gs 'fame', 'city', 'running', 1
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 20:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 21:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 22:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 23:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 24:
+		gs 'fame', 'city', 'running', 3
 		bronzebeg += 1 & money += 100 & 'You fought hard and managed to take 3rd place, earning a prize: You receive a bronze bade and a prize of 100 <b>₽</b>'
 	elseif begresult < 25:
+		gs 'fame', 'city', 'running', 3
 		silverbeg += 1 & money += 500 & 'You fought hard and managed to take 2nd place, earning a prize: You receive a silver badge and a prize of 500 <b>₽</b>'
 	elseif begresult >= 25:
+		gs 'fame', 'city', 'running', 4
 		razradbeg = 1 & goldbeg += 1 & money += 1000 & 'You fought hard and managed to take 1st place! You receive a gold badge, a prize of 1, 000 <b>₽</b> and are now part of your club''s junior squad.'
 	end
 	
@@ -128,20 +137,28 @@ if $ARGS[0] = '3':
 	if begresult <= 18:
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
 	elseif begresult < 26:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 27:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 28:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 29:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 30:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 31:
+		gs 'fame', 'city', 'running', 3
 		bronzebeg += 1 & money += 500 & 'You fought hard and managed to take 3rd place, earning a prize: You receive a bronze badge and a prize of 500 <b>₽</b>'
 	elseif begresult < 32:
+		gs 'fame', 'city', 'running', 3
 		silverbeg += 1 & money += 1000 & 'You fought hard and managed to take 2nd place, earning a prize: You reveice a silver badge and a prize of 1, 000 <b>₽</b>'
 	elseif begresult >= 32:
+		gs 'fame', 'city', 'running', 4
 		razradbeg = 2 & goldbeg += 1 & money += 2000 & 'You fought hard and managed to take 1st place! You receive a gold badge, a prize of 2, 000 <b>₽</b> and are now part of your club''s senior squad, representing it at the next city championship!'
 	end
 	act 'Leave':gt 'fit', 'dressing room'
@@ -164,22 +181,31 @@ if $ARGS[0] = '2':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 
 	if begresult <= 18:
+		gs 'fame', 'city', 'running', 1
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made a bit of a fool of yourself.'
 	elseif begresult < 33:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 34:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 35:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 36:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 37:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 38:
+		gs 'fame', 'city', 'running', 4
 		bronzebeg += 1 & money += 1000 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 1, 000 <b>₽</b>'
 	elseif begresult < 39:
+		gs 'fame', 'city', 'running', 4
 		silverbeg += 1 & money += 2000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 2, 000 <b>₽</b>'
 	elseif begresult >= 39:
+		gs 'fame', 'city', 'running', 5
 		razradbeg = 3 & goldbeg += 1 & money += 3000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 3000 <b>₽</b> and became the "Track Champion of the City of Saint Petersburg", which qualifies you for the next oblast championship!'
 	end
 	act 'Leave':gt 'fit', 'dressing room'
@@ -203,22 +229,31 @@ if $ARGS[0] = '1':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 
 	if begresult <= 18:
+		gs 'fame', 'city', 'running', 1
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
 	elseif begresult < 40:
+		gs 'fame', 'city', 'running', 2
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 41:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 42:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 43:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 44:
+		gs 'fame', 'city', 'running', 4
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 45:
+		gs 'fame', 'city', 'running', 5
 		bronzebeg += 1 & money += 2000 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 2, 000 <b>₽</b>'
 	elseif begresult < 46:
+		gs 'fame', 'city', 'running', 5
 		silverbeg += 1 & money += 3000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 3, 000 <b>₽</b>'
 	elseif  begresult >= 46:
+		gs 'fame', 'city', 'running', 6
 		razradbeg = 4 & goldbeg += 1 & money += 4000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 4000 <b>₽</b> and became the "Track Champion of the Leningrad Oblast", not only putting you on the list of the 50 best track athletes in the Russian Federation but also qualifying you for the next district championship!'
 	end
 	act 'Leave':gt 'fit', 'dressing room'
@@ -242,22 +277,31 @@ if $ARGS[0] = 'kms':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 
 	if begresult <= 18:
+		gs 'fame', 'city', 'running', 2
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
 	elseif begresult < 47:
+		gs 'fame', 'city', 'running', 3
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 48:
+		gs 'fame', 'city', 'running', 4
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 49:
+		gs 'fame', 'city', 'running', 4
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 50:
+		gs 'fame', 'city', 'running', 4
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 51:
+		gs 'fame', 'city', 'running', 5
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 52:
+		gs 'fame', 'city', 'running', 6
 		bronzebeg += 1 & money += 3000 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 3, 000 <b>₽</b>'
 	elseif begresult < 53:
+		gs 'fame', 'city', 'running', 8
 		silverbeg += 1 & money += 4000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 4, 000 <b>₽</b>'
 	elseif begresult >= 53:
+		gs 'fame', 'city', 'running', 10
 		razradbeg = 5 & goldbeg += 1 & money += 5000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 5000 <b>₽</b> and became the "Track Champion of the Northwest District". You are now one of the 8 best track athletes in the Russian Federation and qualified for the next national championship!'
 	end
 	act 'Leave':gt 'fit', 'dressing room'
@@ -282,22 +326,31 @@ if $ARGS[0] = 'ross':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 
 	if begresult <= 18:
+		gs 'fame', 'city', 'running', 4
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
 	elseif begresult < 54:
+		gs 'fame', 'city', 'running', 6
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 55:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 56:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 57:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 58:
+		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 59:
+		gs 'fame', 'city', 'running', 15
 		bronzebeg += 1 & money += 4000 & 'You fought hard and managed to take 3rd place, earning a prize: You get a bronze medal and a prize of 4, 000 <b>₽</b>'
 	elseif begresult < 60:
+		gs 'fame', 'city', 'running', 15
 		silverbeg += 1 & money += 5000 & 'You fought hard and managed to take 2nd place, earning a prize: You get a silver medal and a prize of 5, 000 <b>₽</b>'
 	elseif begresult >= 60:
+		gs 'fame', 'city', 'running', 20
 		razradbeg = 6 & goldbeg += 1 & money += 6000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 6000 <b>₽</b> and became the "Track Champion of the Russian Federation". You are the single best track athlete in Russia - maybe you should try to qualify for the European championship?'
 	end
 	act 'Leave':gt 'fit', 'dressing room'
@@ -321,22 +374,31 @@ if $ARGS[0] = 'kval':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 
 	if begresult <= 18:
+		gs 'fame', 'city', 'running', 4
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself.'
 	elseif begresult < 61:
+		gs 'fame', 'city', 'running', 6
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 62:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 63:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 64:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 65:
+		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 66:
+		gs 'fame', 'city', 'running', 15
 		razradbegK += 1 & bronzebeg += 1 & money += 5000 & 'You fought hard and managed to take 3rd place, earning a prize. You get a bronze badge and a prize of 5,000 <b>₽</b>, but sadly, only the 1st place adds to your qualification for the European championship.'
 	elseif begresult < 67:
+		gs 'fame', 'city', 'running', 15
 		razradbegK += 1 & silverbeg += 1 & money += 10000 & 'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 10,000 <b>₽</b>, but sadly, only the 1st place adds to your qualification for the European championship.'
 	elseif begresult >= 67:
+		gs 'fame', 'city', 'running', 25
 		razradbegK += 1 & goldbeg += 1 & money += 15000 & 'You fought hard and managed to take 1st place! You get a gold medal, a prize of 15,000 <b>₽</b> and are one step closer to qualifying for the European championship.'
 	end
 	act 'Leave':gt 'fit', 'dressing room'
@@ -362,26 +424,35 @@ if $ARGS[0] = 'evro':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 
 	if begresult <= 16:
+		gs 'fame', 'city', 'running', 6
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
 	elseif begresult < 68:
+		gs 'fame', 'city', 'running', 8
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 70:
+		gs 'fame', 'city', 'running', 10
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 72:
+		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 74:
+		gs 'fame', 'city', 'running', 10
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 76:
+		gs 'fame', 'city', 'running', 15
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 78:
+		gs 'fame', 'city', 'running', 20
 		razradbegEB += 1
 		money += 10000
 		'You fought hard and managed to take 3rd place, earning a prize. You get a bronze medal and a prize of 10,000 <b>₽</b>'
 	elseif begresult < 80:
+		gs 'fame', 'city', 'running', 20
 		razradbegES += 1
 		money += 15000
 		'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 15,000 <b>₽</b>'
 	elseif begresult >= 80: 
+		gs 'fame', 'city', 'running', 30
 		razradbegEG += 1
 		money += 20000
 		'You fought hard and managed to take 1st place. You get a gold medal, a prize of 20,000 <b>₽</b> and are now the "European Track Champion"!'
@@ -409,26 +480,35 @@ if $ARGS[0] = 'Int':
 	'You get in position. Then, you hear the starting shot: The race begins!'
 	
 	if begresult < 18:
+		gs 'fame', 'city', 'running', 10
 		'But you barely managed to reach the finish line, walking the last 100 meters. Of course, you came in last - but you also made of a fool of yourself. People on the ranks seem to be asking themselves how you even managed to make it this far. Maybe they are right?'
 	elseif begresult < 82:
+		gs 'fame', 'city', 'running', 15
 		'You fought hard but still have a lot of work ahead of you if you want to be better than your competition. You only came in last (8th place).'
 	elseif begresult < 85:
+		gs 'fame', 'city', 'running', 20
 		'You fought hard, but managed to only take the penultimate place (7th place).'
 	elseif begresult < 88:
+		gs 'fame', 'city', 'running', 20
 		'You fought hard, but only managed to take 6th place.'
 	elseif begresult < 91:
+		gs 'fame', 'city', 'running', 20
 		'You fought hard, but only managed to take 5th place.'
 	elseif begresult < 94:
+		gs 'fame', 'city', 'running', 25
 		'You fought hard, but only managed to take 4th place.'
 	elseif begresult < 97:
+		gs 'fame', 'city', 'running', 30
 		razradbegIB += 1
 		money += 30000
 		'You fought hard and managed to take 3rd place, earning a prize. You get a bronze medal and a prize of 30,000 <b>₽</b>'
 	elseif begresult < 100:
+		gs 'fame', 'city', 'running', 35
 		razradbegIS += 1
 		money += 50000
 		'You fought hard and managed to take 2nd place, earning a prize. You get a silver medal and a prize of 50,000 <b>₽</b>'
 	elseif begresult >= 100:
+		gs 'fame', 'city', 'running', 50
 		razradbegIG += 1
 		money += 100000
 		'You fought hard and managed to take 1st place. You get a gold medal, a prize of 100,000 <b>₽</b> and the title "World Track Champion" - YOU are the fastest woman alive!'

locations/belgang.qsrc

@@ -16,28 +16,7 @@ if $ARGS[0] = 'workofdebt':
 	end
 	
 	if money >= belgangPay: 
-		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)':
-			cla & *clr
-			minut += 5
-			money -= belgangPay
-			belgangPay = 0
-			belgangPayWeek = 0
-			belgangPayWeekAmount = 0
-			belgangProstitute = 0
-			npc_QW['A113'] = 2
-			
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
-			'No, today you won''t work for him, you will never work for him again, today you will finally be free. "Here is everything. May debts are payed." You handing it over to Vadim while his henchmen keep a look out. Once again, he gives you an awkward smile, very pleased how things have turned out. "It''s all there, right? I would hate to have to come back for the rest."'
-			'You nod at him, reassuring him. "It''s all there, mister Bely. Count them if you don''t believe me."'
-			'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount. Pleasure doing business with you, <<$pcs_nickname>>. Take care of yourself."'
-			if slutty >= 20 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"Since you were such an obedient whore, <<$pcs_nickname>>, I''ll give you a small parting gift. If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-			end
-			'He signals his crew to get back in the jeep. You barely manage to dodge the spray of pebbles and dirt the spinning tires spew your way, as they drive off as fast as they can, probably on their way to another ''business appointment''.'
-			
-			act 'Move on': gt $loc
-		end
+		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)': gt 'belgang', 'payremaining'
 	end
 	
 	if money >= belgangPayWeek and money < belgangPay:
@@ -97,28 +76,7 @@ elseif $ARGS[0] = 'payday':
 	end
 	
 	if money >= belgangPay: 
-		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)':
-			cla & *clr
-			minut += 5
-			money -= belgangPay
-			belgangPayWeek = 0
-			belgangPayWeekAmount = 0
-			belgangPay = 0
-			belgangProstitute = 0
-			npc_QW['A113'] = 2
-			
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
-			'No, today you won''t work for him, you will never work for him again, today you will finally be free. "Here is everything. May debts are payed." You handing it over to Vadim while his henchmen keep a look out. Once again, he gives you an awkward smile, very pleased how things have turned out. "It''s all there, right? I would hate to have to come back for the rest."'
-			'You nod at him, reassuring him. "It''s all there, mister Bely. Count them if you don''t believe me."'
-			'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount. Pleasure doing business with you, <<$pcs_nickname>>. Take care of yourself."'
-			if slutty >= 20 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"Since you were such an obedient whore, <<$pcs_nickname>>, I''ll give you a small parting gift. If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-			end
-			'He signals his crew to get back in the jeep. You barely manage to dodge the spray of pebbles and dirt the spinning tires spew your way, as they drive off as fast as they can, probably on their way to another ''business appointment''.'
-			
-			act 'Move on': gt $loc
-		end
+		act 'Pay the remaining debt (<<belgangPay>> <b>₽</b>)': gt 'belgang', 'payremaining'
 	elseif money >= belgangPayWeek and money < belgangPay and belgangPayWeek > 0:
 		act 'Pay for this week (<<belgangPayWeek>> <b>₽</b>)':
 			cla & *clr
@@ -130,10 +88,7 @@ elseif $ARGS[0] = 'payday':
 			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
 			'You hand over the payment for this week. "That''s it, everything for this week."'
 			'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount."'
-			if slutty >= 10 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-			end
+			gs 'belgang', 'saunamention'
 			
 			act 'Continue':
 				cla & *clr
@@ -156,14 +111,11 @@ elseif $ARGS[0] = 'payday':
 		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/fedor/fedorev/strela/vadimbely.jpg"></center>'
 		if belfirstweek = 1:
 			belfirstweek = 0
-			'Vadim Bely steps out, along with several of his henchmen. He gives you a smile that you know is 100% fake and behaves amicably while he says: "Long time no see, <<$pcs_nickname>>! Remember next sunday you need to start paying us," he says.'
+			'Vadim Bely steps out, along with several of his henchmen. He gives you a smile that you know is 100% fake and behaves amicably while he says: "Long time no see, <<$pcs_nickname>>! Remember next Sunday you need to start paying us," he says.'
 		else
 			'Vadim Bely steps out, along with several of his henchmen. He gives you a smile that you know is 100% fake and behaves amicably while he says: "Long time no see, <<$pcs_nickname>>! You are doing good. If you keep paying early, this will work out for the both of us," he says.' 
 		end
-		if slutty >= 10 and SaunaWhore = 0:
-				SaunaWhore = 1
-				'"If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-		end
+		gs 'belgang', 'saunamention'
 		act 'Continue':
 			cla & *clr
 			minut += 5
@@ -195,12 +147,9 @@ elseif $ARGS[0] = 'payday':
 				'He frowns, abruptly cutting you off. You can see the disapproval in his eyes when you glance up. "That is very unfortunate, <<$pcs_nickname>>," he says. "You can pay me next week, but I expect 2000 <b>₽</b> extra."'
 				if belgangProstitute = 0:
 					belgangProstitute = 1
-					'"And don''t worry, <<$pcs_nickname>>. I''ll give you some opportunities to help you pay down your debts," he says with a dangerous smile.'
-				end
-				if slutty >= 20 and SaunaWhore = 0:
-					SaunaWhore = 1
-					'"But since you are such an obedient whore, <<$pcs_nickname>>, I''ll help you out. If you need more money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
+					'"And don''t worry, <<$pcs_nickname>>. I''ll give you some opportunities to help you pay your debts," he says with a dangerous smile.'
 				end
+				gs 'belgang', 'saunamention'
 				*nl
 				'You owe him: <<belgangPay>> <b>₽</b>'
 				'Next week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
@@ -214,10 +163,7 @@ elseif $ARGS[0] = 'payday':
 					belgangPayWeek = belgangPay
 				end
 				'He frowns, abruptly cutting you off. You can see the disapproval in his eyes when you glance up. "That is the last time, <<$pcs_nickname>>," he says. "You can pay me next week, but I expect 5000 <b>₽</b> extra.'
-				if slutty >= 20 and SaunaWhore = 0:
-					SaunaWhore = 1
-					'"But since you are such an obedient whore, <<$pcs_nickname>>, I''ll help you out. If you need more money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
-				end
+				gs 'belgang', 'saunamention'
 				*nl
 				'You owe him: <<belgangPay>> <b>₽</b>'
 				'Next week you need to pay him: <<belgangPayWeek>> <b>₽</b>'
@@ -251,6 +197,35 @@ elseif $ARGS[0] = 'payday':
 	end
 end
 
+if $ARGS[0] = 'payremaining':
+	cla & *clr
+	minut += 5
+	money -= belgangPay
+	belgangPay = 0
+	belgangPayWeek = 0
+	belgangPayWeekAmount = 0
+	belgangProstitute = 0
+	npc_QW['A113'] = 2
+	
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/belymoney.jpg"></center>'
+	'No, today you won''t work for him, you will never work for him again, today you will finally be free. "Here is everything. May debts are payed." You hand it over to Vadim while his henchmen keep a lookout. Once again, he gives you an awkward smile, very pleased how things have turned out. "It''s all there, right? I would hate to have to come back for the rest."'
+	'You nod at him, reassuring him. "It''s all there, mister Bely. Count it if you don''t believe me."'
+	'He takes a moment to count the money and nods approvingly. "Very good, it''s the full amount. Pleasure doing business with you, <<$pcs_nickname>>. Take care of yourself."'
+	gs 'belgang', 'saunamention'
+	'He signals his crew to get back in the jeep. You barely manage to dodge the spray of pebbles and dirt the spinning tires spew your way, as they drive off as fast as they can, probably on their way to another ''business appointment''.'
+	
+	act 'Move on': gt $loc
+end
+
+if $ARGS[0] = 'saunamention':
+	if slutty >= 20 and SaunaWhore = 0:
+		SaunaWhore = 1
+		'"Since you were such an obedient whore, <<$pcs_nickname>>, I''ll give you a small parting gift. If you ever need money, go to the sauna in the city and tell them Mr. Bely sent you. You will have plenty of opportunities to use your ''talents'' there."'
+	elseif slutty >= 10 and SaunaWhore = 0:
+		SaunaWhore = 1
+		'"If you ever need money, go to the sauna in the city and tell them Mr. Bely sends you. There you will have plenty of opportunities to use your ''talents''."'
+	end
+end
 
 --- belgang ---------------------------------
 

locations/belpicknick.qsrc

@@ -36,6 +36,7 @@ if $ARGS[0] = '1':
 		inhib_exp += rand(0,2)
 		gs'stat'
 		if pcs_danc < 40:
+			prevdance = 1
 			'You know this is your cue, and you attempt to do a striptease for them. You would have to be very good at dancing to overcome you drunkenness and begin to dance a bit awkwardly, tugging at your clothes.'
 			'The criminals are not impressed in the slightest, and one of them yells: "What kind of crap is this!? My elderly aunt Katinka could do a better job!"'
 			'His friend agrees: "Yea, this is fucking terrible!"'
@@ -53,15 +54,15 @@ if $ARGS[0] = 'vb_light':
 	cls
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/bottle.jpg"></center>'
 	dick1 = 10
+	prevdance = 0
 	gs 'dinsex2', 'd_vag_sex_bottle', 5, 'dick1'
 	gs'stat'
-	if rand(1,100) <= 10:
-		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, and decide to take the easiest route: you spread your legs and put the neck of the bottle against your pussy lips. You slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the neck of the bottle.'
+	'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, and decide to take the easiest route: you spread your legs and put the neck of the bottle against your pussy lips. You slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the neck of the bottle.'
+	if rand(1,100) <= 10:		
 		'Even though the criminals seem enthralled by your show, one of them is getting frustrated: "Whatever. You shouldn''t be putting bottles up there, but our cocks! Get over here whore, it''s time you get fucked."'
 		act'Continue':gt 'belpicknick', 'gang'
 	else
-		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, and decide to take the easiest route: you spread your legs and put the neck of the bottle against your pussy lips. You slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the neck of the bottle. The guys are not impressed however.'
-		'"What kind of weak shit is this? You''d better put some more effort into it, otherwise we''re going to do it for you."'
+		'The guys are not impressed however. "What kind of weak shit is this? You''d better put some more effort into it, otherwise we''re going to do it for you."'
 		act'Shove the bottom into your vagina':gt 'belpicknick', 'vb_hard'
 		act'Shove the neck into your ass':gt 'belpicknick', 'ab_light'
 		act'Shove the bottom into your ass':gt 'belpicknick', 'ab_hard'
@@ -71,15 +72,19 @@ end
 if $ARGS[0] = 'vb_hard':
 	cls
 	dick1 = 40
+	prevdance = 0
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/bottle2.jpg"></center>'
 	gs 'dinsex2', 'd_vag_sex_bottle', 5, 'dick1'
-	if rand(1,100) <= 80:
+	if prevdance = 1:
 		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, but don''t want to anger them by taking the easy way out. You spread your legs and put the bottom of the bottle against your pussy lips, and slowly begin to push it in. You try to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the bottom of the bottle, which is stretching your pussy out a great deal.'
+	else
+		'Not sure what they want to see you consider putting it in your ass but at the last second you turn the bottle around in your hand. You spread your legs and put the bottom of the bottle against your pussy lips, and slowly begin to push it in. You try to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the bottom of the bottle, which is stretching your pussy out a great deal.'
+	end
+	if rand(1,100) <= 80:
 		'Even though the criminals seem enthralled by your show, one of them is getting frustrated: "Whatever. You shouldn''t be putting bottles up there, but our cocks! Get over here whore, it''s time you get fucked."'
 		act'Continue':gt 'belpicknick', 'gang'
-	else
-		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, but don''t want to anger them by taking the easy way out. You spread your legs and put the bottom of the bottle against your pussy lips, and slowly begin to push it in. You try to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the bottom of the bottle, which is stretching your pussy out a great deal.'
+	else	
 		'The bandits look at each other for a second, and then shake their heads: "Not good enough, slut. Put it in your ass and be quick about it, otherwise we''re doing it for you."'
 		act'Shove the neck into your ass':gt 'belpicknick', 'ab_light'
 		act'Shove the bottom into your ass':gt 'belpicknick', 'ab_hard'
@@ -89,15 +94,19 @@ end
 if $ARGS[0] = 'ab_light':
 	cls
 	dick1 = 10
+	prevdance = 0
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/bottle3.jpg"></center>'
 	gs 'dinsex2', 'd_analsex_bottle',5,'dick1'
-	if rand(1,100) <= 70:
+	if prevdance = 1:
 		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, and decide to impress them: you spread your legs and put the neck of the bottle against your puckered butthole. After lubricating it with a bit of saliva you slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the neck of the bottle.'
+	else
+		'Realising they want you to put it in your ass, you spread your legs and put the neck of the bottle against your puckered butthole. After lubricating it with a bit of saliva you slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the neck of the bottle.'
+	end
+	if rand(1,100) <= 70:	
 		'Even though the criminals seem enthralled by your show, one of them is getting frustrated: "Whatever. You shouldn''t be putting bottles up there, but our cocks! Get over here whore, it''s time you get fucked."'
 		act'Continue':gt 'belpicknick', 'gang'
 	else
-		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, and decide to impress them: you spread your legs and put the neck of the bottle against your puckered butthole. After lubricating it with a bit of saliva you slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the neck of the bottle.'
 		'The bandits look at each other for a second, and then shake their heads: "Not good enough, slut. Use the other end and be quick about it, otherwise we''re doing it for you."'
 		act'Shove the bottom into your ass':gt 'belpicknick', 'ab_hard'
 	end
@@ -109,8 +118,12 @@ if $ARGS[0] = 'ab_hard':
 	gs'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/vadim/sex/bottle4.jpg"></center>'
 	gs 'dinsex2', 'd_analsex_bottle',5,'dick1'
+	if prevdance = 1:
 		'Okay, so dancing is not something you do well. You have to entertain them with the bottle now, and decide to go as far as you can with this: you spread your legs and put the bottom of the bottle against your puckered butthole. After lubricating it with a bit of saliva and stretching a bit with your fingers you actually manage to get it in, even though it hurts a lot. Deciding you don''t want the guys to take over for you, you soldier on and slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the bottom of the bottle.'
-		'The guys slap each other on the back, thoroughly impressed: "What an ass, look at it stretch! It''s gonna take all of our cocks combined in there to even feel something!"'
+	else
+		'The realization of what they really want from you scares you. But not as much as earning their displeasure does. So you decide to go as far as you can with this: you spread your legs and put the bottom of the bottle against your puckered butthole. After lubricating it with a bit of saliva and stretching a bit with your fingers you actually manage to get it in, even though it hurts a lot. Deciding you don''t want the guys to take over for you, you soldier on and slowly push it in as far as it will go, trying to make a show of it by spreading your legs as far as you can and fucking yourself slowly with the bottom of the bottle.'
+	end
+	'The guys slap each other on the back, thoroughly impressed: "What an ass, look at it stretch! It''s gonna take all of our cocks combined in there to even feel something!"'
 	act'Continue':gt 'belpicknick', 'gang'
 end
 

locations/bicycle.qsrc

@@ -254,7 +254,7 @@ if $ARGS[0] = 'ridego':
 	if hour >= 6 and hour < 22:
 		act 'Further':gt $loc, $metka
 	else
-		'<B><font color=red>Its too dark outside togo for a ride.</font></B>'
+		'<B><font color=red>It''s too dark outside to go for a ride.</font></B>'
 		act 'Put the bike away': gt $loc, $metka
 	end
 end

locations/body.qsrc

@@ -1794,6 +1794,8 @@ end
 !!Moved to base calculation in "body_shape"; bimbobeauty = Bimbo bonus; pcs_lip = lip size; skin = skin condition; pcs_lashes = eyelashes; pcs_eyesize = eyes; bodykoef = hips:waist ratio; pcs_teeth = missing teeth; vidagebonus = youth
 !!Removed as primary appearance factors; will be eventually used in an NPC preference system instead; tanKoef = suntan
 pcs_apprnc = pcs_apprncbase + CloAdjustedBeauty + mopkoef + (pcs_hairbsh * 10) + lipbalmKoef + (pcs_breath * 5) - sweatKoef - glassvnesh - dyevmod - hairkoef - legkoef + panty_beautybounus + bra_beautybounus
+!!adjustment to make max achievable
+pcs_apprnc = pcs_apprnc*200/170
 
 if pcs_apprnc >= 200: pcs_apprnc = 200
 pcs_apprnc = pcs_apprnc + supnatvnesh
@@ -1851,7 +1853,9 @@ end
 if dounspell = 1:
 	salocatnow = (pcs_hips / 10) - 5
 	if bdsetlock = 0:
-		if strenbuf >= 70:
+		if (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)):
+			bodset = 3
+		elseif strenbuf >= 70:
 			bodset = 2
 		elseif strenbuf <= 40:
 			bodset = 0
@@ -1861,9 +1865,27 @@ if dounspell = 1:
 	else
 		bodset = fixbodset
 	end
-end
+elseif (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)) and bodet ! 3 and bdsetlock = 0:
+	bodset = 3
+elseif preg = 0 and bodset = 3 and bdsetlock = 0:
+	if strenbuf >= 70:
+		bodset = 2
+	elseif strenbuf <= 40:
+		bodset = 0
+	else
+		bodset = 1
+	end
+end 
 
-if salocatnow <= 7:
+if (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)) and bodset = 3:
+	if PregChem > 6216:
+		$body = $bodimgsets[((bodset * 10) + 8)]
+	elseif PregChem < 2688:
+		$body = $bodimgsets[(bodset * 10)]
+	else 
+		$body = $bodimgsets[((bodset * 10)+((PregChem - 2184)/504))]
+	end
+elseif salocatnow <= 7:
 	$body = $bodimgsets[((bodset * 10) + salocatnow)]
 else
 	$body = $bodimgsets[((bodset * 10) + 7)]
@@ -1875,4 +1897,4 @@ musle = strenbuf
 
 !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
---- body ---------------------------------
+--- body ---------------------------------

locations/body_shape.qsrc

@@ -177,7 +177,9 @@ if $ARGS[0] = '':
 
 !!This sets which image set is to be used when the override is not set
 	if bdsetlock = 0:
-		if strenbuf >= 70:
+		if (knowpreg = 1 or (preg = 1 and thinkpreg = 1) or (preg = 1 and PregChem > 3600)):
+			bodset = 3
+		elseif strenbuf >= 70:
 			bodset = 2
 		elseif strenbuf <= 40:
 			bodset = 0

locations/bras.qsrc

@@ -20,8 +20,8 @@ if $ARGS[0] = 'remove':
 end
 
 if $ARGS[0] = 'wear':
+	bra_none = 0
 	if $ARGS[1] = '':
-		bra_none = 0
 		if $lastwornbratype ! '':
 			$braworntype = $lastwornbratype
 			brawornnumber = lastwornbranumber

locations/brosh.qsrc

@@ -7,13 +7,13 @@ gs 'stat'
 evgentipe = rand(0,3)
 
 if evgentipe = 0:
-	'During the break you are greeted by Zhendos, a friend of your brother "<<$pcs_nickname>>! My little pet, meet me after school."'
+	'During the break you are greeted by Zhendos, a friend of your brother "<<$pcs_nickname>>! My little pet, come with me."'
 
-	act 'After school "meeting"':
+	act 'Go with him':
 		cls
 		gs'stat'
 
-		'You meet Zhendos after school, behind the bike sheds.'
+		'You follow Zhendos behind the bike sheds.'
 
 		act 'Suck Zhendos':
 			cls
@@ -27,31 +27,30 @@ if evgentipe = 0:
 
 			act 'Suck':
 				cls
-				spafinloc = 12
-				gs 'cum_manage'
+				gs 'cum_call', 'mouth', 'Zhendos', 1
 				swallow += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum50.jpg"></center>'
-				'Zhendos did not last long and fills you mouth with sperm, you quickly swallow it down.'
+				'Zhendos doesn''t last long and fills you mouth with sperm, you quickly swallow it down.'
 
 				gs 'arousal', 'bj', 10, 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				act 'Continue': gt 'gschool_lessons', 'short_break'
+				act 'Go back inside': gt 'gschool_lessons', 'short_break'
 			end
 		end
 	end
 
 	exit
 elseif evgentipe = 1:
-	'During the break you are greeted by Mishan, a friend of your brother "<<$pcs_nickname>>! Let''s meet up school, I have sweetie for you."'
+	'During the break you are greeted by Mishan, a friend of your brother "<<$pcs_nickname>>! Come with me, I have a treat for you."'
 
-	act 'After school "meeting"':
+	act 'Go with him':
 		cls
 		gs'stat'
 
-		'You meet Mishan after school, behind the bike sheds'
+		'You follow Mishan behind the bike sheds.'
 
 		act 'Suck Mishanya':
 			cls
@@ -65,31 +64,30 @@ elseif evgentipe = 1:
 
 			act 'Suck':
 				cls
-				spafinloc = 12
-				gs 'cum_manage'
+				gs 'cum_call', 'mouth', 'Mishan', 1
 				swallow += 1
 				gs 'stat'
 				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/bscum'+rand(1,2)+'.jpg"></center>'
-				'Mishan did not last long and fills you mouth with sperm, you quickly swallow it down.'
+				'Mishan doesn''t last long and fills you mouth with sperm, you quickly swallow it down.'
 
 				gs 'arousal', 'bj', 10, 'sub'
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				act 'Continue': gt 'gschool_lessons', 'short_break'
+				act 'Go back inside': gt 'gschool_lessons', 'short_break'
 			end
 		end
 	end
 
 	exit
 elseif evgentipe = 2:
-	'During the break you see your brother Kolka "<<$pcs_nickname>>! Let''s meet after school, I need to relieve some tension."'
+	'During the break you see your brother Kolka "<<$pcs_nickname>>! Follow me, I need to relieve some tension."'
 
-	act 'After school "meeting"':
+	act 'Go with him':
 		cls
 		gs'stat'
 
-		'You meet Kolka after school, behind the bike sheds'
+		'You follow Kolka behind the bike sheds'
 		gs 'boyStat', 'A34'
 		act 'Suck Kolka':
 			cls
@@ -103,23 +101,22 @@ elseif evgentipe = 2:
 
 			act 'Suck':
 				cls
-				spafinloc = 12
-				gs 'cum_manage'
+				gs 'cum_call', 'mouth', 'Kolka', 1
 				swallow += 1
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/shared/sex/cum/mouth/cum43.jpg"></center>'
-				'Kolka did not last long and fills you mouth with sperm, you make a show of swallowing it.'
+				'Kolka doesn''t last long and fills you mouth with sperm, you make a show of swallowing it.'
 
 				gs 'arousal', 'bj', 10, 'sub', 'incest'
 				gs 'arousal', 'end'
 				gs 'stat'
 
-				act 'Continue': gt 'gschool_lessons', 'short_break'
+				act 'Go back inside': gt 'gschool_lessons', 'short_break'
 			end
 		end
 		if brotherSex > 6:
-			act 'Bend':
+			act 'Bend over':
 				cls
 				pose = 1
 				brosh_rand1 = rand(0,100)
@@ -139,42 +136,36 @@ elseif evgentipe = 2:
 
 				gs 'brother', 'brotherSexEnd'
 
-				act 'Continue': gt 'gschool_lessons', 'short_break'
+				act 'Go back inside': gt 'gschool_lessons', 'short_break'
 			end
 		end
 	end
 
 	exit
 elseif evgentipe = 3:
-	'During the break you are greeted by Zhendos and Mishan, friends of your brother. "<<$pcs_nickname>>! You are our after school entertainment."'
+	'During the break you are greeted by Zhendos and Mishan, friends of your brother. "<<$pcs_nickname>>! Come with ust."'
 
-	act 'After school "meeting"':
+	act 'Go with them':
 		cls
 		gs'stat'
 
-		'You meet Zhendos and Mishan after school, behind the bike sheds'
+		'You follow Zhendos and Mishan behind the bike sheds'
 
 		act 'Suck Guys':
 			cls
-			gs 'boyStat', 'A58'
-			spafinloc = 12
-			sexpartkno = 1
-			gs 'cum_manage'
-			gs 'boyStat', 'A59'
-			spafinloc = 12
-			sexpartkno = 1
-			gs 'cum_manage'
-			swallow += 1
+			gs 'cum_call', 'mouth', 'Zhendos', 1
+			gs 'cum_call', 'mouth', 'Mishan', 1
+			swallow += 2
 			gs'stat'
 
 			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/school/afterschool/sex/bs2.jpg"></center>'
-			'You crouch down in front of the guys as they pull out their cocks, you take turns stroking and suck each of them. The guys don''t last long and take turns finishing in your mouth, you swallow their seed hungrily.'
+			'You crouch down in front of the guys as they pull out their cocks, you take turns stroking and sucking each of them. The guys don''t last long and take turns finishing in your mouth, you swallow their seed hungrily.'
 
 			gs 'arousal', 'bj', 10, 'sub', 'group'
 			gs 'arousal', 'end'
 			gs 'stat'
 
-			act 'Continue': gt 'gschool_lessons', 'short_break'
+			act 'Go back inside': gt 'gschool_lessons', 'short_break'
 		end
 	end
 

locations/brother2.qsrc

@@ -86,8 +86,58 @@ if $ARGS[0] = 'chat':
 	act'Continue':gt'brother','start'
 end
 
+if $ARGS[0] = 'nattalk':
+	*clr & cla
+	minut += 15
+	gs 'stat'
+	'<center><b><font color="maroon">Kolka</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+	'"So Kolka, did you like what you saw in the stairway?" You ask him coyly.'
+	'"I was wondering if you did that for my benefit." He says hesitantly.'
+	'"Well? Did you like it?"'
+	'"Ofcourse I did, Natasha wasn''t wearing any panties, I could see everything."'
+	'"She was wearing panties." You say with a grin. "I had stuffed them in her tight pussy."'
+	'"You? Wow. That''s hot."'
+	if kolkawantsnat = 0:
+		act 'Offer to set something up between them':
+			*clr & cla
+			natkolkatease += 1
+			kolkawantsnat = 1
+			'<center><b><font color="maroon">Kolka</font></b></center>'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+			if brotherSex > 6:	
+				'"Would you like to fuck Natasha too? I could arrange something."'
+				'"Could I?" He asks in disbelief.'
+				'"Only if you promise to do exactly as I say."'
+			elseif npc_rel['A34'] >= 50:
+				'"Since you''re constantly sporting a boner lately I thought I''d help you out a bit. Would you like me to set something up with Natasha?"'
+				'"You''d be the best sister ever if you did." He says, grinning from ear to ear.'
+				'"But you''ll have to promise to do exactly as I say."'
+			else
+				'"Look Kolka, I know we haven''t been very close lately. So I wanted to try and make it up to you. I was thinking I could help you hook you up with Natasha."'
+				'Kolka looks at you dubiously. "Why would you do that?"'
+				'"Do I need a reason to try and be a better sister? Do you want me to set it up or not?"'
+				'"How would that work?"'
+				'"Just trust me. As long as you do as I tell you it''ll work out."'
+			end
+			'"Ofcourse, I promise." He says without hesitation.'
+			'"Good, I''ll keep you informed."'
+			act'Continue':gt'brother','start'
+		end
+	end
+	act 'Tease him':
+		*clr & cla
+		'<center><b><font color="maroon">Kolka</font></b></center>'
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+		'"She was dripping wet all day long." You say, eyeing the growing bulge in his pants.'
+		'You lean in close to him and whisper in his ear: "Now you''ll have something to jerk off to tonight."'
+		act'Continue':gt'brother','start'
+	end
+end
+
 if $ARGS[0] = 'kiss':
 	gs 'arousal', 'kiss', rand(1,5)
+	gs 'stat'
 	brotherkiss += 1
 	'<center><video autoplay loop src="images/shared/sex/kiss/kiss_lips.mp4"></video></center>'
 	'With your stepfather gone, you take the opportunity you have and start kissing your brother.'
@@ -119,13 +169,14 @@ if $ARGS[0] = 'kiss2':
 end
 
 if $ARGS[0] = 'kiss_end':
-	gs 'arousal', 'end'
 	cla & *clr
 	'<center><b><font color = maroon>Kolka</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
 	'Eventually, you the two of you reluctantly pull apart.'
 	'"Better stop before we get caught," you say breathlessly.'
 	'"Yeah..."'
+	gs 'arousal', 'end'
+	gs 'stat'
 	act'Finish':gt 'sitrPar'
 end
 
@@ -134,6 +185,7 @@ if $ARGS[0] = 'hj':
 	npc_rel['A34'] += 1
 	cla & *clr
 	gs 'arousal', 'hj', rand(1,3)
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/event/homework/hj.jpg"></center>'
 	'Snaking your hand into his pants, you pull out his cock, jerking him off with the same vigor you continue to kiss him with.'
 	brohj = 1
@@ -141,6 +193,7 @@ if $ARGS[0] = 'hj':
 		cla
 		*nl
 		gs 'arousal', 'hj', rand(1,3)
+		gs 'stat'
 		'You continue to give him a handjob while making out with him until you feel his body start to stiffen beneath yours. You think he''s probably about to cum.'
 		act'Let him cum in your hand':
 			cla & *clr
@@ -148,6 +201,7 @@ if $ARGS[0] = 'hj':
 			'Not stopping, you quicken your pace until you feel ropes of his thick cum spattering against your hand.'
 			'Moving your head back, you survey your handiwork before smiling back at him and leaning in for a peck on the lips before getting up to find some tissues for your brother and to wash off your hand.'
 			gs 'arousal', 'end'
+			gs 'stat'
 			act 'Finish': gt 'sitrPar'
 		end
 		act'Put your lips over the tip':
@@ -155,6 +209,7 @@ if $ARGS[0] = 'hj':
 			gs 'arousal', 'bj', 1
 			gs 'cum_call', 'mouth', 'A34', 1
 			gs 'arousal', 'end'
+			gs 'stat'
 			npc_rel['A34'] += 3
 			swallow += 1
 			if brotherSex < 6: brotherSex = 6
@@ -174,6 +229,7 @@ if $ARGS[0] = 'bj':
 	cla & *clr
 	npc_rel['A34'] += 2
 	gs 'arousal', 'bj', rand(1,5)
+	gs 'stat'
 	if brotherSex < 6: brotherSex = 6
 	brotherbj += 1
 	if $clothingworntype = 'nude' and $braworntype = 'none':
@@ -194,6 +250,7 @@ if $ARGS[0] = 'bj':
 		swallow += 1
 		gs 'cum_call', 'mouth', 'A34', 1
 		gs 'arousal', 'end'
+		gs 'stat'
 		'<center><video autoplay loop src="images/characters/pavlovsk/resident/kolka/event/homework/swallow.mp4"></video></center>'
 		'You diligently continue to blow him until you feel his hot cum spurting into your mouth. Gathering it all up, your remove your lips from Kolka''s cock, tilting your head back and swallowing at the same time.'
 		'"I can''t believe you just swallowed like that," he says, breathless.'
@@ -207,6 +264,7 @@ if $ARGS[0] = 'bj':
 		'<center><video src="images/shared/sex/cum/facial/facial0,3.mp4"></center>'
 		gs 'cum_call', 'face', 'A34', 1
 		gs 'arousal', 'end'
+		gs 'stat'
 		'You quickly pull back and kneel in front of Kolka as he furiously jerks off in front of you. You close your eyes just as you feel his hot cum spatter against your face, flinching as it does. When he''s finally done, you feel a few droplets drip down your cheeks onto the carpeted floor.'
 		'Peeking through cum-slathered eyes, you look at your brother, saying, "Maybe we shouldn''t have done it like this. Now we need to clean up before someone spots us."'
 		'Leaving Kolka to clean his semen out of the carpet, you slink towards the bathroom to wash off your face.'
@@ -234,6 +292,7 @@ if $ARGS[0] = 'bj':
 			'"Maybe we shouldn''t have finished like that..." you say, smiling wistfully at your brother.'
 			'Leaving Kolka to clean his semen out of the carpet, you slink towards the bathroom to wipe off .'
 			gs 'arousal', 'end'
+			gs 'stat'
 			act'Finish':gt'vanrPar'
 		end
 	end
@@ -250,7 +309,6 @@ if $ARGS[0] = 'wakeup':
 	*nl
 	act'Leave him alone':
 		cla
-		*nl
 		'You shrug, realizing that you''re not going to find a way to wake him up any time soon without him being mad at you and decide to leave him be.'
 		act'Move away':gt $loc, $metka
 	end
@@ -258,7 +316,6 @@ if $ARGS[0] = 'wakeup':
 	act'Yank his blanket off':
 		brotherMorningSex = daystart
 		cla
-		*nl
 		'"Come on Kolka! Wake. UP!"'
 		if $clothingworntype = 'nude':
 			'With a mighty tug, you yank the blanket off of him, leaving him clutching himself and shivering on the couch. After a few moments, he forces his eyes open, blinking wearily as he sits up on the couch and shamelessly glances up and down your naked body.'
@@ -292,99 +349,27 @@ if $ARGS[0] = 'wakeup':
 		
 	if brotherSex >= 2 or pcs_inhib >= 35 or npc_rel['A34'] >= 75:
 		act'Tell him you''ll show him your tits':
-			cla	
-			*nl
+			cla
+			brotherMorningSex = daystart
 			'"I''ll tell you what Kolka, if you get up now, I''ll let you look at my tits."'
-			if $clothingworntype = 'nude' and $braworntype = 'none':
-				'He cracks open an eye. "I don''t need to get up to do that."'
-				'You look down at yourself and remember that you''re already topless. Right. That wasn''t a very good plan...'
-				act'Back to the drawing board':gt'brother2','wakeup'
-			end
-			
+			gs 'brother2', 'wakeupresponse', 'tits'
 			if $clothingworntype ! 'nude':
 				act'Pull up your top':
-					brotherMorningSex = daystart
-					cla & *clr
-					npc_rel['A34'] += 4
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/titflash<<rand(1,4)>>.jpg"></center>'
-					'Following through on your promise, you lift up your top, revealing your breasts to your brother. Still tired, he smiles only faintly in satisfaction.'
-					'"There. Happy now?"'
-					if brotherwaketrick = 1:
-						'"Pretty happy, yeah. Especially since you actually kept your promise this time."'
-						'You gently lower your top again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
-						'"Well, I followed through this time. Hopefully you''ll forgive me. Now go get dressed Kolka."'
-						brotherwaketrick = 2
-					else
-						'"Very."'
-						'"Good." You cover yourself up, putting your clothes back in place. "Now go get dressed."'
-					end
-					'"Alright," he says, yawning one more time before folding his blanket for storage and beginning the process of getting ready for school.'
-					act'Move away':gt $loc, $metka
+					$whatshow = 'top'
+					gt 'brother2', 'show'
 				end
-			end
-			if $braworntype ! 'none':
+			elseif $clothingworntype = 'nude' and $braworntype ! 'none':
 				act'Pull down your bra':
-					brotherMorningSex = daystart
-					cla & *clr
-					npc_rel['A34'] += 4
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/titflash5.jpg"></center>'
-					'Following through on your promise, you pull down your bra, revealing your breasts to your brother. Still tired, he smiles only faintly in satisfaction.'
-					'"There. Happy now?"'
-					if brotherwaketrick = 1:
-						'"Pretty happy, yeah. Especially since you actually kept your promise this time."'
-						'You gently lower your top again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
-						'"Well, I followed through this time. Hopefully you''ll forgive me. Now go get dressed Kolka."'
-						brotherwaketrick = 2
-					else
-						'"Very."'
-						'"Good." You cover yourself up, putting your clothes back in place. "Now go get dressed."'
-					end
-					'"Alright," he says, yawning one more time before folding his blanket for storage and beginning the process of getting ready for school.'
-					act'Move away':gt $loc, $metka
+					$whatshow = 'bra'
+					gt 'brother2', 'show'
 				end
-			end
-			
+			end		
 			if $clothingworntype ! 'nude' or $braworntype ! 'none':
 				act'Trick him and don''t do it':
-					cla & *clr
-					brotherMorningSex = daystart
-					brotherwaketrick = 1
-					npc_rel['A34'] -= 5
-					'<center><b><font color="maroon">Kolka</font></b></center>'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
-					'You wait for him to be more or less fully awake before snatching his blanket and move away.'
-					'"Hey!" he cries. "What are you doing?"'
-					'"I''m leaving. What the hell is wrong with you? You really thought I was gonna show you my tits?"'
-					if brotherSex = 2 or brotherSex = 3:
-						'"You''ve let me look at you before!"'
-						'"Yeah well, this isn''t ''before''. I''m not doing it today."'
-					elseif brotherSex >= 4:
-						'"You''ve done so much with me before!"'
-						'"Yeah well, this isn''t ''before''. I''m not doing anything today."'
-					end
-					'"Liar!" he screams at you.'
-					'"Listen here you little-!"'
-					'<b><i>"Hey!"</i></b> your mother shouts from the bedroom. "What is all this racket going on so early in the morning?! You two get along or so help me I will spank you! I don''t care how old you are!"'
-					'Glaring silently at one another, the two of you retreat after a ceasefire being called by your mother. This probably wasn''t good for your relationship though...'
-					act'Move away':gt $loc, $metka
+					$whatshow = 'tits'
+					gt 'brother2', 'trick'
 				end
 			end
-			
-			if brotherwaketrick = 1 and ($clothingworntype ! 'nude' or $braworntype ! 'none'):
-				'He opens his eyes slowly, looking at you with suspicion.'
-				'"You''re not just going to leave like you did last time are you?"'
-				'"No Kolka."'
-				'"You promise? For real this time?"'
-				'"I promise."'
-				'He pulls back his blanket and sits up, rubbing the sleep from his eyes to focus on you.'
-			elseif $clothingworntype ! 'nude' or $braworntype ! 'none':
-				'He opens his eyes slowly, looking at you with suspicion.'
-				'"This isn''t just some trick to get me out of bed?"'
-				'"No Kolka."'
-				'"You promise?"'
-				'"I promise."'
-				'He pulls back his blanket and sits up, rubbing the sleep from his eyes before focus on you.'
-			end
 		end
 	end
 	if brotherSex >= 3  or pcs_inhib >= 45 or npc_rel['A34'] >= 80:
@@ -392,25 +377,7 @@ if $ARGS[0] = 'wakeup':
 			cla
 			brotherMorningSex = daystart
 			'"I''ll tell you what Kolka, if you get up now, I''ll show you my pussy."'
-			if $clothingworntype = 'nude':
-				'He cracks open an eye. "I don''t need to get up to do that."'
-				'You look down at yourself and remember that you''re naked. Right. That wasn''t a very good plan...'
-				act'Back to the drawing board':gt'brother2','wakeup'
-			elseif brotherwaketrick = 1:
-				'He opens his eyes slowly, looking at you with suspicion.'
-				'"You''re not just going to leave like you did last time are you?"'
-				'"No Kolka."'
-				'"You promise? For real this time?"'
-				'"I promise."'
-				'He pulls back his blanket and sits up, rubbing the sleep from his eyes to focus on you.'
-			else
-				'He opens his eyes slowly, looking at you with suspicion.'
-				'"This isn''t just some trick to get me out of bed?"'
-				'"No Kolka."'
-				'"You promise?"'
-				'"I promise."'
-				'He pulls back his blanket and sits up, rubbing the sleep from his eyes before focus on you.'
-			end
+			gs 'brother2', 'wakeupresponse', 'pussy'
 			if $clothingworntype ! 'nude' or $pantyworntype ! 'none':
 				act'Expose yourself':
 					cla & *clr
@@ -432,32 +399,13 @@ if $ARGS[0] = 'wakeup':
 				end
 			
 				act'Trick him and don''t do it':
-					cla & *clr
-					brotherwaketrick = 1
-					npc_rel['A34'] -= 5
-					'<center><b><font color="maroon">Kolka</font></b></center>'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
-					'You wait for him to be more or less fully awake before snatching his blanket and move away.'
-					'"Hey!" he cries. "What are you doing?"'
-					'"I''m leaving. What the hell is wrong with you? You really thought I was gonna show you my pussy?"'
-					if brotherSex = 2 or brotherSex = 3:
-						'"You''ve let me look at you before!"'
-						'"Yeah well, this isn''t ''before''. I''m not doing it today."'
-					elseif brotherSex >= 4:
-						'"You''ve done so much with me before!"'
-						'"Yeah well, this isn''t ''before''. I''m not doing anything today."'
-					end
-					'"Liar!" he screams at you.'
-					'"Listen here you little-!"'
-					'<b><i>"Hey!"</i></b> your mother shouts from the bedroom. "What is all this racket going on so early in the morning?! You two get along or so help me I will spank you! I don''t care how old you are!"'
-					'Glaring silently at one another, the two of you retreat after a ceasefire being called by your mother. This probably wasn''t good for your relationship though...'
-					act'Move away':gt $loc, $metka
+					$whatshow = 'pussy'
+					gt 'brother2', 'trick'
 				end
 			end
 		end
 	end
 			
-	
 	if brotherSex >= 5 or pcs_inhib >= 50 or npc_rel['A34'] >= 85:
 		act'Tell him you''ll give him a handjob':
 			npc_rel['A34'] += 5
@@ -480,6 +428,7 @@ if $ARGS[0] = 'wakeup':
 				'Your duty done, you pull your now sticky hand back, saying, "Alright Kolka. A deal''s a deal. Now clean up and get dressed before <<$npc_nickname[''A29'']>> comes out here and sees you like this."'
 				'"Alright!" he says cheerfully, waddling away with his pants around his ankles to find some tissues to clean himself up.'
 				gs 'arousal', 'end'
+				gs 'stat'
 				act'Move away':gt $loc, $metka
 			end
 		end
@@ -512,14 +461,95 @@ if $ARGS[0] = 'wakeup':
 				'"Glad I could help I guess," you reply, giving his cock a few more licks to make sure it''s clean. "Now go get dressed for school. Before <<$npc_nickname[''A29'']>> comes out and yells at you for having your dick hanging out."'
 				'"Okay, okay," he says, getting up and tidying up the couch from where he was sleeping.'
 				gs 'arousal', 'end'
+				gs 'stat'
 				act'Move away':gt $loc, $metka
 			end
 		end
 	end
 end
 
+if $ARGS[0] = 'wakeupresponse':
+	if $ARGS[1] = 'tits' and $clothingworntype = 'nude' and $braworntype = 'none':
+		'He cracks open an eye. "I don''t need to get up to do that."'
+		'You look down at yourself and remember that you''re already topless. Right. That wasn''t a very good plan...'
+		act'Back to the drawing board':gt'brother2','wakeup'
+	elseif $ARGS[1] = 'pussy' and $clothingworntype = 'nude' and $pantyworntype = 'none':
+		'He cracks open an eye. "I don''t need to get up to do that."'
+		'You look down at yourself and remember that you''re naked. Right. That wasn''t a very good plan...'
+		act'Back to the drawing board':gt'brother2','wakeup'
+	elseif brotherwaketrick = 1:
+		'He opens his eyes slowly, looking at you with suspicion.'
+		'"You''re not just going to leave like you did last time are you?"'
+		'"No Kolka."'
+		'"You promise? For real this time?"'
+		'"I promise."'
+		'He pulls back his blanket and sits up, rubbing the sleep from his eyes before focusing on you.'
+	else
+		'He opens his eyes slowly, looking at you with suspicion.'
+		'"This isn''t just some trick to get me out of bed?"'
+		'"No Kolka."'
+		'"You promise?"'
+		'"I promise."'
+		'He pulls back his blanket and sits up, rubbing the sleep from his eyes before focusing on you.'
+	end
+end
+
+if $ARGS[0] = 'show':
+	brotherMorningSex = daystart
+	cla & *clr
+	npc_rel['A34'] += 4
+	if $whatshow = 'top':
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/titflash<<rand(1,4)>>.jpg"></center>'
+		'Following through on your promise, you lift up your top, revealing your breasts to your brother. Still tired, he smiles only faintly in satisfaction.'
+	elseif $whatshow = 'bra':
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/kolka/titflash5.jpg"></center>'
+		'Following through on your promise, you pull down your bra, revealing your breasts to your brother. Still tired, he smiles only faintly in satisfaction.'
+	end
+	'"There. Happy now?"'
+	if brotherwaketrick = 1:
+		'"Pretty happy, yeah. Especially since you actually kept your promise this time."'
+		if $whatshow = 'top':
+			'You gently lower your top again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
+		elseif $whatshow = 'bra':
+			'You gently pull your bra up again, not really sure what to say to that. He is right. You didn''t keep your promise last time.'
+		end
+		'"Well, I followed through this time. Hopefully you''ll forgive me. Now go get dressed Kolka."'
+		brotherwaketrick = 2
+	else
+		'"Very."'
+		'"Good." You cover yourself up, putting your clothes back in place. "Now go get dressed."'
+	end
+	'"Alright," he says, yawning one more time before folding his blanket for storage and beginning the process of getting ready for school.'
+	act'Move away':gt $loc, $metka
+end
+
+if $ARGS[0] = 'trick':
+	cla & *clr
+	brotherMorningSex = daystart
+	brotherwaketrick = 1
+	npc_rel['A34'] -= 5
+	'<center><b><font color="maroon">Kolka</font></b></center>'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/kolka/brother.jpg"></center>'
+	'You wait for him to be more or less fully awake before snatching his blanket and move away.'
+	'"Hey!" he cries. "What are you doing?"'
+	'"I''m leaving. What the hell is wrong with you? You really thought I was gonna show you my <<$whatshow>>?"'
+	if brotherSex = 2 or brotherSex = 3:
+		'"You''ve let me look at you before!"'
+		'"Yeah well, this isn''t ''before''. I''m not doing it today."'
+	elseif brotherSex >= 4:
+		'"You''ve done so much with me before!"'
+		'"Yeah well, this isn''t ''before''. I''m not doing anything today."'
+	end
+	'"Liar!" he screams at you.'
+	'"Listen here you little-!"'
+	'<b><i>"Hey!"</i></b> your mother shouts from the bedroom. "What is all this racket going on so early in the morning?! You two get along or so help me I will spank you! I don''t care how old you are!"'
+	'Glaring silently at one another, the two of you retreat after a ceasefire being called by your mother. This probably wasn''t good for your relationship though...'
+	act'Move away':gt $loc, $metka
+end
+
 if $ARGS[0] = 'morninghj':
 	cla & *clr
+	brotherMorningSex = daystart
 	gs 'arousal', 'hj', 5
 	gs 'cum_call','hands', $boy
 	npc_rel['A34'] += 5
@@ -533,10 +563,12 @@ if $ARGS[0] = 'morninghj':
 	'As you think about what you should do to clean it off, you hear him saying, "Handjobs are great and everything, but do you think you could try a blowjob next time instead?"'
 	'"I''ll think about it," you say, rolling your eyes in amusement as you walk away, your brother automatically beginning to get ready for school.'
 	gs 'arousal', 'end'
+	gs 'stat'
 	act'Move away':gt $loc, $metka
 end
 
 if $ARGS[0] = 'morningbj':
+	brotherMorningSex = daystart
 	brotherwakeup += 1
 	cla & *clr
 	gs 'arousal', 'hj', 5
@@ -559,6 +591,7 @@ if $ARGS[0] = 'morningbj':
 	'Swallowing his cum, you flash him a toothy grin. "I know. Now up an at''em kiddo! I don''t do this just so you can go back to sleep."'
 	'Having been given sufficient positive reinforcement, he obediently gets up and starts going about tidying the sofa and getting ready to go to school.'
 	gs 'arousal', 'end'
+	gs 'stat'
 	act'Move away':gt $loc, $metka
 end
 --- brother2 ---------------------------------

locations/brother_voyeur.qsrc

@@ -16,7 +16,7 @@ if npc_QW['A34'] > 20 and npc_QW['A34'] < 25: npc_QW['A34'] = 20
 ! npc_QW['A34']: Quest stages
 ! brotherAge: your age - 2
 ! brotherknowslut: brother knowledge of your sexual activity (1 = seen cum, 2 = groupsex in park)
-! pregTalkBrother: Flag 0/1 Do your brother know you are pregnant
+! npc_pregtalk['A34']: Flag 0/1 Do your brother know you are pregnant
 ! brotherDay:
 ! brotherSexCount: the number of times left that you can have sex with your brother today (resets to 5 each day)
 ! brotherMorningSex: Last day this happend. Used to block to once a day.
@@ -687,6 +687,7 @@ if $ARGS[0] = 'brother_shower_together':
 					act'Continue':
 						cla & *clr
 						gs 'arousal','masturbate', 5
+						gs 'stat'
 						mastr += 1
 						orgasm += 1
 						'<center><video src="images/shared/home/bathroom/wash2.mp4"></center>'
@@ -846,6 +847,7 @@ end
 if $ARGS[0] = 'showerfun':
 	if brothergrope < 4:
 		gs 'arousal','breasts', 1
+		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex1.jpg"></center>'
 		'	You squeak as you feel your brother''s hands grab you by the breasts, squeezing hard and pinching your nipples.'
 		if milkedvolume > 0:
@@ -905,6 +907,7 @@ if $ARGS[0] = 'showerfun':
 			*nl
 			gs 'arousal','breasts', 2
 			pcs_horny += 10
+			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 			'	"Ughh... Oh yeah... Keep doing <i>that...</i>"'
 			'	You lean into your brother''s touch, his hands roaming up and down your body, focusing mostly on your breasts. Your hand unconsciously reaches back and grabs hold of his dick, jerking it gently. You think about what you want to do next.'
@@ -913,6 +916,7 @@ if $ARGS[0] = 'showerfun':
 		end
 	else
 		gs 'arousal','breasts', 3
+		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 		'	Feeling turned on from your brother''s hands on you, you lean back into him, teasingly handling his package. He responds in kind, fondling your breasts, eliciting moans when he pinches your nipples.'
 		act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -953,6 +957,7 @@ if $ARGS[0] = 'brother_shower_shave':
 				act'Continue':
 					if brotherfuck > 0 or brotherbj > 0 or brotherwash > 5:
 						gs 'arousal','vaginal_finger', 1
+						gs 'stat'
 						cla & *clr
 						'<center><video src="images/shared/home/bathroom/brotherpussyfeel.mp4"></center>'
 						'	"There," you say, rinsing off the last of the hair, stubble, and lather. "Satisfied?"'
@@ -964,6 +969,7 @@ if $ARGS[0] = 'brother_shower_shave':
 							cla
 							*nl
 							gs 'arousal','vaginal_finger', 5
+							gs 'stat'
 							'	Unable to help yourself, you grab his wrist and lean into it, letting his fingers work you even harder.'
 							act'Blow him':gt'brother_voyeur','brother_shower_bj'
 							act'Fuck him':gt'brother_voyeur','brother_shower_fuck'
@@ -1005,6 +1011,7 @@ if $ARGS[0] = 'brother_shower_shave':
 						if brotherfuck > 0 or brotherbj > 0 or brotherwash > 5:
 							act'Get frisky':
 								gs 'arousal','breasts', 1
+								gs 'stat'
 								'	Clean from your shower together, and now with freshly shaved legs, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 								act'Blow him':gt'brother_voyeur','brother_shower_bj'
 								act'Fuck him':gt'brother_voyeur','brother_shower_fuck'
@@ -1049,6 +1056,7 @@ if $ARGS[0] = 'brother_shower_shave':
 						if brotherfuck > 0 or brotherbj > 0 or brotherwash > 5:
 							act'Have some fun':
 								gs 'arousal','breasts', 1
+								gs 'stat'
 								'	Clean from your shower together, and now with freshly shaved legs, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 								act'Blow him':gt'brother_voyeur','brother_shower_bj'
 								act'Fuck him':gt'brother_voyeur','brother_shower_fuck'
@@ -1097,6 +1105,7 @@ if $ARGS[0] = 'brother_shower_shave':
 							if brotherfuck > 0 or brotherbj > 0 or brotherwash > 5:
 								act'Have some fun':
 									gs 'arousal','breasts', 1
+									gs 'stat'
 									'	Clean from your shower together, and now with freshly shaved legs, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 									act'Blow him':gt'brother_voyeur','brother_shower_bj'
 									act'Fuck him':gt'brother_voyeur','brother_shower_fuck'
@@ -1150,6 +1159,7 @@ if $ARGS[0] = 'brother_shower_shave':
 								act'Have some fun':
 									cla & *clr
 									gs 'arousal','breasts', 1
+									gs 'stat'
 									'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 									'	Clean from your shower together, and now with freshly shaved legs, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 									act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -1183,6 +1193,7 @@ if $ARGS[0] = 'brother_shower_shave':
 									*nl
 									gs 'arousal','vaginal_finger', 5
 									gs 'arousal','breasts', 1
+									gs 'stat'
 									'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 									'	Clean from your shower together, and now with freshly a shaved pussy, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 									act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -1204,6 +1215,7 @@ if $ARGS[0] = 'brother_shower_shave':
 					act'Have some fun':
 						cla & *clr
 						gs 'arousal','breasts', 1
+						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 						'	Clean from your shower together, and now with freshly shaved legs, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 						act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -1252,6 +1264,7 @@ if $ARGS[0] = 'brother_shower_shave':
 							cla & *clr
 							gs 'arousal','vaginal_finger', 5
 							gs 'arousal','breasts', 1
+							gs 'stat'
 							'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 							'	Clean from your shower together, and now with freshly a shaved pussy, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 							act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -1287,6 +1300,7 @@ if $ARGS[0] = 'brother_shower_shave':
 									cla & *clr
 									gs 'arousal','vaginal_finger', 5
 									gs 'arousal','breasts', 1
+									gs 'stat'
 									'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 									'	Clean from your shower together, and now with freshly a shaved pussy, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 									act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -1308,6 +1322,7 @@ if $ARGS[0] = 'brother_shower_shave':
 					pcs_horny += 10
 					'<center><video src="images/shared/home/bathroom/brotherpussyfeel.mp4"></center>'
 					gs 'arousal','vaginal_finger', 1
+					gs 'stat'
 					'	"There," you say, taking your brother''s hand and pressing it against your freshly shaved pubic region. "Happy now?"'
 					'	He takes advantage of the opportunity sliding his fingers down your smooth front of your pussy to slip his fingers inside, forcing a moan from you.'
 					'	"Very," he grins back.'
@@ -1316,6 +1331,7 @@ if $ARGS[0] = 'brother_shower_shave':
 						cla & *clr
 						gs 'arousal','vaginal_finger', 5
 						gs 'arousal','breasts', 1
+						gs 'stat'
 						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/brothershowersex2.jpg"></center>'
 						'	Clean from your shower together, and now with freshly a shaved pussy, you can''t help yourself as you start to get frisky with your brother. His hands slide up your body to caress your breasts. In response, you reach back and start jerking his cock feeling him harden under your touch.'
 						act'Blow him':gt'brother_voyeur','brother_shower_bj'
@@ -1643,7 +1659,7 @@ if $ARGS[0] = 'shower_swallow':
 					act'Only for you(sisterly)':
 						cla
 						*nl
-						'	"Only for you!" You wrap your arms around him, smothering him and rubbing your head against his cheek. "I just love you so so so so so very much! What sister could stop herself from slutting up for such a cute baby brother?"'
+						'	"Only for you!" You wrap your arms around him, smothering him and rubbing your head against his cheek. "I just love you so very much! What sister could stop herself from slutting up for such a cute baby brother?"'
 						'	"Ack!" he cries out and shoves you away. "Get off of me! Weirdo!"'
 						if broshowerfuck = daystart:
 							'	"Hey! What''s wrong with that?" you grin at him. "I''d say it''s pretty weird to for your sister to let you fuck her in the shower. I thought you liked that! Don''t you want me to be a slutty weirdo then?"'
@@ -2029,12 +2045,14 @@ if $ARGS[0] = 'brother_shower_fuck_first2':
 			'	"Is... is that cum? Did you cum inside me?!" you pant.'
 			'	"Y-yeah... I was trying to tell you that I was cumming but you didn''t say anything so..."'
 
-			if pillcon >= 30000 or tabletkishot >= 1:
-				'	<i>Well,</i> you think to yourself, <i>It''s a good thing I''m on birth control.</i>'
-			elseif mesec > 0:
-				'	<i>Well,</i> you think to yourself, <i>I don''t think I can get pregnant when I''m on my period... right...?</i>'
-			else
-				'	<i>Shit...</i> You close your eyes, sighing as you feel another glob of Kolka''s cum drip from your pussy. <i>I fucked up...</i>'
+			if succubusflag = 0:
+				if pillcon >= 30000 or tabletkishot >= 1:
+					'	<i>Well,</i> you think to yourself, <i>It''s a good thing I''m on birth control.</i>'
+				elseif mesec > 0:
+					'	<i>Well,</i> you think to yourself, <i>I don''t think I can get pregnant when I''m on my period... right...?</i>'
+				else
+					'	<i>Shit...</i> You close your eyes, sighing as you feel another glob of Kolka''s cum drip from your pussy. <i>I fucked up...</i>'
+				end
 			end
 			act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 		else
@@ -2129,16 +2147,18 @@ if $ARGS[0] = 'brother_fuck_cum':
 			'	Your cries push him over the edge and Kolka can''t hold back any longer. He groans and pulls you tight against him. His cock plunges deep and you feel his cum spurting deep inside you. The sensation brings you to orgasm, body spasming and your pussy tightening up around him, squeezing him to the last drop.	As your orgasm winds down and your legs stop quivering, you lean forward against the shower wall, Kolka''s cock slipping from between your legs.'
 			'	Pressing your face against the wall, you feel Kolka''s cum drip from your pussy.'
 			*nl
-			if knowpreg = 1 or thinkpreg = 1:
-				'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-			elseif pillcon >= 30000 or tabletkishot >= 1:
-				'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-				'	<i>It''s a good thing I''m on birth control...</i>'
-			elseif mesec > 0:
-				'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-				'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
-			else
-				'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+			if succubusflag = 0:
+				if knowpreg = 1 or thinkpreg = 1:
+					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+				elseif pillcon >= 30000 or tabletkishot >= 1:
+					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+					'	<i>It''s a good thing I''m on birth control...</i>'
+				elseif mesec > 0:
+					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+					'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+				else
+					'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+				end
 			end
 			act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 		end
@@ -2150,7 +2170,7 @@ if $ARGS[0] = 'brother_fuck_cum':
 				gs 'cum_call', 'stomach', 'A34', 1
 				'<center><video src="images/shared/home/bathroom/showercum.mp4"></center>'
 				'	"No! Not inside me!" you cry out. You push him off you and turn around. Grabbing his cock, you jerk him vigorously until he groans, spraying hot cum that spatters all over your stomach.'
-				if pillcon < 30000 and pillday < 18 and tabletkishot < 1:'	Feeling his spunk on your stomach, you suddenly grow annoyed and wonder why you even finished him off. "What the fuck Kolka?! Are you <i>trying</i> to get me pregnant?"'
+				if pillcon < 30000 and pillday < 18 and tabletkishot < 1 and succubusflag = 0:'	Feeling his spunk on your stomach, you suddenly grow annoyed and wonder why you even finished him off. "What the fuck Kolka?! Are you <i>trying</i> to get me pregnant?"'
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
 		end
@@ -2183,16 +2203,18 @@ if $ARGS[0] = 'brother_fuck_cum':
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			else
 				'	You smile mischievously and suddenly speed up, causing your brother to erupt inside you. He groans and you curl your toes in pleasure, feeling his cum spurting deep inside you. It''s not enough to bring you to orgasm, but it still feels good. You tighten up on him and work your hips a little more, trying to milk him for a couple more shots. Finally, Kolka pulls away and as his cock slips from inside you, cum bursts out like your pussy was a champagne bottle uncorked.'
-				if knowpreg = 1 or thinkpreg = 1:
-					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-				elseif pillcon >= 30000 or tabletkishot >= 1:
-					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-					'	<i>It''s a good thing I''m on birth control...</i>'
-				elseif mesec > 0:
-					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-					'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
-				else
-					'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+				if succubusflag = 0:
+					if knowpreg = 1 or thinkpreg = 1:
+						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+					elseif pillcon >= 30000 or tabletkishot >= 1:
+						'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+						'	<i>It''s a good thing I''m on birth control...</i>'
+					elseif mesec > 0:
+						'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+						'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+					else
+						'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+					end
 				end
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
@@ -2208,16 +2230,18 @@ if $ARGS[0] = 'brother_fuck_cum':
 			'	Your cries push him over the edge and Kolka can''t hold back any longer. He groans and pulls you tight against him. His cock plunges deep and you feel his cum spurting deep inside you. The sensation brings you to orgasm, body spasming and your pussy tightening up around him, squeezing him to the last drop. As your orgasm winds down and your legs stop quivering, you lean forward against the shower wall, Kolka''s cock slipping from between your legs.'
 			'	Pressing your face against the cool wall, you feel Kolka''s cum drip from your pussy, splashing on the bottom of the tub. You think to yourself...'
 			*nl
-			if knowpreg = 1 or thinkpreg = 1:
-				'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-			elseif pillcon >= 30000 or tabletkishot >= 1:
-				'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-				'	<i>It''s a good thing I''m on birth control...</i>'
-			elseif mesec > 0:
-				'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-				'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
-			else
-				'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+			if succubusflag = 0:
+				if knowpreg = 1 or thinkpreg = 1:
+					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+				elseif pillcon >= 30000 or tabletkishot >= 1:
+					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+					'	<i>It''s a good thing I''m on birth control...</i>'
+				elseif mesec > 0:
+					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+					'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+				else
+					'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+				end
 			end
 			act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 		end
@@ -2248,16 +2272,18 @@ if $ARGS[0] = 'brother_fuck_cum':
 				'	"But that''s not fair! So what I want doesn''t count for anything?"'
 				'	"Nope! But I get to decide if I''m feeling generous."'
 				'	With Kolka''s hands balled into fists at his side and your hands on your hips, the two of you glare at each other, scowling. This turned into a much bigger argument than you meant it to.'
-				if knowpreg = 1 or thinkpreg = 1:
-					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-				elseif pillcon >= 30000 or tabletkishot >= 1:
-					'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
-					'	<i>At least I''m on birth control...</i>'
-				elseif mesec > 0:
-					'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
-					'	<i>At least I don''t have to worry about getting pregnant on my period... right...?</i>'
-				else
-					'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Fuck. I shouldn''t have done this anyways. This gets me pregnant?</i>'
+				if succubusflag = 0:	
+					if knowpreg = 1 or thinkpreg = 1:
+						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+					elseif pillcon >= 30000 or tabletkishot >= 1:
+						'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
+						'	<i>At least I''m on birth control...</i>'
+					elseif mesec > 0:
+						'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
+						'	<i>At least I don''t have to worry about getting pregnant on my period... right...?</i>'
+					else
+						'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Fuck. I shouldn''t have done this anyways. This gets me pregnant?</i>'
+					end
 				end
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
@@ -2267,34 +2293,38 @@ if $ARGS[0] = 'brother_fuck_cum':
 				'	"I''m sorry Kolka! Your cock just felt so good, I couldn''t stop! You can''t be mad at me for being too addicted to your cock to stop, right?" You kneel down, trying to apologize by cleaning him up with your tongue.'
 				'	He grumbles a bit but you can tell that he''s not mad at you. "I guess I can''t be mad about that... But next time I ask, I want to cum on your face!"'
 				'	"Okay, it''s a promise!" you say, standing back up and kissing him on the cheek. "So long as I can stop myself that is."'
-				if knowpreg = 1 or thinkpreg = 1:
-					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-				elseif pillcon >= 30000 or tabletkishot >= 1:
-					'	<i>Fuck, that felt good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
-					'	<i>It''s a good thing I''m on birth control...</i>'
-				elseif mesec > 0:
-					'	<i>Fuck, that felt good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-					'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
-				else
-					'	<i>Shit... I probably should have had more self control...</i> you think to yourself, watching another glob of cum dribble from your pussy. <i>What if this gets me pregnant?</i>'
+				if succubusflag = 0:	
+					if knowpreg = 1 or thinkpreg = 1:
+						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+					elseif pillcon >= 30000 or tabletkishot >= 1:
+						'	<i>Fuck, that felt good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
+						'	<i>It''s a good thing I''m on birth control...</i>'
+					elseif mesec > 0:
+						'	<i>Fuck, that felt good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+						'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+					else
+						'	<i>Shit... I probably should have had more self control...</i> you think to yourself, watching another glob of cum dribble from your pussy. <i>What if this gets me pregnant?</i>'
+					end
 				end
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
-
-			act'Too much mess':
-				cla
-				if knowpreg = 1 or thinkpreg = 1:
-					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-				elseif pillcon >= 30000 or tabletkishot >= 1:
-					'	<i>Fuck, that feels good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
-					'	<i>It''s a good thing I''m on birth control...</i>'
-				elseif mesec > 0:
-					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-					'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
-				else
-					'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+			
+			if succubusflag = 0:
+				act'Too much mess':
+					cla
+					if knowpreg = 1 or thinkpreg = 1:
+						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+					elseif pillcon >= 30000 or tabletkishot >= 1:
+						'	<i>Fuck, that feels good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
+						'	<i>It''s a good thing I''m on birth control...</i>'
+					elseif mesec > 0:
+						'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+						'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+					else
+						'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>What if I get pregnant?</i>'
+					end
+					act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 				end
-				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
 		end
 
@@ -2327,16 +2357,18 @@ if $ARGS[0] = 'brother_fuck_cum':
 				'	"But that''s not fair! So what I want doesn''t count for anything?"'
 				'	"Nope! But I get to decide if I''m feeling generous."'
 				'	With Kolka''s hands balled into fists at his side and your hands on your hips, the two of you glare at each other, scowling. This turned into a much bigger argument than you meant it to.'
-				if knowpreg = 1 or thinkpreg = 1:
-					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-				elseif pillcon >= 30000 or tabletkishot >= 1:
-					'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
-					'	<i>At least I''m on birth control...</i>'
-				elseif mesec > 0:
-					'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
-					'	<i>At least I don''t have to worry about getting pregnant on my period... right...?</i>'
-				else
-					'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Fuck. I shouldn''t have done this anyways. This gets me pregnant?</i>'
+				if succubusflag = 0:
+					if knowpreg = 1 or thinkpreg = 1:
+						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+					elseif pillcon >= 30000 or tabletkishot >= 1:
+						'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
+						'	<i>At least I''m on birth control...</i>'
+					elseif mesec > 0:
+						'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Only my idiot brother could ruin a perfectly good creampie like this.</i>'
+						'	<i>At least I don''t have to worry about getting pregnant on my period... right...?</i>'
+					else
+						'	<i>Goddamn it,</i> you think, looking down to watch another glob of cum drips from your snatch. <i>Fuck. I shouldn''t have done this anyways. This gets me pregnant?</i>'
+					end
 				end
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
@@ -2362,16 +2394,18 @@ if $ARGS[0] = 'brother_fuck_cum':
 				cla
 				'	"Too messy," you say. "Sorry Kolka, but I don''t feel like cleaning that off my face. You understand don''t you?"'
 				'	"Yeah I guess..."'
-				if knowpreg = 1 or thinkpreg = 1:
-					'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
-				elseif pillcon >= 30000 or tabletkishot >= 1:
-					'	<i>Fuck, that feels good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
-					'	<i>It''s a good thing I''m on birth control...</i>'
-				elseif mesec > 0:
-					'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
-					'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
-				else
-					'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>Maybe I should have let him cum on my face after all... What if I get pregnant?</i>'
+				if succubusflag = 0:
+					if knowpreg = 1 or thinkpreg = 1:
+						'You chuckle to yourself: "Well, at least I can''t get any more pregnant than I already am!"'
+					elseif pillcon >= 30000 or tabletkishot >= 1:
+						'	<i>Fuck, that feels good...</i> you think to yourself, looking down to watch another glob dribbles out of you with satisfaction.'
+						'	<i>It''s a good thing I''m on birth control...</i>'
+					elseif mesec > 0:
+						'	<i>Fuck, that feels good...</i> you think to yourself as another glob dribbles out, plopping onto the tub floor.'
+						'	<i>It''s a good thing I can''t get pregnant when I''m on my period... right...?</i>'
+					else
+						'	<i>Shit...</i> Another glob of cum dribbles from your pussy, plopping onto the tub floor. <i>Maybe I should have let him cum on my face after all... What if I get pregnant?</i>'
+					end
 				end
 				act'Continue':gt'brother_voyeur','brother_shower_fuck_end'
 			end
@@ -2446,7 +2480,7 @@ if $ARGS[0] = 'brother_shower_fuck_end':
 			if pcs_vag >= 25:
 				'	"If it was your first time, how come you''re so loose?"'
 				'	<i>Shit!</i>'
-				'	"I always heard that virgins are supposed to be really really tight for their first time, but you weren''t. I mean, it still felt really good but I slid in so easily. How come?"'
+				'	"I always heard that virgins are supposed to be really tight for their first time, but you weren''t. I mean, it still felt really good but I slid in so easily. How come?"'
 				'	Unable to come up with a suitable explanation, you decide to retaliate with false offense.'
 				'	"What are you trying to say about me? Huh? That I''m a slut? That I would lie to you about giving you my virginity? How dare you!"'
 				'	Kolka shies away at your sudden burst of emotion.'

locations/budgetclothes.qsrc

@@ -125,6 +125,7 @@ if $ARGS[0] = 'clothes':
 			gs 'clothing_QV', 'shop_filter'
 				
 			if clothingfilter_risk = 1 and clothingfilter_pandb = 1 and clothingfilter_norm2 = 1: *p '<a href="exec: i = <<i>> & gt ''budgetclothes'', ''cheapclo''"><img src="images/pc/clothing/1cheap/<<i>>.jpg" 	height="250" /></a>'
+			
 		end
 		i += 6
 		if i = 3: i = 9

locations/butik.qsrc

@@ -44,11 +44,7 @@ if $ARGS[0] = 'start':
 
 	'The boutique sells designer winter coats, formal clothing, beautiful shoes, expensive underwear and exquisite handbags.'
 
-	act 'Leave the boutique':
-		cla
-		minut += 3
-		gt 'torgcentr'
-	end
+	act 'Leave the boutique': minut += 3 & gt 'torgcentr'
 	
 	act 'View clothing': minut += 5 & gt 'butik', 'clothes'
 
@@ -60,20 +56,17 @@ if $ARGS[0] = 'start':
 
 	act 'View purses': minut += 5 & gt 'butik', 'purses'
 
-	if money >= 50000:
-		act 'View coats':
-			if coat[9] < 1:
-				if coat[9] = 0:dynamic 'act ''Look at designer coat 9'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''coat'', 9, 50000'
-			end
-
-			if coat[11] < 1:
-				if coat[11] = 0:dynamic 'act ''Look at designer coat 11'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''coat'', 11, 50000'
-			end
+	act 'View coats':
+		cla
+		act 'Return': minut += 1 & gt 'butik', 'start'
+		if coat[9] < 1: 
+			if coat[9] = 0:dynamic 'act ''Look at designer coat 9'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''coat'', 9, 50000'
+		end
+		if coat[11] < 1:
+			if coat[11] = 0:dynamic 'act ''Look at designer coat 11'':gt ''clothing'', ''view_clothing_item'', ''shop'', ''coat'', 11, 50000'
 		end
-	else
-		*nl
-		'There are some coats, but they cost 50.000 <b>₽</b>.'
 	end
+
 end
 
 if $ARGS[0] = 'clothes':
@@ -89,11 +82,7 @@ if $ARGS[0] = 'clothes':
 
 	gs 'clothing_QV', 'shop_header'
 
-	act 'Return':
-		cla
-		minut += 1
-		gt 'butik', 'start'
-	end
+	act 'Return': minut += 1 & gt 'butik', 'start'
 
 	if Clothingstock > 11:
 		i = 1
@@ -133,11 +122,7 @@ if $ARGS[0] = 'panties':
 	*clr & cla
 	gs'stat'
 
-	act 'Return':
-		cla
-		minut += 1
-		gt 'butik', 'start'
-	end
+	act 'Return': minut += 1 & gt 'butik', 'start'
 
 	i = 1
 
@@ -168,11 +153,7 @@ if $ARGS[0] = 'bras':
 	*clr & cla
 	gs'stat'
 
-	act 'Return':
-		cla
-		minut += 1
-		gt 'butik', 'start'
-	end
+	act 'Return': minut += 1 & gt 'butik', 'start'
 
 	i = 1
 
@@ -203,11 +184,7 @@ if $ARGS[0] = 'shoes':
 	*clr & cla
 	gs'stat'
 
-	act 'Return':
-		cla
-		minut += 1
-		gt 'butik', 'start'
-	end
+	act 'Return': minut += 1 & gt 'butik', 'start'
 
 	if Clothingstock > 11:
 		i = 1
@@ -232,11 +209,7 @@ if $ARGS[0] = 'purses':
 	*clr & cla
 	gs'stat'
 
-	act 'Return':
-		cla
-		minut += 1
-		gt 'butik', 'start'
-	end
+	act 'Return': minut += 1 & gt 'butik', 'start'
 
 	i = 1
 

locations/castSpell.qsrc

@@ -0,0 +1,88 @@
+# castSpell
+! 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 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
+spellTime['teleport'] = 20
+spellWill['teleport'] = 20
+spellDiff['teleport'] = 20
+!glamour
+spellMana['glamour'] = 500
+spellTime['glamour'] = 1
+spellWill['glamour'] = 15
+spellDiff['glamour'] = 30
+
+spellSuccess = 0
+
+$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[$SpellName] - (pcs_horny/5) + rand(1,100)
+	if spellRoll > 50:
+		!Critical Success
+		spellSuccess = 2
+		splcstng_exp += rand(1,spellDiff[$SpellName]) + rand(0,5)
+	elseif spellRoll > 10:
+		!Success
+		spellSuccess = 1
+		splcstng_exp += rand(1,spellDiff[$SpellName])
+	elseif spellRoll > -20:
+		!Failure
+		spellSuccess = 0
+		splcstng_exp += rand(1,spellDiff[$SpellName]) / 2
+	else:
+		!Critical Failure
+		spellSuccess = -1
+		splcstng_exp += rand(1,spellDiff[$SpellName]) / 2
+	end
+	killvar 'spellRoll'
+
+	!Incur the costs of casting the spell
+	if spellSuccess = 2:
+		manaCost = spellMana[$SpellName] / 2
+	elseif spellSuccess = -1:
+		manaCost = spellMana[$SpellName] * 2
+	else:
+		manaCost = spellMana[$SpellName]
+	end
+	pcs_manna -= manaCost
+	!pcs_willpwr -= spellWill[$SpellName]
+	arouseVal = manaCost / 50
+	gs 'arousal', 'voyeur', arouseVal
+	minut -= arouseVal
+	killvar 'arouseVal'
+	killvar 'manaCost'
+
+end
+
+minut += spellTime[$SpellName]
+
+gs 'stat'
+
+$SpellExec = "gs 'spell_<<$SpellName>>', '<<spellSuccess>>'<<$SpellArgs>>"
+
+dynamic $SpellExec
+
+killvar '$SpellName'
+killvar '$SpellArgs'
+killvar '$SpellExec'
+
+--- castSpell ---------------------------------

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
@@ -604,7 +604,13 @@ end
 lipkoef -= rand(0,1)
 if lipkoef <= 0: lipkoef = 0
 
-if Enable_autotampon = 0 and isprok = 1:isprok = 0 & 'You threw away your used tampon.'
+if isprok = 1 or isprokp = 1:
+	isprok_lastday = 1
+else
+	isprok_lastday = 0
+end
+
+if Enable_autotampon = 0 and isprok = 1: isprok = 0 & 'You threw away your used tampon.'
 if Enable_autotampon = 0 and isprokp = 1:isprokp = 0 & 'You threw away your used sanitary pad.'
 
 if preg = 1:
@@ -625,21 +631,20 @@ elseif preg = 2 and pregminut < totminut:
 		pregminut = totminut + 1440
 	end
 elseif preg = 0:
-	KILLVAR 'pregTalkBrother'
-	KILLVAR 'pregTalkSister'
-	KILLVAR 'pregTalkFather'
-	!{KILLVAR 'pregTalkFamily' -- Do not kill this (Abortion talk).}
-	KILLVAR 'pregTalkMom'
-	KILLVAR 'pregTalk'
-	KILLVAR 'pregTalkNat'
-	KILLVAR 'pregTalkKatja'
-	KILLVAR 'pregTalkAlbina'
-	KILLVAR 'pregTalkPC'
-	KILLVAR 'pregTalkStarlets'
-	KILLVAR 'pregTalkvball'
-	KILLVAR 'pregTalkTrack'
-	killvar 'pregtalkStarlets'
-	killvar 'pregtalkvball'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A14'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A16'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A23'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A28'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A29'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A33'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A34'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A69'
+	gs 'shortgs', 'remove_array_element', 'npc_pregtalk','A131'
+
+	!{killvar 'pregTalkFamily' -- Do not kill this (Abortion talk).}
+
+	killvar 'pcs_pregtalk'
+	killvar 'pregTalk'
 	killvar 'pregtime'
 	killvar 'knowpreg'
 	killvar 'denypreg'
@@ -701,7 +706,7 @@ else
 			elseif preg > 0:
 				razeba = 6
 
-				if pcs_horny < 100:pcs_horny += pregtime / 10
+				if pcs_horny < 100:pcs_horny += pregchem / 240
 			end
 		end
 	end
@@ -711,6 +716,11 @@ if pcs_horny < 0:pcs_horny = 0
 
 !!------------------------------------------------------------------------------------------------------------
 
+!reset Natasha Belova''s clothes
+if natseethroughwearing = 1: natseethroughwearing = 0
+
+!!------------------------------------------------------------------------------------------------------------
+
 !counter for Dimka avoidance
 if dimaFilm = 1 and dimaRudeBlock = 0:
 	nodimkaK += 1
@@ -751,6 +761,7 @@ end
 !! Clothing wear and tear
 gs 'starenie'
 
+!!cocaine reduction
 if nark > 60:
 	nark = 60
 elseif nark > 30:
@@ -759,7 +770,7 @@ elseif nark > 0:
 	nark -= 1
 end
 
-if pregtime > 10:fat += 1
+if pregchem > 240:fat += 1
 
 !!------------------------------------------------------------------------------------------------------------
 !!	Pain
@@ -1252,14 +1263,6 @@ if storyline = 1:
 
 	if sisboyparty = 2 and sisboyparty_day + 1 < daystart: sisboyparty = 3
 
-!!missed graduation
-	if month = 5 and day = 26:
-		if school_year = 2001 and year = 2018 and kanikuli ! 7:
-			grad_miss = daystart + 1
-		elseif school_year = 2000 and year = 2017 and kanikuli ! 7:
-			grad_miss = daystart + 1
-		end
-	end
 
 	if SchoolAtestat = 0:
 		if month = 12 and day > 25:
@@ -1293,13 +1296,14 @@ if storyline = 1:
 				end
 			end
 		elseif month = 5:
-			if ( (school_year = 2000 and year = 2017) or (school_year = 2001 and year = 2018) ) and day >= 19 and day <= 25:
+			if (school_year = 2000 and year = 2017) or (school_year = 2001 and year = 2018):
 				if day = 25:
 					kanikuli = 6
+                    SchoolAtestat = -1
 					$holyday = '<b>Your graduation is today. Be there by 8:00.</b>'
 				elseif day = 24:
 					$holyday = '<b>Your graduation is tomorrow. Be there by 8:00.</b>'
-				else
+				elseif day >= 19:
 					$holyday = '<b>Your graduation is in <<26-day>> days.</b>'
 				end
 			elseif day >= 25:
@@ -1338,6 +1342,12 @@ if storyline = 1:
 				$holyday = '<b>Last day of Autumn Break.</b>'
 			end
 		end
+    elseif SchoolAtestat = -1:
+        if ParHomeBlock = 1:
+            $holyday = '<b>You missed your graduation. You could pick up your diploma at the school.</b>'
+        else
+            $holyday = '<b>You missed your graduation. Maybe your mother picked up your diploma.</b>'
+        end
 	end
 	!!Brother''s dick growth as he gets older
 	kolka_dick_month = daystart/30
@@ -1424,5 +1434,145 @@ if blizoruk < 10: blizoruk -= 1
 if blizoruk < 100: blizoruk -= rand(0,1)
 if blizoruk < 0: blizoruk = 0
 
+
+!!------------------------------------------------------------------------------------------------------------------------
+!!array cleaning moving potential fathers from C to B array and cleaning C array
+
+!First look is there any cum in the womb,when womb is empty random genereted npc record are cleaningare deleted
+
+! mid($npclastgenerated[0],2,9)  number of the last random created npcs
+norandomdads = 1
+!checking if Sveta have children or babies
+if arrsize('$ChildFath') > 0:
+		!Yes she have... cheking if random NPC is the dady
+		!'Sveta have <<$ChildFath>> children'
+		
+		childtmp = 0
+		:childloop
+		if mid($ChildFath[childtmp],1,1) = 'C':
+			!yes child is from random genereted npc
+			norandomdads = 0
+		else
+			!child is not from random genereted npc
+			
+			childtmp += 1
+			if childtmp < arrsize('$ChildFath'): jump 'childloop'
+		end
+end
+
+
+number = 0
+
+
+
+!checking if there is some cum in womb.
+if arrsize('$cumarrnam') > 0:
+	!there is cum in womb	
+
+	:cleaning_records_cum
+	$tmp = 'C' + '<<number>>'
+		
+	cum_number = 0
+	:cumloop
+	!look if cum in womb is from random created npc
+	if($tmp = $cumarrnam[cum_number]):
+		!'cum from <<$tmp>> is in the womb'
+		number +=1
+		if number < mid($npclastgenerated[0],2,9): jump 'cleaning_records_cum'
+	else	
+		cum_number += 1
+		if cum_number < arrsize('$cumarrnam'):
+			jump 'cumloop'
+		else
+			!'no cum in woomb from <<$tmp>>'
+			if norandomdads = 1:
+				!no random dads
+				gs 'npccleanc',$tmp
+			else
+				!some children are from random genereted npc
+				!checking if selected npc is a dady
+				childtmp = 0
+				:childloop3
+				
+				if $ChildFath[childtmp] = $tmp:
+					!selected npc is father of the child, he will stay in record or now
+					!moving npc from C array to B array,
+					gs 'npcpreservec',$tmp
+					!updating the childs data about the father
+					$ChildFath[childtmp] = $npclastsaved
+					!cleaining unnecessary data
+					gs 'npccleanc',$tmp
+					number += 1
+					if number < mid($npclastgenerated[0],2,9): jump 'cleaning_records_cum'
+				else
+					!child is not from random genereted npc
+					childtmp += 1
+					if childtmp < arrsize('$ChildFath'): 
+						jump 'childloop3'
+					else
+						!children are not from seleted random npc, we are cleaning his redords
+						gs 'npccleanc',$tmp
+						number += 1
+						if number < mid($npclastgenerated[0],2,9): jump 'cleaning_records_cum'
+						
+					end
+				end
+				
+				
+			end
+			
+		end
+	end
+	
+else
+	!there is no cum in womb, cleaning random created npc redords
+		
+	if norandomdads = 0:
+	
+		:cleaning_with_babies
+		$tmp = 'C' + '<<number>>'
+		!cheking if random NPC is the dady
+		childtmp2 = 0
+		
+		:childloop2
+		
+		if $ChildFath[childtmp2] = $tmp:
+			!selected random NPC is dady selected child
+			number +=1
+			if number < mid($npclastgenerated[0],2,9): jump 'cleaning_with_babies' 
+		
+		else
+			!selected random NPC is not dady selected child
+			childtmp2 += 1
+			if childtmp2 < arrsize('$ChildFath'):
+				jump 'childloop2'
+			else
+				!selected random npc is not any child dady
+				gs 'npccleanc',$tmp
+				number += 1
+				if number < mid($npclastgenerated[0],2,9): jump 'cleaning_with_babies'
+			end
+		end
+	else
+		!she have no children or babies, and no cum freom random npc
+		!'cleaning random NPC records'
+		:cleaning_no_babies
+		$tmp = 'C' + '<<number>>'
+		!'clining <<$tmp>>'
+		gs 'npccleanc',$tmp
+		number += 1
+		if number < mid($npclastgenerated[0],2,9): jump 'cleaning_no_babies'
+	end
+end
+
+
+killvar '$tmp'
+killvar 'number'
+killvar 'childtmp2'
+killvar 'childtmp'
+killvar 'norandomdads'
+
+!!------------------------------------------------------------------------------------------------------------
+
 --- cikl ---------------------------------
 

locations/clothing.qsrc

@@ -17,7 +17,7 @@ $clothing_list_line = {
 	else
 		clothing_temp = 150 & !clothing widdefault to 150
 	end
-	$RESULT +='<TD><a href="exec:gt ''clothing'', ''view_clothing_item'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>"><img src="<<FUNC(''$clothing_image'', $ARGS[1], ARGS[2])>>" width="<<clothing_temp>>"></a></TD>'
+	$RESULT +='<TD><a href="exec:gt ''clothing'', ''view_clothing_item'', ''<<$ARGS[0]>>'', ''<<$ARGS[1]>>'', <<ARGS[2]>>"><img src="<<FUNC(''$clothing_image'', $ARGS[1], ARGS[2])>>" width="<<clothing_temp>>"><p><<$ARGS[1]>> outfit</p></a></TD>'
 	killvar 'clothing_temp'
 	gs 'clothing_attributes', $ARGS[1], ARGS[2]
 

locations/club.qsrc

@@ -254,7 +254,7 @@ if $ARGS[0] = 'dance':
 	gs 'stat'
 	'<center><b><font color="maroon">The dance floor</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club9.jpg"></center>'
-	'The club is filled to the brink with people. Most of which are dancing on the dancefloor.'
+	'The club is filled to the brink with people. Most of whom are on the dance floor having a great time.'
 	
 	act 'Leave the dance floor':gt 'club', 'inside'
 	
@@ -272,7 +272,7 @@ if $ARGS[0] = 'dance':
 			pcs_willpwr += 10
 			clrand = rand(0, 400)
 			'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club4.jpg"></center>'
-			'On the dance floor very closely, you can put a hand on his shoulder one guy to make a couple of steps and pressed her chest already to another, and in the dance, how much one can do in dance.'
+			'The dance floor is packed and everyone is dancing very closely, you could put your hand on the shoulder of the guy in front of you but you when you turn around your chest is right up against another. You don''t let it bother you as everyone is forced to dance this close.'
 
 			if pcs_apprnc >= clrand:
 				pcs_horny += 1
@@ -284,7 +284,7 @@ if $ARGS[0] = 'dance':
 				act 'Dance with him':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/club8.jpg"></center>'
-					'You continue to dance with the guy on the dancefloor, but he doesn''t stop touching your. It somehow gets you excited, when a random guy is touching you in public.'
+					'You continue to dance with the guy on the dance floor, but he doesn''t stop touching your butt. It gets you quite excited having a random guy feeling you up in public.'
 
 					gs 'arousal', 'foreplay', 30, 'sub'
 					gs 'stat'
@@ -299,7 +299,7 @@ if $ARGS[0] = 'dance':
 						dansexclub = rand(0, 1)
 
 						if dansexclub = 1:
-							'You''re passionately kissing the guy, while he''s continously groping you, always dedicating one of his hands to either your tits or your ass. "Why don''t we go to the VIP-Area. There we''ll have a bit more privacy.", he says inbetween kisses.'
+							'You''re passionately kissing the guy, while he''s continuously groping you, always dedicating one of his hands to either your tits or your ass. "Why don''t we go to the VIP-Area. There we''ll have a bit more privacy.", he says inbetween kisses.'
 
 							gs 'arousal', 'kiss', 15, 'sub'
 							gs 'stat'
@@ -308,7 +308,7 @@ if $ARGS[0] = 'dance':
 							if pcs_horny < 70: act 'Go to the dance floor':gt 'club', 'dance'
 							act 'Go to Vip-room with the guy':$sexloc = 'vipclub' & xgt 'sex', 'var'
 						elseif dansexclub = 0:
-							'You''re passionately kissing the guy, while he''s continously groping you, always dedicating one of his hands to either your tits or your ass. "Let''s go to the toilet.", he says with a smile.'
+							'You''re passionately kissing the guy, while he''s continuously groping you, always dedicating one of his hands to either your tits or your ass. "Let''s go to the toilet.", he says with a smile.'
 
 							gs 'arousal', 'kiss', 15, 'sub'
 							gs 'stat'
@@ -322,7 +322,7 @@ if $ARGS[0] = 'dance':
 				if clrand > 85:
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/nightclub/dancelezb.jpg"></center>'
-					'While you''re dancing you a hand groping your ass. You turn around to see who touched your, but you''re surprised to see women smiling at you, she seems to be biting her lips.'
+					'While you''re dancing you a hand groping your ass. You turn around to see who touched your butt, but you''re surprised to see a woman smiling at you, she is seductively biting her lip.'
 					dansexclub = rand(0, 1)
 
 					act 'Stop dancing':gt 'club', 'inside'

locations/cum_arrcheat.qsrc

@@ -1,5 +1,8 @@
 # cum_arrcheat
 
+!! npc_pregtalk[] 0/1: Does character A# know that you are currently pregnant
+!! pcs_pregtalk 0/1: Has PC been told she is pregnant
+
 *clr & cla
 '<center><h2>Cheat Menu - OOX Debug</h2></center>'
 if cycle = 0:
@@ -28,7 +31,7 @@ else
 	$cycletemp[2]= ''
 end
 if lactation['active'] > 0:
-	$cycletemp[3]= '. You are lactating. You currently have <<lactatemv/10>> millilitres of milk stored, with a capacity of <<lactatemm/10>> millilitres'
+	$cycletemp[3]= '. You are lactating. You currently have <<lactation[''breastmv'']/1000>> millilitres of milk stored, with a capacity of <<lactation[''breastmm'']/1000>> millilitres'
 else
 	$cycletemp[3]= ''
 end

locations/cum_call.qsrc

@@ -4,7 +4,7 @@
 'labia' - 'pantyfront' - 'anus' - 'butt' - 'pantyrear' - 'clothesgroin' - 'clothes' - 'back' - 'legs'
 'arms' - 'face' - 'mouth' - 'hands' - 'stomach' - 'breasts' - 'hair' - 'internalcondom'
 $ARGS[1] is for the name of the sexual partner
-ARGS[2] is a for knowing the partner. Defaults to 0.
+ARGS[2] is a for knowing the partner. Defaults to 0. If this is not set to 1 the status window message will mention "some guy" instead of his name.
 	0 - unknown sex partner (his name may be known, but she newer saw him before, and likely won't ever again, or she won't remeber it)
 	1 - sex partner is known for MC (classmate, neighbor, someone she new beforehand)
 	2 - MC is unaware of the act (like unconscious sex)

locations/dimaEv.qsrc

@@ -1,4 +1,5 @@
 # dimaEv
+
 !!files that can be deleted dima, dimagohome2, dimahome, dimkawarning, dimaev, dimaRudeEV
 
 menu_off = 1
@@ -85,303 +86,8 @@ if $ARGS[0] = 'drugged':
 	gs 'stat'
 	'<center><b><font color="maroon"><<$npc_firstname[''A1'']>> <<$npc_lastname[''A1'']>></font></b></center>'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/1.jpg"></center>'
-	'You take several drinks as you talk with Dimka. Again he doesn''t seem to want to chat, and appear to be waiting for something. Then you start to feel funny. For a moment, you just feel numb, then you feel yourself get aroused, the heat coming from your pussy as it soaks itself, you gasp, it is almost too much to take, you desperately need someone to fuck you. "Oh, fuck". You don''t think this is normal, he must have laced it with something. You blink a few times trying to clear your head, but soon your thoughts grow murky.'
-	act 'Continue':
-		*clr & cla
-		pcs_dom += 1
-		minut += 5
-		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/pre.jpg"></center>'
-		'You hear Dimka chuckling, it takes and eternity to turn your head and center your eyes at him. You see him looking intently at you, examining whatever have affected your brain. "Well, it looks like the drugs have taken full effect on you already." He stands up and unbuttons his pants and pulls out his dick, giving it a couple of strokes to get it hard for you. "Come here, baby, and suck on this." You stand there looking stupidity to his cock. He then sighed and taping it say "Come on slut, here, take your bone."'
-		act 'Take by mouth':
-			*clr & cla
-			bja += 1
-			if maxdra = 0:maxdra = 1
-			if maxdra = 6:maxdra = 5
-			gs 'boyStat', 'A1'
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/minet.jpg"></center>'
-			'Seeing his hard dick, you almost feel your mouth water. You don''t understand anymore what is happening, but you badly want to suck his cock right now. You walk, stumbling over to Dimka and settle comfortably in front of him, taking his hard, hot dick in your mouth. Your lips slide down the shaft of his <<dick>>cm <<$dick_girth>> cock and start bobbing your head on his rod, while one hand strokes his shaft and the other massages his balls. Your mind is too drugged to have any will or thought anymore.'
-			dimadalrand = rand(0, maxdra)
-			gs 'arousal', 'bj', 15, 'sub'
-			gs 'stat'
-			if dimadalrand = 0:
-				act 'Further':
-					*clr & cla
-					spafinloc = 12
-					gs 'cum_manage'
-					swallow += 1
-					dimasexday = daystart
-					gs 'stat'
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/dimka/sex/bjcum.mp4"></video></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Suddenly, Dimka''s cock spurts cum in your mouth and you continue sucking without care, adding spit to the mess. Finally, Dimka ceases to ejaculate and you instinctively swallow his cum.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. How you have sucked him and drank his cum making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and your skin pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 1:
-				act 'Further':
-					*clr & cla
-					spafinloc = 11
-					gs 'cum_manage'
-					facial += 1
-					if maxdra = 1:maxdra = 2
-					dimasexday = daystart
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/face.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka suddenly pulls his dick out of your mouth and starts cumming on your face. Hot ropes of sperm land on the cheeks, nose and lips. Soon almost your entire face is covered with warm and sticky cum. You sit there confused, with a gaping mouth, trying to understand what just happen.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have sucked him and has been drenched in his cum making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video"'
-						'At his threat, your blood runs cold and your skin pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 2:
-				act 'Further':
-					*clr & cla
-					spafinloc = 12
-					gs 'cum_manage'
-					swallow += 1
-					if pcs_throat < 16:pcs_throat += 1
-					if pcs_makeup ! 1:pcs_makeup = 0
-					if maxdra = 2:maxdra = 3
-					dimasexday = daystart
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/sex/facefuck0.jpg"></center>'
-					if pcs_throat < 16:
-						'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka grabs you by the hair and pulls you onto his member. His hard <<dick>>cm <<$dick_girth>> cock enters your throat, you choke but are to confused to really do anithing about it. Dimka doesn''t pay any attention to your distress, and in fact, seems to enjoy your gagging sound. he just fucks your mouth with his hard cock. Finally the torture ends and he fills your mouth with his hot slimy sperm that you instinctively swallow.'
-					else
-						'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka grabs you by the hair and pulls you onto his member. His hard <<dick>>cm <<$dick_girth>> cock enters your throat, you resist gagging, but are to confused to really understand what he is doing. Dimka enjoy the fact that he can push his hard cock to the back of your troath and relentless fuck your mouth. Finally the torture ends and he cums his hot slimy sperm that you instinctively swallow.'
-					end
-					gs 'arousal', 'end'
-					gs 'pain', 2, 'throat', 'stretch'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have been skullfucked and drink all his cum making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 3:
-				act 'Further':
-					*clr & cla
-					if maxdra = 3:maxdra = 4
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sit.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka takes his dick out of your mouth and makes you get on the bed. He straddles your chest, making you suffocate under the added weight. Then, put his cock in your face and begin giving you little dick slaps. "Come on slut, suck like a porn star". You start to lick his balls while Dimka masturbates in your face.'
-					act 'Further':
-						*clr & cla
-						spafinloc = 11
-						gs 'cum_manage'
-						facial += 1
-						dimasexday = daystart
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sitcum.jpg"></center>'
-						'Suddenly, Dimka''s cock starts spurting out jets of hot cum that splatter on your face, covering it in thick, viscous slime. He sighs with relief and fall in the bed, relieving the pressure in your chest and letting you breathe. With a contented smile he spread his cum around your confused face'
-						gs 'arousal', 'end'
-						gs 'stat'
-						act 'Clean up':
-							cla
-							*clr
-							minut += 5
-							dimaFilm = 1
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/seeporn.jpg"></center>'
-							'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-							'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-							*nl
-							'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have licked his balls and let him cum in your face, making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-							'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-							act 'Run out of his house': gt 'pavResidential'
-							act 'Plead':
-								cla
-								*clr
-								minut += 5
-								'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-								'<center><img src="images/pc/tears1.jpg"></center>'
-								'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-								act 'Run out of his house': gt 'pavResidential'
-							end
-						end
-					end
-				end
-			elseif dimadalrand = 4:
-				act 'Further':
-					*clr & cla
-					gs 'boyStat', 'A1'
-					silavag = 1
-					dick = 16
-					if maxdra = 4:maxdra = 5
-					sexa += 1
-					dimasexday = daystart
-					gs 'boyStat', 'A1'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/sex2.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your back, your head against the back and the ass nearly hanging off. He lifts your legs up and pushes them forward till they are resting against your body. You try to get up from the awkward position, but he gives your exposed ass a slap. "Come on slut, fuck like a porn star". Grabbing your legs you complain. He presses the head of his <<dick>>cm <<$dick_girth>> dick against the slit of your pussy and with a triumphant smile push.'
-					gs 'dinsex', 'boy_puts_condom'
-					gs 'dinsex','vaginal_sex',10
-					gs 'dinsex','sexcum'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have grab your legs and let him fuck you. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 5:
-				act 'Further':
-					*clr & cla
-					gs 'boyStat', 'A1'
-					silavag = 1
-					dick = 16
-					anala += 1
-					dimasexday = daystart
-					gs 'boyStat', 'A1'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/anal.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your knees and forces your head down against the cushion. You try to get up, but he pushes his hand against your head, stoping that. Then, without caring shove his <<dick>>cm <<$dick_girth>> cock against your asshole. Something quick in your murky mind, and you move your hand between your legs. Dimka slap your hand, stoping you. "Come on slut, show me that you like it".'
-					gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have let him assfuck you. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 6:
-				act 'Further':
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/cum.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. He finally pulls out of your mouth. "Open your mouth bitch." You do as he says, he starts jerking off and soon is filling your mouth with his sperm, spurt after spurt filling your mouth. With the last spurt he wipes the tip of his dick off on your lips.'
-					'Now open your mouth and stick out your tongue, show me my cum on your tongue. You do as you are told and sit there holding that position for some time. Finally, he nods. "Good girl, now swallow." He talks to you as if he was talking to a dog, but you do as he tells you.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have sucked him, and show his cum before drinking it. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			end
-		end
-	end
+	'You take several sips as you talk with Dimka. Again he doesn''t seem to want to chat, and appears to be waiting for something. After a while you start to feel funny. For a moment you just feel numb, then you feel yourself get aroused. The heat coming from your pussy intensifying as it soaks itself. You gasp. It is almost too much to take. You desperately need someone to fuck you. "Oh, fuck". You don''t think this is normal. He must have laced it with something. You blink a few times trying to clear your head, but soon your thoughts grow murky.'
+	act 'Continue': gt 'dimaEv', 'firstvisitsex'
 end
 
 if $ARGS[0] = 'cocaine':
@@ -395,305 +101,194 @@ if $ARGS[0] = 'cocaine':
 	nark += 10
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/shared/drugs/dur.jpg"></center>'
-	'You sniff up the dose of powder. For a moment, you just feel numb, then you feel yourself get aroused, the heat coming from your pussy as it soaks itself, you gasp, it is almost too much to take, you desperately need someone to fuck you. "Oh, fuck". You don''t think this is normal, he must have laced it with something. You blink a few times trying to clear your head, but soon your thoughts grow murky.'
-	act 'continue':
+	'You sniff up the dose of powder. For a moment you just feel numb, then you feel yourself get aroused. The heat coming from your pussy intensifying as it soaks itself. You gasp. It is almost too much to take. You desperately need someone to fuck you. "Oh, fuck". You don''t think this is normal. He must have laced it with something. You blink a few times trying to clear your head, but soon your thoughts grow murky.'
+	act 'Continue': gt 'dimaEv', 'firstvisitsex'
+end
+
+if $ARGS[0] = 'firstvisitsex':
+	*clr & cla
+	pcs_dom += 1
+	minut += 5
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/pre.jpg"></center>'
+	'You hear Dimka chuckling. It takes and eternity to turn your head and center your eyes on him. You see him looking at you intently, examining whatever has affected your brain. "Well, it looks like the drugs have taken full effect on you already." He stands up, unbuttons his pants and pulls out his dick, giving it a couple of strokes to get it hard for you. "Come here, baby, and suck on this." You stand there looking stupidly at his cock. He then sighs and, tapping it, says "Come on slut, here, take your bone."'
+	act 'Suck him':
 		*clr & cla
-		pcs_dom += 1
-		minut += 5
+		bja += 1
+		if maxdra = 0:maxdra = 1
+		if maxdra = 6:maxdra = 5
+		gs 'boyStat', 'A1'
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/pre.jpg"></center>'
-		'You hear Dimka chuckling, it takes and eternity to turn your head and center your eyes at him. You see him looking intently at you, examining whatever have affected your brain. "Well, it looks like the drugs have taken full effect on you already." He stands up and unbuttons his pants and pulls out his dick, giving it a couple of strokes to get it hard for you. "Come here, baby, and suck on this." You stand there looking stupidity to his cock. He then sighed and taping it say "Come on slut, here, take your bone."'
-		act 'Take by mouth':
-			*clr & cla
-			bja += 1
-			if maxdra = 0:maxdra = 1
-			if maxdra = 6:maxdra = 5
-			gs 'boyStat', 'A1'
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/minet.jpg"></center>'
-			'Seeing his hard dick, you almost feel your mouth water. You don''t understand anymore what is happening, but you badly want to suck his cock right now. You walk, stumbling over to Dimka and settle comfortably in front of him, taking his hard, hot dick in your mouth. Your lips slide down the shaft of his <<dick>>cm <<$dick_girth>> cock and start bobbing your head on his rod, while one hand strokes his shaft and the other massages his balls. Your mind is too drugged to have any will or thought anymore.'
-			dimadalrand = rand(0, maxdra)
-			gs 'arousal', 'bj', 15, 'sub'
-			gs 'stat'
-			if dimadalrand = 0:
-				act 'Further':
-					*clr & cla
-					spafinloc = 12
-					gs 'cum_manage'
-					swallow += 1
-					dimasexday = daystart
-					gs 'stat'
-					'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/dimka/sex/bjcum.mp4"></video></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Suddenly, Dimka''s cock spurts cum in your mouth and you continue sucking without care, adding spit to the mess. Finally, Dimka ceases to ejaculate and you instinctively swallow his cum.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have sucked him and drink his cum making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/minet.jpg"></center>'
+		'Seeing his hard dick, you almost feel your mouth water. You don''t understand what is happening anymore, but you want to suck his cock so much right now. You walk, stumbling over, to Dimka and settle comfortably in front of him, taking his hard, hot dick in your mouth. Your lips slide down the shaft of his <<dick>>cm <<$dick_girth>> cock and you start bobbing your head on his rod while one hand strokes his shaft and the other massages his balls. Your mind is too drugged to have any will or thought anymore.'
+		dimadalrand = rand(0, maxdra)
+		gs 'arousal', 'bj', 15, 'sub'
+		gs 'stat'
+		if dimadalrand = 0:
+			act 'Further':
+				*clr & cla
+				spafinloc = 12
+				gs 'cum_manage'
+				swallow += 1
+				dimasexday = daystart
+				gs 'stat'
+				'<center><video autoplay loop src="images/characters/pavlovsk/school/boy/dimka/sex/bjcum.mp4"></video></center>'
+				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Suddenly, Dimka''s cock spurts cum in your mouth and you continue sucking without care, adding spit to the mess. Finally, Dimka ceases to ejaculate and you instinctively swallow his cum.'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Clean up': gt 'dimaEv', 'cleanup'
+			end
+		elseif dimadalrand = 1:
+			act 'Further':
+				*clr & cla
+				spafinloc = 11
+				gs 'cum_manage'
+				facial += 1
+				if maxdra = 1:maxdra = 2
+				dimasexday = daystart
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/face.jpg"></center>'
+				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka suddenly pulls his dick out of your mouth and starts cumming on your face. Hot ropes of sperm land on your cheeks, nose and lips. Soon almost all of your face is covered with warm and sticky cum. You sit there confused, with a gaping mouth, trying to understand what just happen.'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Clean up': gt 'dimaEv', 'cleanup'
+			end
+		elseif dimadalrand = 2:
+			act 'Further':
+				*clr & cla
+				spafinloc = 12
+				gs 'cum_manage'
+				swallow += 1
+				if pcs_throat < 16:pcs_throat += 1
+				if pcs_makeup ! 1:pcs_makeup = 0
+				if maxdra = 2:maxdra = 3
+				dimasexday = daystart
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/sex/facefuck0.jpg"></center>'
+				if pcs_throat < 16:
+					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as if it is the only thing in your little world. Dimka grabs you by the hair and pulls you onto his member. His hard <<dick>>cm <<$dick_girth>> cock enters your throat, you choke but are too confused to really do anything about it. Dimka doesn''t pay any attention to your distress, and in fact, seems to enjoy your gagging sounds. he just fucks your mouth with his hard cock. Finally the torture ends and he fills your mouth with his hot slimy sperm that you instinctively swallow.'
+				else
+					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as if it is the only thing in your little world. Dimka grabs you by the hair and pulls you onto his member. His hard <<dick>>cm <<$dick_girth>> cock enters your throat, you resist gagging, but are too confused to really understand what he is doing. Dimka enjoys the fact that he can push his hard cock to the back of your throat and relentlessly fucks your mouth. Finally the torture ends and he cums his hot slimy sperm that you instinctively swallow.'
 				end
-			elseif dimadalrand = 1:
+				gs 'arousal', 'end'
+				gs 'pain', 2, 'throat', 'stretch'
+				gs 'stat'
+				act 'Clean up': gt 'dimaEv', 'cleanup'
+			end
+		elseif dimadalrand = 3:
+			act 'Further':
+				*clr & cla
+				if maxdra = 3:maxdra = 4
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sit.jpg"></center>'
+				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka takes his dick out of your mouth and makes you get on the bed. He straddles your chest, making you suffocate under the added weight. Then, he puts his cock in your face and begins giving you little dick slaps. "Come on slut, suck like a porn star". You start to lick his balls while Dimka masturbates in your face.'
 				act 'Further':
 					*clr & cla
 					spafinloc = 11
 					gs 'cum_manage'
 					facial += 1
-					if maxdra = 1:maxdra = 2
-					dimasexday = daystart
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/face.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka suddenly pulls his dick out of your mouth and starts cumming on your face. Hot ropes of sperm land on the cheeks, nose and lips. Soon almost your entire face is covered with warm and sticky cum. You sit there confused, with a gaping mouth, trying to understand what just happen.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have sucked him and has been drenched in his cum making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 2:
-				act 'Further':
-					*clr & cla
-					spafinloc = 12
-					gs 'cum_manage'
-					swallow += 1
-					if pcs_throat < 16:pcs_throat += 1
-					if pcs_makeup ! 1:pcs_makeup = 0
-					if maxdra = 2:maxdra = 3
-					dimasexday = daystart
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/arthur/sex/facefuck0.jpg"></center>'
-					if pcs_throat < 16:
-						'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka grabs you by the hair and pulls you onto his member. His hard <<dick>>cm <<$dick_girth>> cock enters your throat, you choke but are to confused to really do anithing about it. Dimka doesn''t pay any attention to your distress, and in fact, seems to enjoy your gagging sound. he just fucks your mouth with his hard cock. Finally the torture ends and he fills your mouth with his hot slimy sperm that you instinctively swallow.'
-					else
-						'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka grabs you by the hair and pulls you onto his member. His hard <<dick>>cm <<$dick_girth>> cock enters your throat, you resist gagging, but are to confused to really understand what he is doing. Dimka enjoy the fact that he can push his hard cock to the back of your troath and relentless fuck your mouth. Finally the torture ends and he cums his hot slimy sperm that you instinctively swallow.'
-					end
-					gs 'arousal', 'end'
-					gs 'pain', 2, 'throat', 'stretch'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have been skull fucked and drink all his cum making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 3:
-				act 'Further':
-					*clr & cla
-					if maxdra = 3:maxdra = 4
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sit.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka takes his dick out of your mouth and makes you get on the bed. He straddles your chest, making you suffocate under the added weight. Then, put his cock in your face and begin giving you little dick slaps. "Come on slut, suck like a porn star". You start to lick his balls while Dimka masturbates in your face.'
-					act 'Further':
-						*clr & cla
-						spafinloc = 11
-						gs 'cum_manage'
-						facial += 1
-						dimasexday = daystart
-						gs 'stat'
-						'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sitcum.jpg"></center>'
-						'Suddenly, Dimka''s cock starts spurting out jets of hot cum that splatter on your face, covering it in thick, viscous slime. He sighs with relief and fall in the bed, relieving the pressure in your chest and letting you breathe. With a contented smile he spread his cum around your confused face.'
-						gs 'arousal', 'end'
-						gs 'stat'
-						act 'Clean up':
-							cla
-							*clr
-							minut += 5
-							dimaFilm = 1
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/seeporn.jpg"></center>'
-							'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-							'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-							*nl
-							'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have licked his balls and let him cum in your face, making a mess in the process. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-							'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-							act 'Run out of his house': gt 'pavResidential'
-							act 'Plead':
-								cla
-								*clr
-								minut += 5
-								'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-								'<center><img src="images/pc/tears1.jpg"></center>'
-								'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-								act 'Run out of his house': gt 'pavResidential'
-							end
-						end
-					end
-				end
-			elseif dimadalrand = 4:
-				act 'Further':
-					*clr & cla
-					gs 'boyStat', 'A1'
-					silavag = 1
-					dick = 16
-					if maxdra = 4:maxdra = 5
-					sexa += 1
-					dimasexday = daystart
-					gs 'boyStat', 'A1'
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/sex2.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your back, your head against the back and the ass nearly hanging off. He lifts your legs up and pushes them forward till they are resting against your body. You try to get up from the awkward position, but he gives your exposed ass a slap. "Come on slut, fuck like a porn star". Grabbing your legs you complain. He presses the head of his <<dick>>cm <<$dick_girth>> dick up against the slit of your pussy and with a triumphant smile push.'
-					gs 'dinsex', 'boy_puts_condom'
-					gs 'dinsex','vaginal_sex',10
-					gs 'dinsex','sexcum'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have grab your legs and let him fuck you. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 5:
-				act 'Further':
-					*clr & cla
-					gs 'boyStat', 'A1'
-					silavag = 1
-					dick = 16
-					anala += 1
 					dimasexday = daystart
-					gs 'boyStat', 'A1'
 					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/anal.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your knees and forces your head down against the cushion. You try to get up, but he pushes his hand against your head, stoping that. Then, without caring shove his <<dick>>cm <<$dick_girth>> cock against your asshole. Something quick in your murky mind, and you move your hand between your legs. Dimka slap your hand, stoping you. "Come on slut, show me that you like it.'
-					gs 'dinSex','boy_wants_anal','lubri' & gs 'dinsex','analsex'
+					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/sitcum.jpg"></center>'
+					'Suddenly, Dimka''s cock starts spurting out jets of hot cum that splatter on your face, covering it in thick, viscous slime. He sighs with relief and falls on the bed, relieving the pressure in your chest and letting you breathe. With a contented smile he spreads his cum all over your confused face.'
 					gs 'arousal', 'end'
 					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have let him assfuck you. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
-				end
-			elseif dimadalrand = 6:
-				act 'Further':
-					*clr & cla
-					gs 'stat'
-					'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/cum.jpg"></center>'
-					'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. He finally pulls out of your mouth. "Open your mouth bitch." You do as he says, he starts jerking off and soon is filling your mouth with his sperm, spurt after spurt filling your mouth. With the last spurt he wipes the tip of his dick off on your lips.'
-					'Now open your mouth and stick out your tongue, show me my cum on your tongue. You do as you are told and sit there holding that position for some time. Finally, he nods. "Good girl, now swallow." He talks to you as if he was talking to a dog, but you do as he tells you.'
-					gs 'arousal', 'end'
-					gs 'stat'
-					act 'Clean up':
-						cla
-						*clr
-						minut += 5
-						dimaFilm = 1
-						'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-						'<center><img src="images/pc/seeporn.jpg"></center>'
-						'As your thoughts get more clear and begin to get cleaned up, it seems that he is checking something on his computer. As you are finishing dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
-						'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
-						*nl
-						'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turn on the tv. And before you know it, you see Dimka an you on the tv, he has recorded all what have been happening. Who you have sucked him, and show his cum before drinking it. And all the while with a dopey smile in your face. You are shocked. Once he see that you understand he adds, "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house get this video."'
-						'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
-						act 'Run out of his house': gt 'pavResidential'
-						act 'Plead':
-							cla
-							*clr
-							minut += 5
-							'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
-							'<center><img src="images/pc/tears1.jpg"></center>'
-							'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
-							act 'Run out of his house': gt 'pavResidential'
-						end
-					end
+					act 'Clean up': gt 'dimaEv', 'cleanup'
 				end
 			end
+		elseif dimadalrand = 4:
+			act 'Further':
+				*clr & cla
+				gs 'boyStat', 'A1'
+				silavag = 1
+				dick = 16
+				if maxdra = 4:maxdra = 5
+				sexa += 1
+				dimasexday = daystart
+				gs 'boyStat', 'A1'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/shared/sex/vag/miss/sex2.jpg"></center>'
+				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your back, your head against the back and your ass nearly hanging off. He lifts your legs up and pushes them forward until they are resting against your body. You try to get up from the awkward position, but he gives your exposed ass a slap. "Come on slut, fuck like a porn star". Grabbing your legs you complain. He presses the head of his <<dick>>cm <<$dick_girth>> dick against the slit of your pussy and with a triumphant smile pushes himself inside.'
+				gs 'dinsex', 'boy_puts_condom'
+				gs 'dinsex','vaginal_sex',10
+				gs 'dinsex','sexcum'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Clean up': gt 'dimaEv', 'cleanup'
+			end
+		elseif dimadalrand = 5:
+			act 'Further':
+				*clr & cla
+				gs 'boyStat', 'A1'
+				silavag = 1
+				dick = 16
+				anala += 1
+				dimasexday = daystart
+				gs 'boyStat', 'A1'
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/anal.jpg"></center>'
+				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. Dimka puts you on the sofa on your knees and forces your head down against the cushion. You try to get up, but he pushes his hand against your head, stopping you from moving. Then, without caring he shoves his <<dick>>cm <<$dick_girth>> cock against your asshole. Something sparks in your murky mind, and you reflexively move your hand between your legs. Dimka slap your hand away, stopping you. "Come on slut, show me that you like it".'
+				gs 'dinSex','boy_wants_anal' & gs 'dinsex','analsex'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Clean up': gt 'dimaEv', 'cleanup'
+			end
+		elseif dimadalrand = 6:
+			act 'Further':
+				*clr & cla
+				gs 'stat'
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/cum.jpg"></center>'
+				'Your sense of time seems altered, minutes?, hours?, it doesn''t seem to be important, you just keep sucking his cock as it is the only thing in your little world. He finally pulls out of your mouth. "Open your mouth bitch." You do as he says. He starts jerking off and soon fills your mouth with his sperm, spurt after spurt landing on your tongue. With the last spurt he wipes the tip of his dick on your lips.'
+				'Now open your mouth and stick out your tongue, show me my cum on your tongue. You do as you are told and sit there holding that position for some time. Finally, he nods. "Good girl, now swallow." He talks to you as if he was talking to a dog, but you do as he tells you.'
+				gs 'arousal', 'end'
+				gs 'stat'
+				act 'Clean up': gt 'dimaEv', 'cleanup'
+			end
 		end
 	end
 end
 
+
+if $ARGS[0] = 'cleanup':
+	*clr & cla
+	minut += 5
+	dimaFilm = 1
+	'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
+	'<center><img src="images/pc/seeporn.jpg"></center>'
+	'As your thoughts get more clear and you begin to get cleaned up, it seems that he is checking something on his computer. As you finish dressing he smirks at you. "Now you''re mine, you little fucking slut. I own your ass, you got it!"'
+	'At first you think he might just be joking, but then you realize he is serious. "What are you talking about?"'
+	*nl
+	'An evil grin plays across his face. "I''m glad you asked." Then he picks up a remote and turns on the tv. And before you know it, you see Dimka and you on the tv, he has recorded everything that happened.'
+	if dimadalrand = 0:
+		'How you sucked him off and drank his cum making a mess in the process. With a dopey smile in your face the entire time.'
+	elseif dimadalrand = 1:
+		'How you sucked him off and were drenched in his cum, making a mess in the process. With a dopey smile in your face the entire time.'
+	elseif dimadalrand = 2:
+		'How you were skullfucked and drank all his cum making a mess in the process. With a dopey smile in your face the entire time.'
+	elseif dimadalrand = 3:
+		'How you licked his balls and let him cum in your face, making a mess in the process. With a dopey smile in your face the entire time.'
+	elseif dimadalrand = 4:
+		'How you grabbed your legs and let him fuck you. With a dopey smile in your face the entire time.'
+	elseif dimadalrand = 5:
+		'How you let him assfuck you. With a dopey smile in your face the entire time.'
+	elseif dimadalrand = 6:
+		'How you sucked him off and showed his cum before drinking it. With a dopey smile in your face the entire time.'
+	end
+	'You are shocked. Once he sees that you understand he adds: "If you don''t do as I say and come by here once a week to see to my needs, I will make sure everyone in school and your house gets this video."'
+	'At his threat, your blood runs cold and you go pale, you know what this would mean to your reputation, not counting how your mother would react.'
+	act 'Run out of his house': gt 'pavResidential'
+	act 'Plead': gt 'dimaEv', 'plead'
+end
+
+if $ARGS[0] = 'plead':
+	*clr & cla
+	minut += 5
+	'<center><h4><font color="maroon">Dimka''s Room</font></h4></center>'
+	'<center><img src="images/pc/tears1.jpg"></center>'
+	'You start begging and pleading him not to do this and to give you the video. But laughter is all the confirmation you need that, no matter what you say he won''t give it to you. Tears begin to spill from your eyes, as you realize you''re trapped and powerless, a plaything for him, as long as that video exists. Not knowing what else to do, you gather your stuff and run out of his house, his laughter echoes in your ears.'
+	act 'Run out of his house': gt 'pavResidential'
+end
+
 if $ARGS[0] = 'blackmail':
 	*clr & cla
 	gs 'stat'
@@ -796,34 +391,11 @@ end
 
 if $ARGS[0] = 'dimkaplays2':
 	dimasexday = daystart
-
 	dimadalrand = rand(0,10)
-	if dimadalrand = 0:
-		act 'Further':gt 'dimaEv', '0'
-	elseif dimadalrand = 1:
-		act 'Further':gt 'dimaEv', '1'
-	elseif dimadalrand = 2:
-		act 'Further':gt 'dimaEv', '2'
-	elseif dimadalrand = 3:
-		act 'Further':gt 'dimaEv', '3'
-	elseif dimadalrand = 4:
-		act 'Further':gt 'dimaEv', '4'
-	elseif dimadalrand = 5:
-		act 'Further':gt 'dimaEv', '5'
-	elseif dimadalrand = 6:
-		act 'Further':gt 'dimaEv', '6'
-	elseif dimadalrand = 7:
-		act 'Further':gt 'dimaEv', '7'
-	elseif dimadalrand = 8:
-		act 'Further':gt 'dimaEv', '8'
-	elseif dimadalrand = 9:
-		act 'Further':gt 'dimaEv', '9'
-	elseif dimadalrand = 10:
-		act 'Further':gt 'dimaEv', '10'
-	end
+	gt 'dimaEv', 'dimkaabuse<<dimadalrand>>'
 end
 
-if $ARGS[0] = '0':
+if $ARGS[0] = 'dimkaabuse0':
 	*clr & cla
 	gs 'pain', 2, 'armR', 'bind'
 	gs 'pain', 2, 'armL', 'bind'
@@ -854,7 +426,7 @@ if $ARGS[0] = '0':
 	end
 end
 
-if $ARGS[0] = '1':
+if $ARGS[0] = 'dimkaabuse1':
 	*clr & cla
 	if maxdradrug = 1:maxdradrug = 2
 	spafinloc = 12
@@ -870,7 +442,7 @@ if $ARGS[0] = '1':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '2':
+if $ARGS[0] = 'dimkaabuse2':
 	*clr & cla
 	gs 'boyStat', 'A1'
 	silavag = 1
@@ -889,7 +461,7 @@ if $ARGS[0] = '2':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '3':
+if $ARGS[0] = 'dimkaabuse3':
 	*clr & cla
 	gs 'boyStat', 'A1'
 	silavag = 1
@@ -904,7 +476,7 @@ if $ARGS[0] = '3':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '4':
+if $ARGS[0] = 'dimkaabuse4':
 	*clr & cla
 	if pcs_makeup ! 1:pcs_makeup = 0
 	pcs_throat += 5
@@ -918,7 +490,7 @@ if $ARGS[0] = '4':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '5':
+if $ARGS[0] = 'dimkaabuse5':
 	*clr & cla
 	spank += 1
 	minut += 15
@@ -932,7 +504,7 @@ if $ARGS[0] = '5':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '6':
+if $ARGS[0] = 'dimkaabuse6':
 	*clr & cla
 	if maxdradrug = 6:maxdradrug = 7
 	if pcs_makeup ! 1:pcs_makeup = 0
@@ -955,7 +527,7 @@ if $ARGS[0] = '6':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '7':
+if $ARGS[0] = 'dimkaabuse7':
 	*clr & cla
 	gs 'pain', 9, 'pierce', 'tongue'
 	if maxdradrug = 7:maxdradrug = 8
@@ -964,18 +536,18 @@ if $ARGS[0] = '7':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/ton.jpg"></center>'
 	'Dimka binds you until you are fully immobilized. "As a slut, you have a dirty tongue. That can''t be, you must be clean for me. So..I am going to teach you a lesson in personal hygiene." You try to recoil in horror at the needles in his hands, but you are trapped. He grabs hold of your tongue and suddenly pushes a needle through it. You squeal and twitch from the sharp pain. Dimka amuses himself by sticking needles through your tongue, lips and cheeks. The more you howl in pain, the more excited he gets.'
-	if pirsA > 0:'When he tire out. Dimka pulls the needles out of your tongue and sets you free.'
+	if pirsA > 0:'When he gets bored of watching you in pain, Dimka pulls the needles out of your tongue and sets you free.'
 	if pirsA = 0:
 		pirsA = 1
 		pirsA1_owned = 1
 		pierWearCount += 1
-		'When he tire out. Dimka pulls the needles, pierces your tongue with a metal bar, then sets you free'
+		'When he gets bored of watching you in pain, Dimka pulls the needles, pierces your tongue with a metal bar, then sets you free'
 		pierCount += 1
 	end
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '8':
+if $ARGS[0] = 'dimkaabuse8':
 	*clr & cla
 	gs 'pain', 9, 'pierce', 'labia'
 	if pcs_makeup ! 1:pcs_makeup = 0
@@ -983,18 +555,18 @@ if $ARGS[0] = '8':
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/boy/dimka/sex/vag.jpg"></center>'
 	'Dimka binds you until you are fully immobilized. "You know, a lot of people think that a piercing in the cunt enhances the pleasure during sex..Something about more blood flow..So..I was thinking, that you as my personal fucktoy need a little encouragement to come here..So let''s begin." Then he picks up a safety pin and pricks your labia. You howled at the sharp unbearable pain, struggling against your bonds, but Dimka does not calm down until he has sealed your entire vagina with safety pins.'
-	if pirsG > 0:'When he tire out. Dimka takes the pins out of your pussy and sets you free.'
+	if pirsG > 0:'When he gets bored of watching you in pain, Dimka takes the pins out of your pussy and sets you free.'
 	if pirsG = 0:
 		pirsG = 1
 		pirsG1_owned = 1
 		pierWearCount += 1
-		'When he tire out. Dimka takes the pins out of your pussy, pierces your clitoris, then sets you free'
+		'When he gets bored of watching you in pain, Dimka takes the pins out of your pussy, pierces your clitoris, then sets you free'
 		pierCount += 1
 	end
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '9':
+if $ARGS[0] = 'dimkaabuse9':
 	*clr & cla
 	bja += 1
 	spafinloc = 12
@@ -1013,7 +585,7 @@ if $ARGS[0] = '9':
 	act 'Leave':gt 'pavResidential'
 end
 
-if $ARGS[0] = '10':
+if $ARGS[0] = 'dimkaabuse10':
 	*clr & cla
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/school/head/1.jpg"></center>'

locations/dinSex.qsrc

@@ -909,24 +909,45 @@ $analsexrude = {
 if $ARGS[0] = 'boy_puts_condom':
 	protect = iif(prezik > 0,1,0)
 	vidageday -= 1 &! the people guess that you are a bit more older than you are in fact
-	! do you have condoms?
-	if prezik > 0:
-		if rand(1,prezik) <= badprezik: 
-			badprezik -= 1
-			noprotect = 1
-			sexcontra = 7
-			*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and puts it on <<$xyr>> <<dick>> centimeter dick.'
+	if $ARGS[1] = '':
+		! do you have condoms?
+		if prezik > 0:
+			if rand(1,prezik) <= badprezik: 
+				badprezik -= 1
+				noprotect = 1
+				sexcontra = 7
+				*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and puts it on <<$xyr>> <<dick>> centimeter dick.'
+			else
+				sexcontra = 3
+				*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your condom and puts it on <<$xyr>> <<dick>> centimeter dick.'
+				noprotect = 0
+			end
+			prezik -= 1
+			sexcontra = iif(preziktype = 2,7,sexcontra) 
 		else
-			sexcontra = 3
-			*p '<<ucase(mid($boydesc,1,1))>><<mid($boydesc,2,len($boydesc)-1)>> takes your condom and puts it on <<$xyr>> <<dick>> centimeter dick.'
-			noprotect = 0
+			sexcontra = 0
+			!! the hormonal contraception is still taken in account
 		end
-		prezik -= 1
-		sexcontra = iif(preziktype = 2,7,sexcontra) 
 	else
-		sexcontra = 0
-		!! the hormonal contraception is still taken in account
-	end
+		$custmsg = $ARGS[1]
+		*p '<<$custmsg>>'
+		! do you have condoms?
+		if prezik > 0:
+			if rand(1,prezik) <= badprezik: 
+				badprezik -= 1
+				noprotect = 1
+				sexcontra = 7
+			else
+				sexcontra = 3
+				noprotect = 0
+			end
+			prezik -= 1
+			sexcontra = iif(preziktype = 2,7,sexcontra) 
+		else
+			sexcontra = 0
+			!! the hormonal contraception is still taken in account
+		end
+	end	
 end &! --- boy_puts_condom ---
 
 !! gs 'dinsex', 'boy_puts_his_condom'[, $boydesc]
@@ -942,23 +963,44 @@ end &! --- boy_puts_his_condom ---
 if $ARGS[0] = 'pc_puts_condom':
 	protect = iif(prezik > 0,1,0)
 	vidageday -= 1 &! the people guess that you are a bit more older than you are in fact
-	! do you have condoms?
-	if prezik > 0:
-		if rand(1,prezik) <= badprezik: 
-			badprezik -= 1
-			noprotect = 1
-			sexcontra = 7
-			*p 'You take your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and put it on <<$xyr>> <<dick>> centimeter dick.'
+	if $ARGS[1] = '':
+		! do you have condoms?
+		if prezik > 0:
+			if rand(1,prezik) <= badprezik: 
+				badprezik -= 1
+				noprotect = 1
+				sexcontra = 7
+				*p 'You take your '+iif(preziktype = 2,'sabotaged ','')+ 'condom and put it on <<$xyr>> <<dick>> centimeter dick.'
+			else
+				sexcontra = 3
+				*p 'You take your condom and put it on <<$xyr>> <<dick>> centimeter dick.'
+				noprotect = 0
+			end
+			prezik -= 1
+			sexcontra = iif(preziktype = 2,7,sexcontra) 
 		else
-			sexcontra = 3
-			*p 'You take your condom and put it on <<$xyr>> <<dick>> centimeter dick.'
-			noprotect = 0
+			sexcontra = 0
+			!! the hormonal contraception is still taken in account
 		end
-		prezik -= 1
-		sexcontra = iif(preziktype = 2,7,sexcontra) 
 	else
-		sexcontra = 0
-		!! the hormonal contraception is still taken in account
+		$custmsg = $ARGS[1]
+		*p '<<$custmsg>>'
+		! do you have condoms?
+		if prezik > 0:
+			if rand(1,prezik) <= badprezik: 
+				badprezik -= 1
+				noprotect = 1
+				sexcontra = 7
+			else
+				sexcontra = 3
+				noprotect = 0
+			end
+			prezik -= 1
+			sexcontra = iif(preziktype = 2,7,sexcontra) 
+		else
+			sexcontra = 0
+			!! the hormonal contraception is still taken in account
+		end
 	end
 end &! --- pc_puts_condom ---
 
@@ -1074,7 +1116,7 @@ end
 if $ARGS[0] = 'analsex':
 	frost = 0 &! the sex heats
 	'<<$boydesc>> tucks a finger into your anus, then a second one .'
-	if pcs_ass < 10:'When <<$xec>> inserts three fingers into your ass you groan in pain.'
+	if pcs_ass < 10:'When <<$xe>> inserts three fingers into your ass you groan in pain.'
 	if pcs_ass >= 10:'<<$xec>> starts to stretch your anus with three fingers.'
 	*p '<<$boydesc>> pulls <<$xyr>> fingers out of your ass and you feel '
 	if rand(0,1)=0: '<<$xyr>> hard cock near your hole.' else '<<$xem>> pushing <<$xyr>> hard cock into your hole.'

locations/din_bad.qsrc

@@ -167,6 +167,13 @@ if $ARGS[0] = 'd_bag':
 	if aphrodisiac_have > 0:'<a href="exec:dynamic $use_aphrodisiac & gs ''din_bad'', ''d_bag''">Chew aphrodisiac gum.</a> You have <b><<aphrodisiac_have>></b> gum left in your purse.'
 
 	if lubri > 0:'There''s a tube of lubricant in your purse, enough for <b><<lubri>></b> applications.'
+	if refillable_bottle = 3: 
+		'You carry your sports water bottle in your purse. It''s still completely full. <a href="exec: refillable_bottle = 2 & pcs_hydra += 75 & cumspclnt = 2 & gs ''cum_cleanup'' & gs ''stat'' & gs ''din_bad'', ''d_bag''">Drink</a>'
+	elseif refillable_bottle = 2:
+		'You carry your sports water bottle in your purse. It''s half full. <a href="exec: refillable_bottle = 1 & pcs_hydra += 75 & cumspclnt = 2 & gs ''cum_cleanup'' & gs ''stat'' & gs ''din_bad'', ''d_bag''">Drink</a>'
+	elseif refillable_bottle = 1:
+		'You carry your sports water bottle in your purse. It''s empty.'
+	end
 	if bottle > 0: 'There''s a bottle of water in your purse. <a href="exec:bottle = 0 & pcs_hydra += 100 & cumspclnt = 2 & gs ''cum_cleanup'' & gs ''stat'' & gs ''din_bad'', ''d_bag''">Drink</a>'
 	if buterbrod > 0: 'There''s a sandwich in your purse. <a href="exec:buterbrod = 0 & pcs_energy += 40 & cumspclnt = 2 & gs ''cum_cleanup'' & fat += 1 & gs ''stat'' & gs ''din_bad'', ''d_bag''">Eat</a>'
 	if wine = 1 and alkowine = 0:'There''s a bottle of <a href="exec:dynamic $dinalkowin1">wine</a> in your purse.'
@@ -369,8 +376,8 @@ $d_tabletkied = {
 	'<center><table cellspacing="0" cellpadding="20" valign="top"><tr>'
 	'<td cellspacing="0" cellpadding="0" valign="top">'
 	tabloc = 0
-	if tabletkiday < daystart: '<a href="exec:dynamic $d_tabletkieda, 1">Take the birth control pill now.</a>'
-	if tabletkicheck = 0:
+	if tabletkiday < daystart and thinkpreg = 0 and knowpreg = 0: '<a href="exec:dynamic $d_tabletkieda, 1">Take the birth control pill now.</a>'
+	if tabletkicheck = 0 and thinkpreg = 0 and knowpreg = 0:
 		'<a href="exec:dynamic $d_tabletkieda, 2">Automatically take your birth control pills.</a>'
 	elseif tabletkicheck = 1:
 		'<a href="exec:dynamic $d_tabletkieda, 3">Stop automatically taking your birth control pills.</a>'
@@ -387,8 +394,8 @@ $d_tabletkiedt = {
 	'<center><img <<$set_imgh>> src="images/shared/home/bedroom/stol.jpg"></center>'
 	*nl
 	tabloc = 1
-	if tabletkiday < daystart: '<a href="exec:*clr & dynamic $d_tabletkieda, 1">Take the birth control pill now.</a>'
-	if tabletkicheck = 0:
+	if tabletkiday < daystart and thinkpreg = 0 and knowpreg = 0: '<a href="exec:*clr & dynamic $d_tabletkieda, 1">Take the birth control pill now.</a>'
+	if tabletkicheck = 0 and thinkpreg = 0 and knowpreg = 0:
 		'<a href="exec:*clr & dynamic $d_tabletkieda, 2">Automatically take your birth control pills.</a>'
 	elseif tabletkicheck = 1:
 		'<a href="exec:*clr & dynamic $d_tabletkieda, 3">Stop automatically taking your birth control pills.</a>'

locations/din_van.qsrc

@@ -15,6 +15,7 @@ $showerdin = {
 	gs 'cum_cleanup'
 	pcs_hairbsh = 0
 	pcs_makeup = 1
+	lactation['lactmess'] = 0
 	if pcs_sweat > 10: pcs_sweat = 10 + rand(0,4)
 	if false_lashes >= 1:
 		if rand(0,4) <= 2:
@@ -32,8 +33,7 @@ $bteeth = {
 	if pcs_breath ! 1 or cumloc[12] = 1:
 		act 'Brush your teeth (0:05)':
 		menu_off = 1
-			cla
-			*clr
+			*clr & cla
 			minut += 5
 			cumspclnt = 2
 			gs 'cum_cleanup'
@@ -66,7 +66,7 @@ $shower = {
 
 		if frost > 0:frost = 0
 
-		'<center><video src="images/shared/home/bathroom/dush.mp4"></center>'
+		'<center><video autoplay loop src="images/shared/home/bathroom/dush.mp4"></center>'
 		*nl
 		'You undress and turn on the water in the shower. When it hits the right temperature you enter the shower and let the warm water rain down on you.'
 		if daystart < 10 and (StoryLine = 0 or (StoryLine = 1 and csb_start = 1)) and ntstart = 0:
@@ -102,7 +102,7 @@ $shower = {
 			end
 		end
 		
-		if lactation['active'] > 0 and pain['nipples'] < 60 and pcs_knowsaboutlactation <= 0:
+		if lactation['active'] > 0 and pain['nipples'] < 60 and lactation['pc_aware'] <= 0:
 			if pcs_usedbreastpumponherself > 0 and pcs_massagedherbreasts <= 0:
 				'During showering you clean your breasts and something catches your eye. White drops come from your nipples. It is milk.<br>Using the breast pump regularily probably made you lactate!'
 				lactation['induced'] = 1
@@ -123,16 +123,15 @@ $shower = {
 			end
 			pcs_usedbreastpumponherself = 0
 			pcs_massagedherbreasts = 0
-			pcs_knowsaboutlactation = 1
+			lactation['pc_aware'] = 1
 		end
 
 		if pcs_horny >= 40:
 			act 'Use the shower head on your pussy':
 				menu_off = 1
-				cla
-				*clr
+				*clr & cla
 				if rand(0, 5) = 0 and obdysh = 1:gt 'vann', 'v4'
-				'<center><video src="images/shared/home/bathroom/wash2.mp4"></center>'
+				'<center><video autoplay loop src="images/shared/home/bathroom/wash2.mp4"></center>'
 				*nl
 				'You place the shower head onto your pussy and a powerful jet of warm water begins to caress you.'
 
@@ -153,6 +152,10 @@ $shower = {
 				dynamic $dryOff
 			end
 		end
+		
+		act 'Take a selfie':
+			gs 'telefon', 'Phone_selfie_image_bathing', 'shower'
+		end
 
 		dynamic $dryOff
 		dynamic $brit
@@ -162,8 +165,7 @@ $shower = {
 $bath = {
 	act 'Soak in the bath (0:30)':
 		menu_off = 1
-		cla
-		*clr
+		*clr & cla
 		shampoo -= 1
 		minut += 30
 		pcs_sweat = 7 + rand(0,4)
@@ -177,7 +179,11 @@ $bath = {
 
 		if frost > 0:frost = 0
 
-		pcs_skin += 1
+		if bath_daystart ! daystart:
+			bath_daystart = daystart
+			pcs_skin += rand(1,2)
+		end
+		
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/shared/home/bathroom/wash4.jpg"></center>'
 		*nl
@@ -209,12 +215,11 @@ $bath = {
 
 		act '"Wash" your pussy':
 			menu_off = 1
-			cla
-			*clr
+			*clr & cla
 			if obdysh = 1 and rand(0, 5) = 1:gt 'vann', 'v4'
 			minut += 10
 
-			'<center><video src="images/shared/home/bathroom/wash7.mp4"></center>'
+			'<center><video autoplay loop src="images/shared/home/bathroom/wash7.mp4"></center>'
 			*nl
 			'You turn on the faucet, lift your legs and scoot your ass over to align your pussy with the jet of warm water. It feels really good and soon a warmth begins to grow in your abdomen.'
 
@@ -227,6 +232,10 @@ $bath = {
 
 			dynamic $dryOff
 		end
+		
+		act 'Take a selfie':
+			gs 'telefon', 'Phone_selfie_image_bathing', 'bath'
+		end
 
 		dynamic $dryOff
 		dynamic $brit
@@ -257,7 +266,7 @@ $brit = {
 					stanok -= 2
 					if obdysh = 1 and rand(0, 5) = 0:gt 'vann', 'brit1'
 					if $loc ='Gadbana':
-						'<center><video src="images/shared/home/bathroom/shave.mp4"></center>'
+						'<center><video autoplay loop src="images/shared/home/bathroom/shave.mp4"></center>'
 					else
 						'<center><img <<$set_imgh>> src="images/shared/home/bathroom/shave3.jpg"></center>'
 					end
@@ -392,8 +401,7 @@ $tampon = {
 	if sanpad > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprokp = 0 and isprok = 0 and $pantyworntype ! 'none' and knowpreg = 0:
 		act 'Use a sanitary pad (0:05)':
 			menu_off = 1
-			cla
-			*clr
+			*clr & cla
 			sanpad -= 1
 			isprokp = 1
 			minut += 5
@@ -407,8 +415,7 @@ $tampon = {
 	if tampon > 0 and (mesec > 0 or (placebopart > 2 and pillcon < 40000)) and isprok = 0 and isprokp = 0 and knowpreg = 0:
 		act 'Use a tampon (0:05)':
 			menu_off = 1
-			cla
-			*clr
+			*clr & cla
 			tampon -= 1
 			isprok = 1
 			minut += 5
@@ -425,8 +432,7 @@ $quickwash = {
 	if spdirty > 0:
 		act 'Quick wash (0:15)':
 			menu_off = 1
-			cla
-			*clr
+			*clr & cla
 
 			cumspclnt = 4
 			gs 'cum_cleanup'
@@ -653,8 +659,7 @@ $basin = {
 }
 
 $pir_title = {
-	cla
-	*clr
+	*clr & cla
 	'<center><b>Available piercings - select one by clicking the image</b></center>'
 	*nl
 }
@@ -675,7 +680,7 @@ $pirLip = {
 	:looplip_pir
 		if dyneval('RESULT = PirsB<<i>>_owned') = 1:*p '<a href="exec:pirsB = <<i>> & pierWearCount += 1 & dynamic $pirManage"><img src="images/pc/body/piercings/b<<i>>.jpg"	height="250" ></a>'
 		i += 1
-	if i <= 6:jump 'looplip_pir'
+	if i <= 7:jump 'looplip_pir'
 }
 
 $pirEars = {
@@ -1062,7 +1067,7 @@ if $ARGS[0] = 'private':
 			minut += 5
 			pregtest -= 1
 			gs 'stat'
-			 if pregchem > 120 and bimbolevel < 3 and knowpreg = 0 and huband = 0 and pregTalkPC = 0:
+			 if pregchem > 120 and bimbolevel < 3 and knowpreg = 0 and huband = 0 and pcs_pregtalk = 0:
 				cla
 				knowpreg = 1
 				thinkpreg = 1
@@ -1071,7 +1076,7 @@ if $ARGS[0] = 'private':
 				act 'Horrified':gt 'din_van', 'HorrifiedReact1'
 				act 'Concerned':gt 'din_van', 'ConcernedReact1'
 				act 'Excited':gt 'din_van', 'ExcitedReact1'
-			elseif pregchem > 120 and bimbolevel = 3 and knowpreg = 0 and huband = 0 and pregTalkPC = 0:
+			elseif pregchem > 120 and bimbolevel = 3 and knowpreg = 0 and huband = 0 and pcs_pregtalk = 0:
 				cla
 				knowpreg = 1
 				thinkpreg = 1
@@ -1079,20 +1084,20 @@ if $ARGS[0] = 'private':
 				'The test shows two strips. You are pregnant. As you look at the test in your hand, you are?'
 				act 'Excited':gt 'din_van', 'ExcitedReact1'
 				act 'Aroused':gt 'din_van', 'ArousedReact1'
-			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid = 0 and pregTalkPC = 0:
+			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid = 0 and pcs_pregtalk = 0:
 				knowpreg = 1
 				thinkpreg = 1
 				gt 'din_van', 'WifeReact1'
-			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid > 0 and pregTalkPC = 0:
+			elseif pregchem > 120 and knowpreg = 0 and huband = 1 and kid > 0 and pcs_pregtalk = 0:
 				knowpreg = 1
 				thinkpreg = 1
 				gt 'din_van', 'WifeReact2'
-			elseif pregTalkPC = 1 and pregchem > 120 and knowpreg = 0:
+			elseif pcs_pregtalk = 1 and pregchem > 120 and knowpreg = 0:
 				*nl
 				knowpreg = 1
 				thinkpreg = 1
 				'The test shows two strips. You are pregnant.'
-			elseif pregTalkPC = 1 or (knowpreg = 1 and preg = 1):
+			elseif pcs_pregtalk = 1 or (knowpreg = 1 and preg = 1):
 				*nl
 				knowpreg = 1
 				thinkpreg = 1
@@ -1110,12 +1115,12 @@ if $ARGS[0] = 'private':
 	!!breast pump is now in the menu, not on the screen
 	if breastpump > 0 and bp_unbox >= 1:
 		act 'Use breast pump':
-			gt 'lact_lib', 'bp_milking'
+			gt 'lact_bp', 'bp_milking'
 		end
 	elseif breastpump > 0 and bp_unbox <= 0:
-		'<a href="exec: gt ''lact_lib'', ''bp_unbox_event''">Unbox</a> your breast pump'
+		'<a href="exec: gt ''lact_bp'', ''bp_unbox_event''">Unbox</a> your breast pump'
 	elseif breastpump <= 0:
-		gs 'lact_lib', 'massage'
+		gs 'lact_bp', 'massage'
 	end
 end
 
@@ -1135,8 +1140,7 @@ if $ARGS[0] = 'misery':
 
 	if husband > 0 and husbanday > 0 and husporday ! daystart and poroshok >= 2:
 		act 'Wash your husbands clothes (2 units of washing powder) (1:00)':
-			cla
-			*clr
+			*clr & cla
 			husband += 5
 			poroshok -= 2
 			minut += 60
@@ -1152,8 +1156,7 @@ if $ARGS[0] = 'misery':
 
 	if husband > 0 and husbanday > 0 and huspolday ! daystart:
 		act 'Clean the apartment (1:00)':
-			cla
-			*clr
+			*clr & cla
 			husband += 5
 			minut += 60
 			huspolday = daystart
@@ -1180,7 +1183,7 @@ end
 if $ARGS[0] = 'HorrifiedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You stare in disbelief at the test in your hand. The two strips displayed can only mean one thing: you are pregnant. You sink to the floor, mind spinning. Tears well in your eyes. How could this happen?'
@@ -1203,7 +1206,7 @@ end
 if $ARGS[0] = 'ConcernedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'Your mind races as you gaze at the test in your hand. The two strips clearly show that you''re pregnant. You know this isn''t the worst thing that could happen to you, but your life is definitely going to change. Are you even ready for that kind of change?'
@@ -1223,7 +1226,7 @@ end
 if $ARGS[0] = 'ExcitedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You''re overcome with glee as you look at the pregnancy test in your hand. Its two strips confirm that your wish has been granted: you are pregnant. You giggle as you clutch the pregnancy test, excited to share the news with everyone you know.'
@@ -1243,28 +1246,26 @@ end
 if $ARGS[0] = 'ArousedReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You rub your thighs together as you stare at the pregnancy test in your hand. The two strips displayed confirm that you’ve been knocked up. You excitedly recount every load of cum blast into your fertile womb, wondering which one found purchase. You gently rub your clit in a circular motion as you think about the fact that, in a few months, everyone who sees your large, pregnant belly will know what a slut you are.'
 		if rape > 0 and stat['vaginal'] > 1 and incest['exp'] = 0:
 			'You pick up speed as you recall your rapist forcefully pumping you full of his wonderful semen without any concern for your desires. You loved having your agency stripped away as a complete stranger decided to make you a mother.'
-			'After several minutes of this you orgasm hard. You spend a moment panting before cleaning up and straightening your clothes. Once you''ve freshened up, you move on with your day, still aroused.'
 		elseif incest['exp'] > 0:
 			'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'
 			'The taboo knowledge that you could have gotten pregnant from incest turns you on even more.'
-			'After several minutes of this you orgasm hard. You spend a moment panting before cleaning up and straightening your clothes. Once you''ve freshened up, you move on with your day, still aroused.'
 		else
-			'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'
-			'After several minutes of this you orgasm hard. You spend a moment panting before cleaning up and straightening your clothes. Once you''ve freshened up, you move on with your day, still aroused.'
+			'You pick up speed as you recall willingly allowing yourself to be pumped full of all of that wonderful semen. Knowing that you would get pregnant filled you with joy every time someone shot rope after rope of their baby batter into you.'	
 		end
+		'After several minutes of this you orgasm hard. You spend a moment panting before cleaning up and straightening your clothes. Once you''ve freshened up, you move on with your day, still aroused.'
 	act 'Finish' :menu_off = 0 & gt $loc, $metka
 end
 
 if $ARGS[0] = 'WifeReact1':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 		'A wide smile spreads across your face as you look down at the pregnancy test. The two strips displayed exclaim that you’re finally starting a family. You begin to shake with excitement as you think about how you are going to tell your husband. Should you just tell him as soon as you see him, or do you want to make it an even more special occasion and tell him over a fancy dinner? Maybe you should just nonchalantly drop the test in front of him to see his reaction. Regardless of how you decide to do it, you can''t keep the excitement to yourself any longer. You take a brief moment to freshen up before leaving the room. '
@@ -1275,7 +1276,7 @@ end
 if $ARGS[0] = 'WifeReact2':
 	menu_off = 1
 	cla
-	pregTalkPC = 1
+	pcs_pregtalk = 1
 	minut += 10
 	*nl
 	'You smile warmly at the test in your hand. You are definitely pregnant again. Your chest swells with joy, knowing that your wonderful family is about to get a little bit larger. You contentedly sigh as you envision your pregnant belly swelling again, proclaiming your motherhood to the world. Having a child is the greatest thing that has ever happened to you, and you’re thrilled at the opportunity to experience it again. You can’t wait any longer to tell your husband. You quickly spruce yourself up before going to share the fantastic news with your spouse.'
@@ -1290,10 +1291,9 @@ end
 
 !!Private bathrooms: One of these text should be randomly selected if using a private restroom, such as one in a home.
 if $ARGS[0] = 'prvt_pee':
-	menu_off = 1
 	act 'Go pee':
-		*clr
-		cla
+		*clr & cla
+		menu_off = 1
 		'<center><img <<$set_imgh>> src="images/pc/pee/pee-private/' + rand(1,19) + '.jpg"></center>'
 		!!Get random pee-private picture
 		rand_pee = rand(0,7)
@@ -1319,8 +1319,7 @@ if $ARGS[0] = 'prvt_pee':
 !!This may require an addition check to see if the PC has a purse since I think they need that to carry tampons with them.
 		if isprok = 1 and tampon > 0:
 			act 'Change tampon':
-				*clr
-				cla
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/pc/pee/period/tampon/' + rand(1,12) + '.jpg"></center>'
 				'Reaching down and taking the string between your fingers, you slowly pull the used tampon from your vagina. You wrap it in toilet paper to be thrown in the trash bin. Opening your purse, you retrieve a fresh one before unpackaging it and carefully inserting it into you.'
 
@@ -1331,8 +1330,7 @@ if $ARGS[0] = 'prvt_pee':
 !!This may require an addition check to see if the PC has a purse since I think they need that to carry pads with them.
 		if isprokp = 1 and sanpad > 0:
 			act 'Change pad':
-				*clr
-				cla
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/pc/pee/period/pad/' + rand(1,6) + '.jpg"></center>'
 				'Checking your pad, you decide it''s time for a new one. You carefully peel it off of your panties before folding it into thirds and setting it aside to be thrown away. Digging in your bag, you pull out a fresh pad, unpackage it, peel off the adhesive strip, and place it into your underwear. Finally, you wrap the wings around the sides of the gusset to make sure it is nice and secure.'
 
@@ -1346,8 +1344,7 @@ end
 
 if $ARGS[0] = 'prvt_pee_end':
 	act 'Finish and wipe':
-		*clr
-		cla
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/pc/pee/wiping/' + rand(1,9) + '.jpg"></center>'
 		rand_pee = rand(0,2)
 		if rand_pee = 0:
@@ -1367,11 +1364,10 @@ end
 
 
 !!Public bathrooms: These texts should be randomly selected if using a public restroom
-if $ARGS[0] = 'pblc_pee':
-	menu_off = 1
+if $ARGS[0] = 'pblc_pee':	
 	act 'Go pee':
-		*clr
-		cla
+		*clr & cla
+		menu_off = 1
 		'<center><img <<$set_imgh>> src="images/pc/pee/pee-public/' + rand(1,11) + '.jpg"></center>'
 		rand_pee = rand(0,7)
 		if rand_pee = 0:
@@ -1394,7 +1390,7 @@ if $ARGS[0] = 'pblc_pee':
 			if rand_pee = 0:
 				'Albina and her Starlettes are a bunch of dirty whores.'
 			elseif rand_pee = 1:
-				'<<$rand_girl>>''s vagina smells like throw-up!'
+				'<<$rand_girl>>''s vagina smells like puke!'
 			elseif rand_pee = 2:
 				'Beware of Dimka! He''s not as nice as he seems!'
 			elseif rand_pee = 3:
@@ -1410,7 +1406,7 @@ if $ARGS[0] = 'pblc_pee':
 			elseif rand_pee = 8:
 				'Tampons vs. Pads, cast your vote! Below this text are hash marks indicating various girl''s preference. One person also wrote “Freebleeder for life!” Ewww.'
 			elseif rand_pee = 9:
-				'Petra’s cock is smaller than my lipstick tube, LOL!'
+				'Petra''s cock is smaller than my lipstick tube, LOL!'
 			elseif rand_pee = 10:
 				'You''re beautiful! Believe that!'
 			elseif rand_pee = 11:
@@ -1442,8 +1438,7 @@ if $ARGS[0] = 'pblc_pee':
 !!This may require an addition check to see if the PC has a purse since I think they need that to carry tampons with them.
 		if isprok = 1 and tampon > 0:
 			act 'Change tampon':
-				*clr
-				cla
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/pc/pee/period/tampon/' + rand(1,12) + '.jpg"></center>'
 				'Reaching down and taking the string between your fingers, you slowly pull the used tampon from your vagina. You wrap it in toilet paper to be thrown in the trash bin. Opening your purse, you retrieve a fresh one before unpackaging it and carefully inserting it into you.'
 
@@ -1455,8 +1450,7 @@ if $ARGS[0] = 'pblc_pee':
 !!This may require an addition check to see if the PC has a purse since I think they need that to carry pads with them.
 		if isprokp = 1 and sanpad > 0:
 			act 'Change pad':
-				*clr
-				cla
+				*clr & cla
 				'<center><img <<$set_imgh>> src="images/pc/pee/period/pad/' + rand(1,6) + '.jpg"></center>'
 				'Checking your pad, you decide it''s time for a new one. You carefully peel it off of your panties before folding it into thirds and setting it aside to be thrown away. Digging in your bag, you pull out a fresh pad, unpackage it, peel off the adhesive strip, and place it into your underwear. Finally, you wrap the wings around the sides of the gusset to make sure it is nice and secure.'
 
@@ -1471,8 +1465,7 @@ end
 
 if $ARGS[0] = 'pblc_pee_end':
 	act 'Finish and wipe':
-		*clr
-		cla
+		*clr & cla
 		'<center><img <<$set_imgh>> src="images/pc/pee/wiping/' + rand(1,9) + '.jpg"></center>'
 		rand_pee = rand(0,6)
 		if rand_pee = 0:

locations/dina.qsrc

@@ -74,6 +74,17 @@ $bodimgsets[26] = 'stocky'
 $bodimgsets[27] = 'heavy set'
 $bodimgsets[28] = 'OOPS'
 $bodimgsets[29] = 'default_high'
+$bodimgsets[30] = 'pregnant, but not showing'
+$bodimgsets[31] = 'glowing'
+$bodimgsets[32] = 'starting to show'
+$bodimgsets[33] = 'clearly showing'
+$bodimgsets[34] = 'fairly pregnant'
+$bodimgsets[35] = 'quite pregnant'
+$bodimgsets[36] = 'very pregnant'
+$bodimgsets[37] = 'extremely pregnant'
+$bodimgsets[38] = 'ready to pop'
+$bodimgsets[39] = 'default_preg'
+
 !!This sets the first 3 sets to not override images 6 and 7
 imgset6ovr[0] = 0
 imgset6ovr[1] = 0
@@ -82,7 +93,7 @@ imgset7ovr[0] = 0
 imgset7ovr[1] = 0
 imgset7ovr[2] = 0
 !!Sets the default image set count if it is 0
-if bodsetcnt <= 0: bodsetcnt = 2
+if bodsetcnt <= 0: bodsetcnt = 3
 
 $week[1] = 'Monday'
 $week[2] = 'Tuesday'

locations/dinfather.qsrc

@@ -579,6 +579,7 @@ if $ARGS[0] = 'garhelpchat':
 end
 
 if $ARGS[0] = 'gardrunkchat':
+	cla
 	menu_off = 1
     'Before you can even ask, your stepfather waves you over: "Oh, <<$pcs_nickname>>! Come join me and Misha, maybe you''ll learn something from your elders!"'
     fatherTalk = rand (1,3)
@@ -590,8 +591,7 @@ if $ARGS[0] = 'gardrunkchat':
         'You sit down and join the older men for a drink. You can tell your stepfather and your uncle are good friends.'
     end
     if pav_slut >= 75 and dyadyamishaevent = 1 and dmishaday ! daystart and fatherandmisha!1:
-        cla
-        *clr
+        *clr & cla
         '<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/vladimir/father.jpg"></center>'
         'Uncle Misha kept staring at you. Suddenly he turns to your stepfather.'
         '"So, Vladimir, did you know your <<$pcs_nickname>> is a <<$gnikname>>?"'
@@ -607,10 +607,10 @@ if $ARGS[0] = 'gardrunkchat':
         'Uncle Misha realizes he''s onto something here, and decides to drive his point home: "Well Vladimir, don''t you think we should do something about it? I think <<$pcs_nickname>> needs to be punished!"'
         'You can see the lust in his eyes. Your stepfather understands perfectly well where he''s going with this, and agrees: "I think you''re right, Misha, <<$pcs_nickname>> does deserve to be punished."'
         act 'Accept whatever punishment they have in mind':gt 'misha','2'
-    elseif dyadyamishaevent = 1 and dmishaday ! daystart and fatherandmisha=1:
+    elseif dyadyamishaevent = 1 and dmishaday ! daystart and fatherandmisha = 1:
         'Uncle Misha grins at your stepfather and runs one hand over his groin, you can already see a significant bulge forming. "So, Vladimir, how about now? I think we can teach her a thing or two."'
         'Your stepfather simply nods and reaches for his zipper: "Absolutely."'
-        act 'Accept whatever punishment they have in mind':gt 'misha','2'
+        act 'Accept whatever punishment they have in mind': gt 'misha', '2'
     else
         act 'Move away':gt 'gargazel'
     end

locations/dinsister.qsrc

@@ -114,9 +114,9 @@ $sischecks = {
 		'Your sister takes a good look at your eyebrow piercing and says, "Nice, but be careful, don''t accidentally get it caught on something!"'
 	end
 	
-	if pregTalkSister = 0 and (($clothingworntype = 'nude' and pregtime > 90) or ($clothingworntype ! 'nude' and pregtime > 150)):
-		pregTalkSister = 1
-		if $clothingworntype ! 'nude' and pregtime > 150:
+	if npc_pregtalk['A33'] = 0 and (($clothingworntype = 'nude' and pregchem > 2688) or ($clothingworntype ! 'nude' and pregchem > 3600)):
+		npc_pregtalk['A33'] = 1
+		if $clothingworntype ! 'nude' and pregchem > 3600:
 			'With surprise your sister says, "You''re pregnant, <<$pcs_nickname>>!"'
 			'"How the hell can you tell?"'
 			'With a smile, she says, "I have a bionic eye." As she reaches out and rubs your protruding belly, "So, do you know who the father is?"'
@@ -328,7 +328,8 @@ $d_sister[3]={
 			'You chat with your sister, discussing the latest trends in fashion.'
 		end
 		if sisterTalk = 12:
-			'Anya recognized, that before she was fond of diets, but they are deteriorated skin and went pryshi, and the start of this match, so now it cracks for three and it only gets more beautiful.'
+			'Anya tells you how used to try various fad diets to make herself beautiful. However she was under weight, her skin looked gaunt and she kept getting acne. Since quitting the diets she is much healthier and looks more beautiful every day.'
+			'The last part has you both laughing.'
 		end
 		if sisterTalk = 13:
 			'You chat with your sister and she tells you that she went dancing before, but she quickly got tired.'
@@ -344,9 +345,10 @@ $d_sister[3]={
 		end
 		if sisterTalk = 17:
 			'You chat with your sister, she says that her ex-boyfriend was a weirdo, "He told me, pier, I love you as much, I just a shit in the sea. Both out on the sea, but we do not go together..."'
+			'You wonder if she was dating Venom.'
 		end
 		if sisterTalk = 18:
-			'You chat with your sister, Anya, she asks you how you feel about womens sexual rights. You spend some time having a very frank and quite revealing conversation.'
+			'You chat with your sister, Anya, she asks you how you feel about women''s sexual rights. You spend some time having a very frank and quite revealing conversation.'
 		end
 	end
 }

locations/etoexhib.qsrc

@@ -214,6 +214,8 @@ if $ARGS[0] = 'pos6':
 
 		act 'Leave':gt 'dachi'
 	end
+
+	gs 'treeCircEntry', 'Village'
 end
 
 if $ARGS[0] = 'pos7':
@@ -297,7 +299,7 @@ if $ARGS[0] = 'pos9':
 		'Work:"For some shoveling work, 3000<b>₽</b>."'
 
 		act 'Agree':
-			cls
+			*clr & cla
 			etoexhib = 11
 			gs 'stat'
 			'<center><img <<$set_imgh>> src="images/locations/suburban/dachastroy.jpg"></center>'
@@ -366,7 +368,7 @@ if $ARGS[0] = 'pos12':
 		'Work:"Sorry young lady. Some motivation would help us work harder."'
 
 		act 'Decline':
-			cls
+			*clr & cla
 			etoexhib = 15
 			temp = daystart
 			gs 'stat'
@@ -377,7 +379,7 @@ if $ARGS[0] = 'pos12':
 		end
 
 		act 'Accept and give half the amount':
-			cls
+			*clr & cla
 			money -= 1500
 			etoexhib = 14
 			temp = daystart
@@ -701,7 +703,7 @@ if $ARGS[0] = 'pos19':
 	'The Lyceum entrance hall. It''s pretty clean and quiet. There is a desk and office for the personnel department. On the wall hangs a timetable.'
 
 	if workPTU = 2:
-		cls
+		*clr & cla
 		pcs_mood -= 50
 		workPTU = 1
 		teachlevel = 0
@@ -814,13 +816,13 @@ if $ARGS[0] = 'pos21':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_fight.jpg"></center>'
 		'You see a group of girls, mocking and kicking a young man.'
 
 		act 'Interfere for the man':
-			cls
+			*clr & cla
 			teachlevel += 1
 			'"What are you doing? Immediately stop, I''ll call the police!" You yell at the girls. And they snort:"He''s an ssshole, he deserved it!" but they still leave the guy alone.'
 			'You are a good example by helping the helpless man. This will positively impact your reputation.'
@@ -844,7 +846,7 @@ if $ARGS[0] = 'pos22':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		pcs_horny += 5
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_rand.jpg"></center>'
@@ -869,7 +871,7 @@ if $ARGS[0] = 'pos23':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		pcs_horny += 10
 		gs 'stat'
 		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_korr1.jpg"></center>'
@@ -915,7 +917,7 @@ if $ARGS[0] = 'pos24tk':
 	'In one corner there is a small old sofa.'
 
 	$prositdirizv = {
-		cls
+		*clr & cla
 		cla
 		gs'stat'
 		set izvad = 1
@@ -943,7 +945,7 @@ if $ARGS[0] = 'pos24tk':
 	if hour >= 14 and hour <= 15:
 		temp = RAND(1,100)
 		if temp >= 90:
-			cls
+			*clr & cla
 			minut += 6
 			pcs_mood -= 10
 			pcs_willpwr -= 10
@@ -996,7 +998,7 @@ if $ARGS[0] = 'pos25':
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/altschool/ptu_klass.jpg"></center>'
 	'Your class.'
 	if workPTU = 3:
-		cls
+		*clr & cla
 		hour = 14
 		workPTU = 4
 		gs 'stat'
@@ -1008,7 +1010,7 @@ if $ARGS[0] = 'pos25':
 
 		act 'Next':gt 'etoexhib', 'pos25'
 	elseif workPTU = 4 and gor_dorm = 4:
-		cls
+		*clr & cla
 		hour = 14
 		gor_dorm = 5
 		gs 'stat'
@@ -1080,7 +1082,7 @@ if $ARGS[0] = 'pos27':
 
 		if temp >= 95:
 			act 'Drop your pencil on the ground':
-				cls
+				*clr & cla
 				pcs_horny += 40
 				minut += 60
 				teachlevel -= 5
@@ -1104,7 +1106,7 @@ if $ARGS[0] = 'pos27':
 			end
 		elseif temp >= 85 and temp < 90:
 			act 'Sit on the table':
-				cls
+				*clr & cla
 				pcs_horny += 40
 				minut += 60
 				teachlevel -= 2
@@ -1117,7 +1119,7 @@ if $ARGS[0] = 'pos27':
 			end
 		elseif temp >= 75 and temp < 80:
 			act 'Drop the chalk':
-				cls
+				*clr & cla
 				pcs_horny += 40
 				minut += 60
 				teachlevel -= 5
@@ -1141,7 +1143,7 @@ if $ARGS[0] = 'pos27':
 			end
 		elseif temp >= 65 and temp < 70:
 			act 'Sit sexily on the table':
-				cls
+				*clr & cla
 				pcs_horny += 40
 				minut += 60
 				teachlevel -= 2
@@ -1154,7 +1156,7 @@ if $ARGS[0] = 'pos27':
 			end
 		elseif temp >= 55 and temp < 60:
 			act 'Show stockings':
-				cls
+				*clr & cla
 				pcs_horny += 40
 				minut += 60
 				teachlevel -= 2
@@ -1170,7 +1172,7 @@ if $ARGS[0] = 'pos27':
 
 	if hour < 16:
 		act 'Teach':
-			cls
+			*clr & cla
 			minut += 60
 			pcs_mood -= 5
 
@@ -1243,7 +1245,7 @@ if $ARGS[0] = 'pos34':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		minut += 15
 		pcs_horny += 20
 		gs 'stat'
@@ -1282,7 +1284,7 @@ if $ARGS[0] = 'pos36':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		minut += 15
 		pcs_horny += 10
 		gs 'stat'
@@ -1308,7 +1310,7 @@ if $ARGS[0] = 'pos37':
 
 	if temp >= 90:
 		act 'Say hello to the Director':
-			cls
+			*clr & cla
 			minut += 15
 			teachlevel += 1
 			gs 'stat'
@@ -1340,7 +1342,7 @@ if $ARGS[0] = 'pos38':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		minut += 15
 		pcs_horny += 10
 		gs 'stat'
@@ -1353,7 +1355,7 @@ if $ARGS[0] = 'pos38':
 
 	if gor_dorm = 5:
 		act 'Search the Web for "Tetrodotoxin"':
-			cls
+			*clr & cla
 			minut += 120
 			gor_dorm = 6
 			gs 'stat'
@@ -1398,7 +1400,7 @@ if $ARGS[0] = 'pos39':
 	temp = rand(1, 100)
 
 	if temp >= 90:
-		cls
+		*clr & cla
 		minut += 15
 		pcs_horny += 10
 		gs 'stat'
@@ -1540,25 +1542,28 @@ if $ARGS[0] = 'pos50':
 end
 
 if $ARGS[0] = 'pos51':
-	cla
-	*clr
+	$menu_loc = 'etoexhib'
+	$menu_arg = 'pos51'
+	menu_off = 0
+	*clr & cla
 	minut += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/resident/apartment/podezd.jpg"></center>'
 	'Entrance to the 5-floors building in which you live. The lock on the door leading to the attic is broken.'
 
 	if sosedQW = 0:
+		menu_off = 1
 		'<br>Suddenly in the stairwell you are faced with a young guy who is climbing up the stairs. He runs into you and is noticeably embarrassed.<font color="#1589FF">"I''m sorry, I did not see you there. You''ve moved into apartment 69, right?"</font>'
 
 		act 'Yes, I live in the apartment 69':
-			cls
+			*clr & cla
 			sosedQW = 1
 			minut += 5
 			gs 'stat'
 			'You nod, confirming that you live in apartment 69. The guy looks visibly delighted and says, <font color="#1589FF">"Wonderful. I lived there before Petrovich. He tormented the whole building. By the way I''m Timothy, and you are?"</font> '
 
 			act '<<$pcs_nickname>>':
-				cls
+				*clr & cla
 				gs 'stat'
 				'<font color="magenta">"My name is <<$pcs_nickname>>,"</font> you say. He nodded his head and began to get the key to open the door of the apartment 68. "Very nice. I live in the next apartment." The guy opened the door and on the threshold appeared the curious face of an elderly woman. She pointed her sharp nose at you and began to curiously look you. Timothy entered the apartment and said irritably, "Mother, stop hanging around the front door!" and closed the door.'
 
@@ -1574,8 +1579,7 @@ if $ARGS[0] = 'pos51':
 	end
 
 	act 'Leave the building':
-		cls
-
+		*clr & cla
 		if $clothingworntype = 'nude':
 			'<b><font color="red">You need to get dressed.</font></b>'
 			xgt $curloc
@@ -1593,7 +1597,10 @@ if $ARGS[0] = 'pos51':
 end
 
 if $ARGS[0] = 'pos52':
-	cls
+	$menu_loc = 'etoexhib'
+	$menu_arg = 'pos52'
+	menu_off = 0
+	*clr & cla
 	minut += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/cherdak.jpg"></center>'
@@ -1614,8 +1621,11 @@ end
 if $ARGS[0] = 'pos53':
 	$metka = $ARGS[0]
 	$loc = $CURLOC
+	$menu_loc = 'etoexhib'
+	$menu_arg = 'pos53'
+	menu_off = 0
 	$location_type = 'secluded'
-	cls
+	*clr & cla
 	minut += 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images/locations/city/residential/apartment/roof.jpg"></center>'
@@ -1668,9 +1678,9 @@ if $ARGS[0] = 'pos53':
 end
 
 if $ARGS[0] = 'pos54':
-	cla
-	*clr
-	minut+=5
+	*clr & cla
+	menu_off = 1
+	minut += 5
 	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/shared/train/spy.jpg"></center>'
@@ -1680,7 +1690,7 @@ if $ARGS[0] = 'pos54':
 		!only notify player 1 time after events triggered
 		if fakepassport = 2:
 			fakepassport = 0
-			'He tells you "A passport with a fake age will cost you 3,000 <b>₽</b>"'
+			'He tells you "A passport with a fake age will cost you 30,000 <b>₽</b>"'
 		end
 
 		if fakediplom = 2:
@@ -1689,12 +1699,13 @@ if $ARGS[0] = 'pos54':
 		end
 	end
 
-	if age < 18 and fakepassport ! 1 and money > 3000:
-		act 'Buy fake passport (3,000 <b>₽</b>)':
-			cla
-			*clr
+	act 'Leave': gt 'nordtrain', 'outside'
+	
+	if age < 18 and fakepassport ! 1 and money > 30000:
+		act 'Buy fake passport (30,000 <b>₽</b>)':
+			*clr & cla
 			minut += 10
-			money -= 3000
+			money -= 30000
 			fakepassport = 1
 
 			'<center><img <<$set_imgh>> src="images/locations/shared/train/spy.jpg"></center>'
@@ -1706,8 +1717,7 @@ if $ARGS[0] = 'pos54':
 
 	if diplom = 0 and fakediplom ! 1 and money > 100000:
 		act 'Buy fake diploma (100,000 <b>₽</b>)':
-			cla
-			*clr
+			*clr & cla
 			minut += 10
 			money -= 100000
 			fakediplom = 1
@@ -1718,11 +1728,6 @@ if $ARGS[0] = 'pos54':
 			act 'Leave': gt 'nordtrain', 'outside'
 		end
 	end
-
-	act 'Leave':
-		cls
-		gt 'nordtrain', 'outside'
-	end
 end
 
 if $ARGS[0] = 'pos90':
@@ -1756,7 +1761,7 @@ if $ARGS[0] = 'pos90':
 	end
 
 	act 'Leave':
-		cls
+		*clr & cla
 		gt 'etoexhib', 'pos24'
 	end
 end

locations/experiment.qsrc

@@ -90,6 +90,8 @@ end
 
 if $ARGS[0] = 'deskTalk:shout':
 	shouted = 1
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\shout.jpg"></center>'
 	*nl
 	'"Calm damn miss <<$pcs_lastname>>, or I will be forced to call a security!" the woman yells as she tries to calm you down.'
@@ -99,6 +101,8 @@ if $ARGS[0] = 'deskTalk:shout':
 end
 
 if $ARGS[0] = 'deskTalk:refuse':
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse2.jpg"></center>'
 	*nl
 	'"I understand miss <<$pcs_lastname>>. I guess being used by those extra large sized cocks is not an experience that a woman would like to go through repeatedly." she understandingly replies.'
@@ -115,14 +119,16 @@ if $ARGS[0] = 'deskTalk:refuse':
 end
 
 if $ARGS[0] = 'deskTalk:admitWhore':
+	menu_off = 1
+	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse2.jpg"></center>'
 	*nl
 	'"You see miss <<$pcs_lastname>>, acceptance is the first step. Now do you want to rejoin the experiment, or not?" she grins as she asks.'
 	'"I am not sure, nurse..." you hesitantly answer.'
 	'"Just think about all those big black cocks, ready to fill you up... And all the orgasms you would be experiencing!" she is trying her best to tempt you.'
 
-	act 'Yes, I need it...':gt 'experiment', 'deskTalk:volunteer'
 	act 'No, I have to fight this..':gt 'poli', 'start'
+	act 'Yes, I need it...':gt 'experiment', 'deskTalk:volunteer'
 end
 
 if $ARGS[0] = 'deskTalk:volunteer':
@@ -130,6 +136,7 @@ if $ARGS[0] = 'deskTalk:volunteer':
 	impreg = 0
 	expVolunteer = 1
 	expVolunteerExam = 0
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse2.jpg"></center>'
 	*nl
@@ -139,6 +146,7 @@ end
 
 if $ARGS[0] = 'deskTalk:volunteer:start':
 	minut += 3
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse2.jpg"></center>'
 	*nl
@@ -154,6 +162,7 @@ end
 
 if $ARGS[0] = 'form':
 	minut += 2
+	menu_off = 1
 	gs 'stat'
 	'<h2>Research project #667 - "Fruit of Eden"</h2>'
 
@@ -183,6 +192,7 @@ end
 if $ARGS[0] = 'form:filled':
 	exp_form = 1
 	minut += 3
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\desk.jpg"></center>'
 	*nl
@@ -195,6 +205,7 @@ end
 
 if $ARGS[0] = 'testarea:start':
 	minut += 1
+	menu_off = 1
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse2.jpg"></center>'
 	*nl
@@ -582,8 +593,9 @@ if $ARGS[0] = 'testarea:start:treatmentStart':
 	'She takes out a syringe, pushing the remaining air bubbles out. Holding you by the arm she is about to inject it into you...'
 
 	act 'Brace for the pinch':
-		if preg = 0: gt 'experiment', 'testarea:start:treatmentStart:injection'
-		if preg > 0:
+		if pregchem = 0: 
+			gt 'experiment', 'testarea:start:treatmentStart:injection'
+		elseif pregchem > 0:
 			cla & *clr
 			minut += 120
 			thinkpreg = 1
@@ -761,9 +773,26 @@ if $ARGS[0] = 'testarea:start:treatmentStart:dream3':
 		if interr = 3:'<<$doc1>>: "Indeed. And she has had sex with both an asian AND an african male."'
 	end
 	*nl
-	'Unable to stay awake anymore you fade out back to the world of unknowing...'
+	
+	if venera = 0 and GerpesOnce = 0 and Gerpes = 0 and SifacOnce = 0 and Sifilis = 0 and TriperOnce = 0 and Triper = 0 and TriperOral = 0 and KandidozOnce = 0 and Kandidoz = 0:
+		'Unable to stay awake anymore you fade out back to the world of unknowing...'
+		act '(Fade out)':minut += 300 & gt 'experiment', 'testarea:start:treatmentStart:wakeup1'
+	else
+		'"But she has a STD," is the last thing you here before you fade out back to world of unknowing...'
+		act '(Fade out)':minut += 300 & gt 'experiment', 'testarea:start:treatmentStart:wakeup:std'
+	end
+end
 
-	act '(Fade out)':minut += 300 & gt 'experiment', 'testarea:start:treatmentStart:wakeup1'
+if $ARGS[0] = 'testarea:start:treatmentStart:wakeup:std':
+	minut += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\lights.jpg"></center>'
+	'You''re finally awake, feeling as if you''ve slept for days.'
+	'Your eyes slowly adjust to the light coming from the ceiling lamps. It looks as if there are no windows at all and only artificial light illuminates the room.'
+	*nl
+	'A nurse stands next to your bed. "Sorry, we can''t let you be part of the experiment. You have a STD," she says. "You can get dressed here before you leave."'
+	
+	act 'Get dressed and leave': gt 'poli', 'start'	
 end
 
 if $ARGS[0] = 'testarea:start:treatmentStart:wakeup1':
@@ -1116,7 +1145,7 @@ if $ARGS[0] = 'testarea:treatment:bed:wait:event':
 				act 'Continue':gt 'experiment', 'testarea:treatment:bed:doctor1'
 			else
 				if pregchem > 30:
-					pregTalkPC = 1
+					pcs_pregtalk = 1
 					impreg = 1
 					*nl
 					'"Very well you little cum bucket, you have finally managed to finish the impregnation process. You will proceed to the final stage in a short time." the doctor tells you.'
@@ -1202,6 +1231,8 @@ if $ARGS[0] = 'testarea:treatment:sex3':
 	gs 'arousal', 'vaginal', 4, 'bound', 'sub', 'rough', 'humiliation'
 	gs 'arousal', 'end'
 	gs 'cum_call', '', 'Some african male', 0, '', 100000, 75
+	gs 'experiment', 'std_block'
+	
 	gs 'stat'
 	*nl
 	'At last his ejaculation ends. He does not pull immediately out, instead he signals for the nurse. As she arrives, he finally pulls his sticky, cum covered cock out. And you don''t feel empty for too long...'
@@ -1278,6 +1309,8 @@ if $ARGS[0] = 'testarea:treatment:deflower':
 		gs 'arousal', 'vaginal', 5, 'bound', 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', '', 'Some african male', 0, '', 100000, 75
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 		*nl
 		act '(endure)':experi_stage = 5 & gt 'experiment', 'testarea:treatment:deflower'
@@ -1914,6 +1947,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'vaginal', 20, 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', '', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: vaginal cowgirl, 1v1
@@ -1930,6 +1965,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'vaginal', 45, 'bound', 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', '', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: vaginal missionary, 1v1
@@ -1945,6 +1982,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'bj', 15, 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', '', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: vaginal + mouth, 2v1
@@ -1962,6 +2001,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'end'
 		gs 'cum_call', '', 'Some african male', 0, '', 250000, 100
 		gs 'cum_call', 'mouth', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: anal doggy, 1v1
@@ -1978,6 +2019,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'anal', 20, 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', 'anus', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: anal missionary, 1v1
@@ -1994,6 +2037,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'anal', 30, 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', 'anus', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: bj, 1v1
@@ -2013,6 +2058,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'end'
 		gs 'cum_call', 'mouth', 'Some african male', 0, '', 250000, 70
 		gs 'cum_call', 'face', 'Some african male', 0, '', 250000, 20
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: bdsm, anal, 1v1
@@ -2031,6 +2078,8 @@ if $ARGS[0] = 'testarea:treatment:room:event:sex':
 		gs 'arousal', 'anal', 30, 'bound', 'sub', 'rough', 'humiliation'
 		gs 'arousal', 'end'
 		gs 'cum_call', 'anus', 'Some african male', 0, '', 250000, 100
+		gs 'experiment', 'std_block'
+		
 		gs 'stat'
 
 	! COITUS: bdsm, whip, 1v1
@@ -2223,6 +2272,7 @@ end
 if $ARGS[0] = 'testarea:treatment:room:event:nurse:check':
 	minut += 5
 	! STATUS CHECK: nurse
+	gs 'experiment', 'std_block'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse1.jpg"></center>'
 	'She takes a sample of your blood, measures your temperature, blood pressure and proceeds to examine insides of your vagina.'
 
@@ -2235,7 +2285,7 @@ if $ARGS[0] = 'testarea:treatment:room:event:nurse:check':
 	'<i>The cold medical mirror is nothing compared to the abuse endured by the giant black cocks.</i>'
 	'When she''s done, she packs up her equipment and says,'
 	if pregchem > 30:
-		pregTalkPC = 1
+		pcs_pregtalk = 1
 		impreg = 1
 		'Very well miss <<$pcs_lastname>>, you have finally managed to complete the impregnation process. You will proceed to the final stage in a short time.'
 	else
@@ -2481,6 +2531,7 @@ if $ARGS[0] = 'testarea:treatment:impreg:leave':
 	minut += 5
 	money += 50000
 	experimentAbsolved += 1
+	gs 'experiment', 'std_block'
 	gs 'stat'
 	'<center><img <<$set_imgh>> src="images\locations\shared\clinic\experiment\nurse1.jpg"></center>'
 	'The nurse speaks up, "And the last matter to be settled is your payment."'
@@ -2557,7 +2608,8 @@ if $ARGS[0] = 'testarea:treatment:impreg:shout:punish':
 	gs 'cum_call', 'breasts', 'Some african male', 0, '', 250000, 50
 	gs 'cum_call', 'butt', 'Some african male', 0, '', 250000, 50
 	gs 'cum_call', 'labia', 'Some african male', 0, '', 250000, 50
-
+	gs 'experiment', 'std_block'
+	
 	gs 'stat'
 
 	act 'Continue':gt 'experiment', 'testarea:treatment:impreg:shout:punish:kickout'
@@ -2585,5 +2637,18 @@ if $ARGS[0] = 'testarea:treatment:impreg:shout:punish:kickout':
 	act 'Get up':gt 'poli', 'start'
 end
 
+if $ARGS[0] = 'std_block':
+	venera = 0
+	GerpesOnce = 0
+	Gerpes = 0
+	SifacOnce = 0
+	Sifilis = 0
+	TriperOnce = 0
+	Triper = 0
+	TriperOral = 0
+	KandidozOnce = 0
+	Kandidoz = 0
+end
+
 --- experiment ---------------------------------
 

locations/fame.qsrc

@@ -9,7 +9,7 @@
 
 if $ARGS[0] ! 'deg':
 
-	dynamic '<<$ARGS[0]>>_<<ARGS[1]>> += <<ARGS[2]>>'
+	dynamic '<<$ARGS[0]>>_<<$ARGS[1]>> += <<ARGS[2]>>'
 
 	fame_performer = 0
 	fame_sexind = 0

locations/father.qsrc

@@ -134,19 +134,19 @@ if tatlip>0 and fatherTatLip=0 and npc_rel['A28']>=60:
     end
 end
 
-if $clothingworntype = 'nude' and pregTalkFather = 0 and pregtime > 90:
+if $clothingworntype = 'nude' and npc_pregtalk['A28'] = 0 and pregchem > 2688:
     'Your stepfather looks at your belly with a surprised look on his face: "<<$pcs_nickname>>, you''re pregnant?"'
     if npc_sex['A28']!0:
         'You see him hesitate for a second, as if weighing whether he should say something or not. He finally does: "It''s not mine, I hope?"'
     end
-    pregTalkFather = 1
+    npc_pregtalk['A28'] = 1
     
-elseif $clothingworntype ! 'nude' and pregTalkFather = 0 and pregtime > 150:
+elseif $clothingworntype ! 'nude' and npc_pregtalk['A28'] = 0 and pregchem > 3600:
     'Your stepfather looks at your belly with a surprised look on his face: "<<$pcs_nickname>>, you''re pregnant?"'
     if npc_sex['A28']!0:
         'You see him hesitate for a second, as if weighing whether he should say something or not. He finally does: "It''s not mine, I hope?"'
     end
-    pregTalkFather = 1
+    npc_pregtalk['A28'] = 1
 end
 
 !!----------------------------------------end reaction block---------------------------------------------

locations/fbDormD.qsrc

@@ -54,7 +54,7 @@ $d_fbd_regular = {
 	act 'Kiss him':
 		*clr & cla
 		menu_off = 1
-		boy += 1
+		guy += 1
 		parkfuckboy += 1
 		fbdormtimes += 1
 		pphj = 0

locations/fbHouse.qsrc

@@ -9,7 +9,7 @@ gs 'stat'
 
 act 'Kiss him':
 	*clr & cla
-	boy += 1
+	guy += 1
 	parkfuckboy += 1
 	fbhousetimes += 1
 	pphj = 0

locations/femcyc.qsrc

@@ -204,301 +204,12 @@ if $ARGS[0] = '':
 		cumsumass = ctemp[2]
 		KILLVAR 'ctemp'
 	end
-
-	if cheat_NoLactation = 1:
+	!!	Breastcycle. Every breast related change with lactation happens in here.
+	if cheat_NoLactation > 0:
 		gs 'lact_lib','lactate_optout'
-	end
-	!! new milkgrowday function.
-	!! Not lactating yet, but there was milkdemand, meaning someone worked your nipples and breasts.
-	if lactation['active'] = 0 and milkoverdemand >= 0 and prolactinlvl >= 0:
-		!! Even if Sveta doesn''t massage her breasts or pumps proactively, NPCs will work her breasts eventually. This can cause her to lactate without knowledge.
-		if rand(1,50) + prolactinlvl >= rand(200,250) and milkinduceday >= 5:
-			lactation['induced'] = 0
-			pcs_knowsaboutlactation = 0
-			lactation['active'] = 1
-			if func('lact_lib','$calc_lactatemm') > 0: lactatemm = func('lact_lib','$calc_lactatemm')
-			if prolactinlvl < 200: prolactinlvl = 200
-			lactaterate = 10*(prolactinlvl/200)
-			pcs_nips += 2
-			pumpinggrowth = 0
-		end
-		if milkgrowday < daystart:
-			temp_var = milkoverdemand/200
-			if temp_var >= 10 and pregtimes <= 0: temp_var = 10
-			if temp_var >= 50 and pregtimes > 0: temp_var = 50
-			if temp_var <= 0 and milkoverdemand >0:
-				prolactinlvl += 1
-			else
-				prolactinlvl += temp_var
-			end
-			!!	if sveta had no kid, milk induction will take a while as her breasts need to change alot.
-			if prolactinlvl >= 150 and kid <= 0 and pregtimes <= 0:milkinduceday += 1
-			if prolactinlvl >= 100 and kid <= 0 and pregtimes <= 0 and pain['breasts'] <= 20: pain['breasts'] = 20
-			!! as long as your tits are not over 11 growth will happen to them. If you do not pump or no pregnancy happens, no growth will happen.
-			if milkoverdemand = 0 and pregchem = 0 and tits < 11:
-				temp_var = prolactinlvl - 10
-				if temp_var <= 0:
-					prolactinlvl = 0
-				end
-				!! if prolactinlvl is sinking too much, the aveoli will deflate and thus the breasts growth is reverted. This only counts for induced lactation. If natural lactation occurs breasts will shrink a bit too, but stay bigger in total.
-				if prolactinlvl < 100 and total_milkinduce_growth > 0:
-					nbsize -= total_milkinduce_growth
-					total_milkinduce_growth = 0
-					if prolactinlvl > 10:
-						prolactinlvl -= 10
-					else
-						prolactinlvl = 0
-					end
-				else
-					if prolactinlvl > 10:
-						prolactinlvl -= 10
-					else
-						prolactinlvl = 0
-					end
-				end
-				milkoverdemand = 0
-				milkgrowday = daystart
-			elseif milkoverdemand > 0 and pregchem = 0 and tits < 11:
-				!! inducing without ever being pregnant
-				if prolactinlvl > 100 and kid <= 0:
-					if total_milkinduce_growth < 8:
-						total_milkinduce_growth += 1 + pumpinggrowth
-						nbsize += 1 + pumpinggrowth
-						pumpinggrowth = 0
-					else
-						pumpinggrowth = 0
-					end
-				!! inducing after being pregnant
-				elseif prolactinlvl > 100 and kid > 0:
-					if total_milkinduce_growth < (total_preg_growth/2):
-						total_milkinduce_growth += 1 + pumpinggrowth
-						nbsize += 1 + pumpinggrowth
-						pumpinggrowth = 0
-					end
-				end
-				milkoverdemand = 0
-			elseif milkoverdemand >= 0 and pregchem > 0 and tits < 11:
-				if prolactinlvl > 100 and pregchem < 3000 and kid <= 0:
-					if total_milkinduce_growth < 8:
-						total_milkinduce_growth += 1 + pumpinggrowth
-						nbsize += 1 + pumpinggrowth
-						pumpinggrowth = 0
-					else
-						pumpinggrowth = 0
-					end
-				!! first breast growth with first pregnancy
-				elseif prolactinlvl >= 100 and pregchem >= 2000 and pregchem < 3000 and kid <= 0:
-					if rand(0,100) > 55:
-						first_preg_growth += 1
-						total_preg_growth += 1
-						if total_preg_growth > total_milkinduce_growth: nbsize += 1
-					end
-				!! there is little chance your breast grow additional sizes if you have more kids.
-				elseif prolactinlvl >= 100 and pregchem >= 2000 and pregchem < 3000 and kid > 0:
-					if first_preg_growth > total_preg_growth:
-						total_preg_growth += 1
-						if total_preg_growth > total_milkinduce_growth: nbsize += 1
-					else
-						if rand(0,100) > 95:
-							total_preg_growth += 1
-							if total_preg_growth > total_milkinduce_growth: nbsize += 1
-						end
-					end
-				!! inducing after being pregnant
-				elseif prolactinlvl > 100 and pregchem =< 3000 and kid > 0:
-					if total_milkinduce_growth < (total_preg_growth/2):
-						total_milkinduce_growth += 1 + pumpinggrowth
-						nbsize += 1 + pumpinggrowth
-						pumpinggrowth = 0
-					end
-				end
-				milkoverdemand = 0
-				milkgrowday = daystart
-			end
-			milkgrowday = daystart
-		else
-			milkgrowday = daystart
-		end
-	elseif lactation['active'] > 0 and milkoverdemand => 0 and prolactinlvl >= 0:
-		lactatemm = func('lact_lib','$calc_lactatemm')
-		!! checking if induced or not and if girl went through pregnancy already.
-		if lactation['induced'] > 0 and kid <= 0:
-			if milkgrowday < daystart:
-				!! first breast growth with first pregnancy
-				if prolactinlvl >= 100 and pregchem >= 2000 and pregchem < 3000 and kid <= 0:
-					if rand(0,100) > 55:
-						first_preg_growth += 1
-						total_preg_growth += 1
-						if total_preg_growth > total_milkinduce_growth: nbsize += 1
-					end
-				end
-				if lactatemm > lactatemv and salo > 11:
-					lactatemv += lactaterate
-					temp_var = lactaterate/100
-					if temp_var <= 0: temp_var = 1
-					pcs_energy -= temp_var
-					if lactatemv > lactatemm: lactatemv = lactatemm
-				end
-				if milkoverdemand > 0 and breastpumped > 0:
-					!! lactationrate growing, so you make more milk the more demand there was in the day before.
-					temp_var = prolactinlvl + milkoverdemand/20
-					if  temp_var > 120:
-						prolactinlvl += milkoverdemand/20
-						!! uppon reaching a specific limit, the lactationrate will grow slower. Human body limits etc... you know
-						if lactaterate > 3500:
-							lactaterate += 5*(prolactinlvl/200)
-						elseif lactaterate > 6000:
-							lactaterate += prolactinlvl/200
-						else
-							lactaterate += 10*(prolactinlvl/200)
-						end
-						prolactinlvl = 100
-					else
-						prolactinlvl = 100
-					end
-						if pcs_knowsaboutlactation > 0:
-							'Your breasts tingle a bit more from milkproduction.'
-						else
-							'Your breasts tingle a bit weirdly.'
-						end
-				elseif milkoverdemand = 0 and breastpumped > 0:
-					prolactinlvl = 100
-				elseif milkoverdemand = 0 and breastpumped = 0:
-					if lactaterate > 0 and pregchem >=0:
-						temp_var = lactaterate/4
-						if temp_var < 1:temp_var = 0
-						lactaterate = temp_var
-						if pcs_knowsaboutlactation > 0:
-							'Your breasts tingle a little less from milkproduction.'
-						else
-							'The tingling in your breasts eases down.'
-						end
-					elseif lactaterate = 0 and pregchem < 1000:
-						lactation['active'] = 0
-						lactation['induced'] = 0
-						nbsize -= total_milkinduce_growth
-						milkinduceday = 0
-						if pcs_knowsaboutlactation > 0:
-							'You notice that you stopped lactating.'
-						else
-							'Your breasts feel eased today.'
-						end
-					elseif lactaterate = 0 and pregchem >= 1000:
-						lactaterate = 1
-					else
-						lactaterate = 0
-					end
-				end
-				milkgrowday = daystart
-				milkoverdemand = 0
-				breastpumped = 0
-			else
-				milkgrowday = daystart
-				if lactatemm >= lactatemv and salo > 11:
-					if lactaterate > lactaterate_use:
-						temp_lactaterate = lactaterate_use
-					else
-						temp_lactaterate = lactaterate
-					end
-					lactatemv += temp_lactaterate
-					lactaterate_use = lactaterate
-					if lactatemv > lactatemm:
-						lactatemv = lactatemm
-						lact_engorgement += 1
-						if lact_engorgement > 2: lactatemess += 1
-					end
-				end
-			end
-			milkgrowday = daystart
-		else
-			if milkgrowday < daystart:
-				if lactatemm > lactatemv and salo > 11:
-					lactatemv += lactaterate
-					temp_var = lactaterate/100
-					if temp_var <= 0: temp_var = 1
-					pcs_energy -= temp_var
-					if lactatemv > lactatemm: lactatemv = lactatemm
-				end
-				if milkoverdemand > 0 and breastpumped > 0:
-					!! lactationrate growing, so you make more milk the more demand there was in the day before.
-					temp_var = prolactinlvl + milkoverdemand/10
-					if  temp_var > rand(150,200):
-						prolactinlvl += milkoverdemand/20
-						!! uppon reaching a specific limit, the lactationrate will grow slower. Human body limits etc... you know :D
-						if lactaterate > 3500:
-							lactaterate += 5*(prolactinlvl/200)
-						elseif lactaterate > 6000:
-							lactaterate += prolactinlvl/200
-						else
-							lactaterate += 10*(prolactinlvl/200)
-						end
-						prolactinlvl = 100
-					else
-						prolactinlvl = 100
-					end
-						if pcs_knowsaboutlactation > 0:
-							'Your breasts tingle a bit more from milkproduction.'
-						else
-							'Your breasts tingle a bit weirdly.'
-						end
-				elseif milkoverdemand = 0 and breastpumped > 0:
-					prolactinlvl = 100
-				else
-					if lactaterate > 0 and pregchem >= 0:
-						temp_var = lactaterate/8
-						if temp_var < 1:temp_var = 0
-						lactaterate = temp_var
-						milkoverdemand = 0
-						if pcs_knowsaboutlactation > 0:
-							'Your breasts tingle a little less from milkproduction.'
-						else
-							'The tingling in your breasts eases down.'
-						end
-					elseif lactaterate = 0 and pregchem < 1000:
-						lactation['active'] = 0
-						lactation['induced'] = 0
-						if total_milkinduce_growth > 0: nbsize -= total_milkinduce_growth
-						if total_preg_growth > 0:
-							nbsize -= total_preg_growth
-							nbsize += first_preg_growth/2
-						end
-						total_milkinduce_growth = 0
-						milkoverdemand = 0
-						if pcs_knowsaboutlactation > 0:
-							'You notice that you stopped lactating.'
-						else
-							'Your breasts feel eased today.'
-						end
-					elseif lactaterate = 0 and pregchem >= 1000:
-						lactaterate = 1
-					else
-						lactaterate = 0
-					end
-				end
-				milkgrowday = daystart
-				milkoverdemand = 0
-				breastpumped = 0
-			else
-				milkgrowday = daystart
-				if lactatemm >= lactatemv and salo > 11:
-					if lactaterate > lactaterate_use:
-						temp_lactaterate = lactaterate_use
-					else
-						temp_lactaterate = lactaterate
-					end
-					lactatemv += temp_lactaterate
-					lactaterate_use = lactaterate
-					if lactatemv > lactatemm:
-						lactatemv = lactatemm
-						lact_engorgement += 1
-						if lact_engorgement > 2: lactatemess += 1
-					end
-				end
-			end
-			milkgrowday = daystart
-		end
-		milkgrowday = daystart
-	end
+	else
+		gs 'lact_lib','breastcycle'
+	end	
 
 	if cycle <= 0:
 		gs 'femcyc', 'cyc0'
@@ -951,6 +662,8 @@ if $ARGS[0] = 'preg':
 	temprand -= (babyembryo-1)*588
 	if PregChem > 6573 + temprand and preg ! 2:
 		'A sharp pain pierces your abdomen, and you feel something flow down your legs. Your water has broken!'
+		!!	switch on lactation if not already active.
+		if lactation['active'] < 1: func('lact_lib','lact_switch')
 		$cycreport_txt = 'In labour'
 		arrmodtmp =arrsize('$ChildFath')
 		arrmodtmp -= (babyembryo+1)
@@ -983,25 +696,6 @@ if $ARGS[0] = 'preg':
 		end
 		'You need to get to a clinic.'
 	end
-	if PregChem > 3887:
-		if lactation['active'] <= 0:
-			'You begin lactating'
-			lactation['active'] = 1
-			lactatemv = 0
-			lactatemm = func('lact_lib','$calc_lactatemm')
-			lacaterate = 10
-			prolactinlvl = 150
-		else
-			if lactation['active'] < 1: lactation['active'] = 1
-		end
-	end
-	if PregChem > 1000:
-		if prolactinlvl < 100 and lactation['active'] <= 0:
-			if rand(0,100) > 50:
-				prolactinlvl +=1
-			end
-		end
-	end
 	if PregChem > 2203:
 		if pregchem > 2853 or kid > 0:
 			if rand(0,7) = 0: dynamic $d_pregmovement

locations/fit.qsrc

@@ -139,7 +139,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

locations/foto.qsrc

@@ -81,7 +81,7 @@ if $ARGS[0] = 'start':
 	end
 
 	if $pantyworntype ! 'none' and pcs_inhib < 60:
-		if studio_strip_talk < 3 and $braworntype ! 'none' and pcs_inhib < 60:
+		if studio_strip_talk < 3:
 			act'Just strip to your panties':
 				gs 'clothing', 'strip'
 				cla & *clr
@@ -106,7 +106,7 @@ if $ARGS[0] = 'start':
 			end
 		end
 
-		if studio_strip_talk < 2 and pcs_inhib < 60:
+		if studio_strip_talk < 2 and $braworntype ! 'none':
 			act'Just strip to your underwear':
 				gs 'clothing', 'strip'
 				gs 'stat'
@@ -310,11 +310,11 @@ if $ARGS[0] = 'studio':
 						'	"Okay, listen. I''m not really 18. I''m <<age>> and I don''t have a passport that says otherwise, but I still want to work here. Isn''t there some way we can work this out?"'
 						'	"Hmmm..." He rubs his chin thoughtfully, smiling while he looks you up and down. Just the way he stares gives you the impression that he''s undressing you with his eyes, remembering what you look like naked. "Alright. I''m not supposed to do this but I like your tits and I wouldn''t mind seeing more of that around here."'
 						'	<i>He was thinking about me naked! I knew it!</i>'
-						'	"There''s a man who hangs around at the train station in the industrial area. Bald head, sunglasses, real sketchy. If you can come up with 3000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Deal?"'
+						'	"There''s a man who hangs around at the train station in the industrial area. Bald head, sunglasses, real sketchy. If you can come up with 30.000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Deal?"'
 						'	"Deal."'
 						'	"Good. Now don''t come back without that passport. I don''t like having my time wasted."'
 						'	He shoos you away and you leave the studio, getting ready for the next step.'
-						if money < 3000:'	<i>Great. Now I just need to find 3000 <b>₽</b> for the fake passport. Just great. Big load of trouble this job is...</i>'
+						if money < 30000:'	<i>Great. Now I just need to find 30.000 <b>₽</b> for the fake passport. Just great. Big load of trouble this job is...</i>'
 						act 'Leave': minut += 1 & gt 'down'
 					end
 				else
@@ -573,7 +573,7 @@ if $ARGS[0] = 'job_offer':
 					*clr & cla
 					'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 					'	"Hmmm..." He rubs his chin thoughtfully while continuing to look at your body before saying, "Alright, listen, I''m not supposed to do this but you really do have an exceptional body so I''m going to make an exception."'
-					'	He leans in close and whispers into your ear, "There''s a man who hangs around at the train station in the industrial area. If you can come up with 3000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
+					'	He leans in close and whispers into your ear, "There''s a man who hangs around at the train station in the industrial area. If you can come up with 30.000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
 					'	With wide eyes and a smile of relief, you nod furiously and rush to get dressed before running out.'
 					gs 'clothing', 'wear_last_worn'
 					gs 'underwear', 'wear'
@@ -592,7 +592,7 @@ if $ARGS[0] = 'job_offer':
 					'"Oh please!" you shout abruptly. The truth is, I''m only <<age>>. But it just makes me so fucking horny to know that strange men I''ll never meet could be out there looking at pictures of my naked body!"'
 					'	You stand there trembling with tight muscles before him. You can feel your juices starting to flow from between your legs with a heightened sense of arousal in anticipation.'
 					*nl
-					'	"Hmmm..." He rubs his chin thoughtfully while continuing to look at your body, especially the fluids that have already begun to leak out of your pussy and slip down your thighs, before saying, "Alright, listen, I''m not supposed to do this but you really do have an exceptional body so I''m going to make an exception. There''s a man who hangs around at the train station in the industrial area. If you can come up with 3000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
+					'	"Hmmm..." He rubs his chin thoughtfully while continuing to look at your body, especially the fluids that have already begun to leak out of your pussy and slip down your thighs, before saying, "Alright, listen, I''m not supposed to do this but you really do have an exceptional body so I''m going to make an exception. There''s a man who hangs around at the train station in the industrial area. If you can come up with 30.000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
 					*nl
 					'	With wide eyes and an excited cry of relief, you rush forward and bear hug him in your naked form.'
 					'	"Thank you! Thank you! Thank you! Thank you!" you shout, your breasts smushing into his chest.'
@@ -623,7 +623,7 @@ if $ARGS[0] = 'job_offer':
 			*nl
 			'	"Oh please! Isn''t there any way that you can hire me?" you say as you step forward holding your hands together, momentarily forgetting your nakedness in your desperation.'
 			'	"Hmmm..." He rubs his chin thoughtfully while continuing to look at your body before saying, "Alright, listen, I''m not supposed to do this but you really do have an exceptional body so I''m going to make an exception."'
-			'	He leans in close and whispers into your ear, "There''s a man who hangs around at the train station in the industrial area. If you can come up with 3000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
+			'	He leans in close and whispers into your ear, "There''s a man who hangs around at the train station in the industrial area. If you can come up with 30.000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
 			'	With wide eyes and a smile of relief, you nod furiously and rush to get dressed before running out.'
 			gs 'clothing', 'wear_last_worn'
 			gs 'underwear', 'wear'
@@ -642,7 +642,7 @@ if $ARGS[0] = 'job_offer':
 				*clr & cla
 				'<center><img <<$set_imgh>> src="images/locations/city/citycenter/photo/fotograph.jpg"></center>'
 				'"Hmmm..." He rubs his chin thoughtfully while continuing to look at your body before saying, "Alright, listen, I''m not supposed to do this but you have an exceptional body so I''m going to make an exception."'
-				'	He leans in close and whispers into your ear, "There''s a man who hangs around at the train station in the industrial area. If you can come up with 3000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
+				'	He leans in close and whispers into your ear, "There''s a man who hangs around at the train station in the industrial area. If you can come up with 30.000 cash, he can sell you a fake passport that says you''re 18. If you can do that, I can at least have some deniability and you can work here. Sound good?"'
 				'	You smile and sigh with relief. "Thanks. I''ll do just that," you say before getting dressed and leaving.'
 				gs 'clothing', 'wear_last_worn'
 				gs 'underwear', 'wear'
@@ -661,7 +661,7 @@ if $ARGS[0] = 'job_offer':
 			'	You stand defiantly in front of him, glaring with your hands on your hips, your nudity completely forgotten in your burning fury.'
 			*nl
 			'	He gives a short laugh. "I have to admit kid, you''ve got spunk and that''s real sexy," he says while reaching out his hand to gently fondle your breast before you slap his hand away.'
-			'	"So I''ll tell you what, there''s a guy who hangs around the train station in the industrial area. If you can scrape together 3000 in cash, he''ll get you a fake passport that says you''re 18 and you can work here. Deal?"'
+			'	"So I''ll tell you what, there''s a guy who hangs around the train station in the industrial area. If you can scrape together 30.000 in cash, he''ll get you a fake passport that says you''re 18 and you can work here. Deal?"'
 			'	He holds his hand out for a shake.'
 			act 'Shake':
 				cla
@@ -2503,7 +2503,12 @@ if $ARGS[0] = 'blackm':
 										studiaday = 7
 										'"You can keep your presents from the guys." says Victor as he quickly makes you dress and leads you to the exit.'
 										'"I hope you''ve learned your lesson. I will be here to teach stupid girls like you that you cannot get away with such behaviour and if needed I will put you through this all over again."'
-										act 'Leave': minut += 1 & gt 'down'
+										act 'Leave':
+											minut += 1
+											gs 'clothing', 'wear_last_worn'
+											gs 'underwear', 'wear'
+											gt 'down'
+										end
 									end
 								end
 							end

locations/gLakeNude.qsrc

@@ -51,6 +51,12 @@ end
 
 'This small natural beach is hidden away from the general public. To reach it you had to travel around the lake along a forest trail. On this secluded beach you can often find sunbathers and people skinny dipping, including people from other towns and even some from the city.'
 
+if month >= 3 and month <= 8:
+	if week >= 6 and hour >= 8 and hour <= 10:
+		'You''re walking down the secluded beach, enjoying the tranquility when all of a sudden you hear some heavy running steps coming up behind you followed by heavy panting. Expecting the worse, you turn around only to see a sweaty <a href="exec:gt ''gschool_socialchg1'', ''tIvan''">Ivan</a>, closely followed by <a href="exec:gt ''gschool_socialchg1'', ''tFedor''">Feodor</a>.'
+	end
+end
+
 if $clothingworntype = 'swimwear' or $clothingworntype = 'nude':
 	act'Get dressed':
 		cla
@@ -257,7 +263,8 @@ if temper >= 15 and month >= 5 and month <= 9:
 			act'Hide in the woods near the beach': gt'gLakeNudeForest'
 		end
 	end
-	act'Leave the secluded beach without changing':
+	$tmp_lakenude_leave = iif($clothingworntype = 'nude', ' without changing', '')
+	act'Leave the secluded beach<<$tmp_lakenude_leave>>':
 		if $clothingworntype ! 'nude' or ($clothingworntype = 'nude' and pcs_inhib >= 60):
 			cla
 			minut += 10
@@ -267,6 +274,7 @@ if temper >= 15 and month >= 5 and month <= 9:
 			gt'gLakeNude'
 		end
 	end
+	KILLVAR '$tmp_lakenude_leave'
 else
 	act'Leave the now abandoned beach':
 		cla

locations/gadforest.qsrc

@@ -120,6 +120,8 @@ if $ARGS[0] = '1':
 		end
 	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):
 		act'Strip naked':
@@ -205,7 +207,6 @@ if $ARGS[0] = '1':
 			menu_off = 1
 			minut += 60
 			pcs_mood += 20
-			pcs_willpwr += willpowermax/5
 			if $clothingworntype = 'nude':
 				pcs_health += healthmax/5 & pcs_horny += 5
 				inhib_exp += rand(1,5)

locations/gadforest_event.qsrc

@@ -45,7 +45,7 @@ if $ARGS[0] = 'gopforest_mitka':
 				'Walking through the forest you met Mitka. You see him shamelessly scratching his balls.'
 				'"<<$pcs_nickname>>, seeing you always gives me a boner, let''s go fuck." he says grinning.'
 
-				act 'Agree':forest_gopsex = 1 & temphunt = 4 & gt 'hunters', 'start'
+				act 'Agree':gt 'mitkasex', 'forest1', 'A63'
 				if npc_QW['A63'] < 10 and alko < 6 and pcs_horny < 90:act 'Refuse':gt 'gadforest','1'
 			end
 		! with Mira in forest
@@ -199,7 +199,7 @@ if $ARGS[0] = 'gopforest_mitka':
 				'Walking through the woods with Mira you met Mitka. Scratching his balls and not paying any attention to Mira, who was standing right next to him, he said with a grin:'
 				'"<<$pcs_nickname>>, seeing you always gives me a boner, let''s go fuck."'
 
-				act 'Agree':MiraLoc = 0 & forest_gopsex = 1 & temphunt = 4 & gt 'hunters', 'start'
+				act 'Agree':MiraLoc = 0 & gt 'mitkasex', 'forest1', 'A63'
 				if npc_QW['A63'] < 10 and alko < 6 and pcs_horny < 70:
 					act 'Refuse':gt 'gadforest','1'
 				end
@@ -308,7 +308,7 @@ if $ARGS[0] = 'gopforest_mitka':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mitka.jpg"></center>'
 				'Walking through the forest you met Mitka. After spotting him him, you tried to dress, but Mitka, without wasting another minute he grabbed you by the hand and dragged you into the nearest bush.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 4 & gt 'hunters', 'start'
+				act 'Go with him':gt 'mitkasex', 'forest1', 'A63'
 			end
 		! with Mira
 		else
@@ -449,7 +449,7 @@ if $ARGS[0] = 'gopforest_mitka':
 				if temp_gadf = 1:'Walking through the forest with Mira, you come face-to-face with Mitka. You yelp in surprise, and rush to your clothing. You are running away with Mira, but before you get too far Mitka grabs you in his arms and drags you with him into the nearest bush.'
 				if temp_gadf = 2:'Walking through the forest you saw Mitka. Realizing that he hasn''t noticed you yet, you decide to...'
 
-				if temp_gadf = 1:act 'Go with him':MiraLoc = 0 & forest_gopsex = 1 & temphunt = 4 & gt 'hunters', 'start'
+				if temp_gadf = 1:act 'Go with him':MiraLoc = 0 & gt 'mitkasex', 'forest1', 'A63'
 				if temp_gadf = 2:
 					act 'Hide':
 						cla
@@ -534,7 +534,7 @@ if $ARGS[0] = 'gopforest_kolyamba':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
 				'Walking through the forest you met Kolyamba. Seeing you, he scratched his balls and dragged you into the nearest bushes.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 5 & gt 'hunters', 'start'
+				act 'Go with him':gt 'mitkasex', 'forest1', 'A61'
 			end
 		! with Mira
 		else
@@ -592,7 +592,7 @@ if $ARGS[0] = 'gopforest_kolyamba':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
 				'Walking through the woods with Mira you met Kolyamba. Scratching his balls and not paying any attention to Mira, who was standing right next to him, he dragged you into the nearest bush.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 5 & gt 'hunters', 'start'
+				act 'Go with him':gt 'mitkasex','forest1','A61'
 			! Sveta is the boys slut and Mira is too
 			elseif npc_QW['A63'] >= 13 and npc_QW['A60'] >= 11 and gadriver_gang < 3:
 				cla
@@ -684,7 +684,7 @@ if $ARGS[0] = 'gopforest_kolyamba':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
 				'Walking through the forest you met Kolyamba. After spotting him, you tried to dress, but Kolyamba, without wasting another minute grabbed you by the hand and dragged you into the nearest bush.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 5 & gt 'hunters', 'start'
+				act 'Go with him':gt'mitkasex','forest1','A61'
 			end
 		! with Mira
 		else
@@ -808,7 +808,7 @@ if $ARGS[0] = 'gopforest_kolyamba':
 				 if temp_gadf = 1:'Walking through the forest with Mira, you come face-to-face with Kolyamba. You yelp in surprise, and rush to your clothing. You are running away with Mira, but before you get too far Kolyamba grabs you in his arms and drags you with him into the nearest bush.'
 				 if temp_gadf = 2:'Walking through the forest you saw Kolyamba. Realizing that he hasn''t noticed you yet, you decide to...'
 
-				if temp_gadf = 1:act 'Go with him':Miraloc = 0 & forest_gopsex = 1 & temphunt = 5 & gt 'hunters', 'start'
+				if temp_gadf = 1:act 'Go with him':MiraLoc = 0 & gt 'mitkasex', 'forest1', 'A61'
 				if temp_gadf = 2:
 					act 'Hide':
 						cla
@@ -894,7 +894,7 @@ if $ARGS[0] = 'gopforest_vasyan':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
 				'Walking through the forest you met Vasyan. Seeing you, he scratched his balls and dragged you into the nearest bushes.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 6 & gt 'hunters', 'start'
+				act 'Go with him':gt 'mitkasex','forest1','A62'
 			end
 		! with Mira
 		else
@@ -951,7 +951,7 @@ if $ARGS[0] = 'gopforest_vasyan':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
 				'Walking through the woods with Mira you met Vasyan. Scratching his balls and not paying any attention to Mira, who was standing right next to him, he dragged you into the nearest bush.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 6 & gt 'hunters', 'start'
+				act 'Go with him':gt'mitkasex','forest1','A62'
 			! Sveta is the boys slut and Mira is too and Sveta still the village whore
 			elseif npc_QW['A63'] >= 13 and npc_QW['A60'] >= 11 and gadriver_gang < 3:
 				cla
@@ -1042,7 +1042,7 @@ if $ARGS[0] = 'gopforest_vasyan':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
 				'Walking through the forest you met Vasyan. After spotting him, you tried to dress, but Vasyan, without wasting another minute grabbed you by the hand and dragged you into the nearest bush.'
 
-				act 'Go with him':forest_gopsex = 1 & temphunt = 6 & gt 'hunters', 'start'
+				act 'Go with him':gt'mitkasex','forest1','A62'
 			end
 		! with Mira
 		else
@@ -1166,7 +1166,7 @@ if $ARGS[0] = 'gopforest_vasyan':
 				if temp_gadf = 1:'Walking through the forest with Mira, you come face-to-face with Vasyan. You yelp in surprise, and rush to your clothing. You are running away with Mira, but before you get too far Vasyan grabs you in his arms and drags you with him into the nearest bush.'
 				if temp_gadf = 2:'Walking through the forest you saw Vasyan. Realizing that he hasn''t noticed you yet, you decide to...'
 
-				if temp_gadf = 1:act 'Go with him':Miraloc = 0 & forest_gopsex = 1 & temphunt = 6 & gt 'hunters', 'start'
+				if temp_gadf = 1:act 'Go with him':MiraLoc = 0 & gt 'mitkasex','forest1','A62'
 				if temp_gadf = 2:
 					act 'Hide':
 						cla
@@ -1228,7 +1228,7 @@ if $ARGS[0] = 'gopforest_2boys':
 	if $clothingworntype ! 'nude':
 		! alone in forest
 		if MiraLoc ! 3:
-			temphunt = rand(4,6)
+			temphunt = rand(1,3)
 			! Sveta not the boys slut or not the village whore
 			if npc_QW['A63'] < 13 or gadriver_gang >= 3:
 				cla
@@ -1238,11 +1238,11 @@ if $ARGS[0] = 'gopforest_2boys':
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/2boys.'+rand(1,2)+'.jpg"></center>'
-				if temphunt = 4:
+				if temphunt = 1:
 					'Walking through the forest you met Mitka and Kolyamba. You chatted with them a bit and went on.'
-				elseif temphunt = 5:
+				elseif temphunt = 2:
 					'Walking through the forest you met Mitka and Vasyan. You chatted with them a bit and went on.'
-				elseif temphunt = 6:
+				elseif temphunt = 3:
 					'Walking through the forest you met Kolyamba and Vasyan. You chatted with them a bit and went on.'
 				end
 
@@ -1256,15 +1256,15 @@ if $ARGS[0] = 'gopforest_2boys':
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/2boys.'+rand(1,2)+'.jpg"></center>'
-				if temphunt = 4:
+				if temphunt = 1:
 					'Walking through the forest you met Mitka and Kolyamba. Seeing you, they grinned and dragged you to the bushes.'
-				elseif temphunt = 5:
+				elseif temphunt = 2:
 					'Walking through the forest you met Mitka and Vasyan. Seeing you, they grinned and dragged you to the bushes.'
-				elseif temphunt = 6:
+				elseif temphunt = 3:
 					'Walking through the forest you met Kolyamba and Vasyan. Seeing you, they grinned and dragged you to the bushes.'
 				end
 
-				act 'Go with them':forest_gopsex = 2 & gt 'huntersex', 'doublelovesex'
+				act 'Go with them':gt'mitkasex','forest2',temphunt
 			end
 		! with Mira
 		else
@@ -1350,7 +1350,7 @@ if $ARGS[0] = 'gopforest_2boys':
 					'Walking through the forest with Mira you meet Kolyamba and Vasyan. Seeing you, they smiled and not paying any attention to Mira, who was standing right next to them, they dragged you into the nearest bush.'
 				end
 
-				act 'Go with them':forest_gopsex = 2 & gt 'huntersex', 'doublelovesex'
+				act 'Go with them':gt'mitkasex','forest2',mitboyrand
 			! Sveta and Mira are both the boys slut and still the village whore
 			elseif npc_QW['A63'] >= 13 and npc_QW['A60'] >= 11 and gadriver_gang < 3:
 				cla
@@ -1395,7 +1395,7 @@ if $ARGS[0] = 'gopforest_2boys':
 		inhib_exp += rand(1,3)
 		! alone in forest
 		if MiraLoc ! 3:
-			temphunt = rand(4,6)
+			temphunt = rand(1,3)
 			! Sveta is not the boys slut or is not the village whore
 			if npc_QW['A63'] < 13 or gadriver_gang >= 3:
 				cla
@@ -1465,7 +1465,7 @@ if $ARGS[0] = 'gopforest_2boys':
 					'Walking through the forest you met Kolyamba and Vasyan. Seeing them you tried to run away and get dressed, but without wasting another minute they grabbed you by the arms and dragged you into the nearest bush.'
 				end
 
-				act 'Go with them':forest_gopsex = 2 & gt 'huntersex', 'doublelovesex'
+				act 'Go with them':gt 'mitkasex', 'forest2', temphunt
 			end
 		! with Mira
 		else
@@ -1628,12 +1628,12 @@ if $ARGS[0] = 'gopforest_2boys':
 						'Walking through the forest with Mira, you come face-to-face with Kolyamba and Vasyan. You yelp in surprise, and rush to your clothing. You are running away with Mira, but before you get too far the guys grab you by the arms and drag you with them into the nearest bush.'
 					end
 				else
-					if mitboyrand = 4:'Walking through the forest with Mira you saw Mitka and Kolyamba. Realizing that they haven''t noticed you yet, you decide to...'
-					if mitboyrand = 5:'Walking through the forest with Mira you saw Mitka and Vasyan. Realizing that they haven''t noticed you yet, you decide to...'
-					if mitboyrand = 6:'Walking through the forest with Mira you saw Kolyamba and Vasyan. Realizing that they haven''t noticed you yet, you decide to...'
+					if mitboyrand = 1:'Walking through the forest with Mira you saw Mitka and Kolyamba. Realizing that they haven''t noticed you yet, you decide to...'
+					if mitboyrand = 2:'Walking through the forest with Mira you saw Mitka and Vasyan. Realizing that they haven''t noticed you yet, you decide to...'
+					if mitboyrand = 3:'Walking through the forest with Mira you saw Kolyamba and Vasyan. Realizing that they haven''t noticed you yet, you decide to...'
 				end
 
-				if temp_gadf = 1:act 'Go with them':Miraloc = 0 & forest_gopsex = 2 & gt 'huntersex', 'doublelovesex'
+				if temp_gadf = 1:act 'Go with them':MiraLoc = 0 & gt 'mitkasex', 'forest2', mitboyrand
 				if temp_gadf = 2:
 					act 'Hide':
 						cla
@@ -1729,7 +1729,7 @@ if $ARGS[0] = 'gopforest_3boys':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/3boys.'+rand(1,2)+'.jpg"></center>'
 				'Walking through the forest you met Mitka, Kolyamba and Vasyan. Seeing you, they grinned and dragged you with them to the bushes.'
 
-				act 'Go with them':forest_gopsex = 3 & gt 'hunters', 'start'
+				act 'Go with them':gt 'mitkasex','forest3'
 			end
 		! with Mira
 		else
@@ -1783,7 +1783,7 @@ if $ARGS[0] = 'gopforest_3boys':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/3boys.'+rand(1,2)+'.jpg"></center>'
 				'Walking through the forest with Mira you meet Mitka, Kolyamba and Vasyan. Seeing you, they smiled and not paying any attention to Mira, who was standing right next to them, they dragged you into the nearest bush.'
 
-				act 'Go with them':forest_gopsex = 3 & gt 'hunters', 'start'
+				act 'Go with them':gt'mitkasex','forest3'
 			! Sveta is the boys slut and so is Mira and still the village whore
 			elseif npc_QW['A63'] >= 13 and npc_QW['A60'] >= 11 and gadriver_gang < 3:
 				cla
@@ -1875,7 +1875,7 @@ if $ARGS[0] = 'gopforest_3boys':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/3boys.'+rand(1,2)+'.jpg"></center>'
 				'Walking through the forest you met Mitka, Kolyamba and Vasyan. Seeing them you tried Run away and get dressed, but without wasting another minute they grabbed you by the arms and dragged you into the nearest bush.'
 
-				act 'Go with them':forest_gopsex = 3 & gt 'hunters', 'start'
+				act 'Go with them':gt 'mitkasex', 'forest3'
 			end
 		! with Mira
 		else
@@ -2006,7 +2006,7 @@ if $ARGS[0] = 'gopforest_3boys':
 					'Walking through the forest with Mira you saw Mitka, Kolyamba and Vasyan. Realizing that they haven''t noticed you yet, you decide to...'
 				end
 
-				if temp_gadf = 1:act 'Go with them':Miraloc = 0 & forest_gopsex = 3 & gt 'hunters', 'start'
+				if temp_gadf = 1:act 'Go with them':MiraLoc = 0 & gt 'mitkasex', 'forest3'
 				if temp_gadf = 2:
 					act 'Hide':
 						cla
@@ -2033,7 +2033,7 @@ if $ARGS[0] = 'gopforest_3boys':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/forest/3boys.'+rand(1,2)+'.jpg"></center>'
 				'Walking through the forest with Mira, you come face-to-face with Mitka, Kolyamba and Vasyan. Seeing you naked they scratched their balls and dragged you into the nearest bush.'
 
-				act 'Go with them': gt 'mitkasex', 'forest2', rand(1,3)
+				act 'Go with them': gt 'mitkasex', 'forest3'
 			! Sveta and Mira are both not the boys sluts
 			else
 				cla
@@ -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

locations/gadprostitutes.qsrc

@@ -1,7 +1,6 @@
 # gadprostitutes
 
 if $ARGS[0] = 'start':
-	*clr & cla
 	$loc = 'gadprostitutes'
 	$metka = 'start'
 	$location_type = 'public_outdoors'
@@ -13,88 +12,235 @@ if $ARGS[0] = 'start':
 	CLOSE ALL
 	gs 'gadukino_event', 'sound'
 	gs'stat'
-
+	
+	*clr & cla
+	
 	'<center><h4>Main Road near Gadukino</h4></center>'
 	if month >= 11 or month <= 3:
 		'<center><img <<$set_imgh>> src="images/locations/highway/roadwinter.jpg"></center>'
 	else
 		'<center><img <<$set_imgh>> src="images/locations/highway/road.jpg"></center>'
 	end
-	'You walk out to the highway.'
-	if hour < 18:
-		'You a look around for Mira but don''t see her here, maybe come back later in the evening.'
-	elseif hour >= 18 and hour <= 23:
-		if miraprost > 0 and npc_QW['A60'] > 30:
-			'You a look around for Mira and spot her standing below a streetlight down the road a little ways.'
-			if mirapimp = 0:
-				pcs_dom += RAND(2,6)
-				mirapimp = 1
-				'You call her over to you. Mira, hurries over and looks at you with downcast eyes. "Hi, <<$pcs_nickname>>. You having a good night?"'
-					'You look at her angryly. "A better question, my lovely whore, is are you having a good night"? I want 300 <b>₽</b> per customer you have each night." You tell her earnestly.'
-					'Mira looks up in shock and with a hurt look on her face. "What are you talking about? Do you think I am a hooker?"'
-				'You step up to her and place your hand on her face. Mira closes her eyes and leans into your hand. You look into her eyes once she opens them and then SLAP her hard across the face. Mira falls to the ground and starts to cry. "You''re my property whore. You will do whatever I tell you. You will never lie to me ever again, or I swear I will make you pay. Understand me?!"'
-					'Mira nods and she wipes away tears.'
-					'You reach down and help her back to her feet. You brush her off and help her fix her makeup. "Good, now get that cute ass back out on that road and earn us some money."'
-					'You give Mira a little slap on the ass and smile as you watch Mira start her life as your prostitute.'
+	
+	if MiraLoc ! 8 and npc_QW['A60'] > 15 and hour >= 16 and hour <= 19: MiraLoc = 8
+	if MiraLoc ! 8 and npc_QW['A60'] > 15: 'You look around for Mira but don''t see her here. She must be doing something else right now.'
+	!if gadriver_gang = 2:
+	!	if PCloStyle <> 4:
+	!		'You are not wearing the right clothes to prostitute yourself.'
+	!	elseif pcs_sleep <= 0:
+	!		'You are too tired to prostitute yourself.'
+	!	end
+	!end
+	if hour >= 16 and hour <= 23:
+		! event to remove Sveta from being miras pimp if she becomes the boys slut, the village whore, or a sub
+		if MiraLoc = 8 and mirapimp = 1 and (npc_QW['A63'] >= 10 or gadriver_gang = 2 or sub > 10):
+			*clr & cla
+			
+			mirapimp = 0
+			sub += 5
+			minut += 5
+			gs 'stat'
+			
+			gs 'Miroslava', 'miraclothes'
+			
+			'Mira spots you and confidently walks up to you. You''re not sure what has gotten into her but from the look on her face you probably won''t like it.'
+			'As soon as you are face to face with Mira she winds up and smacks you across the face as hard as she can. You are stunned a bit by and stagger to the ground. You feel warm tears begin to run down your face.'
+			'Mira commands you, "Stand up bitch!"'
+			'You rise and meet her gaze, she looks very pleased with herself. "Remember that. Now you know exactly how that feels" she says.'
+			if npc_QW['A63'] >= 10:
+				'Mira continues, "Look at you, just another slut. Mitka, Kolyamba, and Vasyan told me now much they all love fucking and sharing you now. You thought you were so much better than me, well no more! I''m not working for you anymore. You have proven yourself perfectly capable of enjoying getting shared by a group of friends."'
+			elseif gadriver_gang = 2:
+				'Mira continues, "Look at you, just another whore. All the village men can talk about is how much you moaned for each and every one of them. You thought you were so much better than me, well no more! I''m not working for you anymore. You have proven yourself perfectly capable of enjoying getting gangbanged by multiple groups of strangers."'
+			elseif sub > 0:
+				'Mira continues, "Look at you, so meek and submissive. I''ve heard rumors of how you love to submit yourself to others. You thought you were so much better than me, well no more! I''m not working for you anymore. You cannot make me."'
+			end
+			'After Mira is done with her preaching, you try to think of something witty to say or raise your hand to slap her back, but you just can''t bring yourself to do it.'
+			'Mira sees the defeated look in your eyes and knows that she has won. She pulls you into an embrace and whispers, "It''s alright <<$pcs_nickname>>. We can just be friends again. And if you want to, maybe you can come work with me instead?"'
+			
+			act 'Finish':gt'gadprostitutes','start'
+		else
+			if MiraLoc = 8:
+				'You see Mira standing below a streetlight a little ways down the road.'
+				! event to become miras pimp if not the boys slut, not the village whore, and a dom
+				if mirapimp = 0 and npc_QW['A63'] < 10 and gadriver_gang = 0 and pcs_dom > 10:
+					act 'Make Mira your prostitute':
+						*clr & cla
+						
+						mirapimp = 1
+						pcs_dom += 5
+						minut += 5
+						gs 'stat'
+						
+						gs 'Miroslava', 'miraclothes'
+						
+						'You call her over to you. Mira, hurries over and looks at you with downcast eyes.  "Hi, <<$pcs_nickname>>.  You having a good night?"'
+						'You look at her angrily. "A better question, my lovely whore, is ''Are you having a good night''?  I want 500 <b>₽</b> per customer you have each night."  You tell her earnestly.'
+						'Mira looks up in shock and with a hurt look on her face.  "What are you talking about?  Do you think I am a hooker?"'
+						'You step up to her and place your hand on her face.  Mira closes her eyes and leans into your hand.  You look into her eyes once she opens them and then SLAP her hard across the face.  Mira falls to the ground and starts to cry.  "You''re my property whore.  You will do whatever I tell you.  You will never lie to me ever again, or I swear I will make you pay.  Understand me?!"'
+						'Mira nods and she wipes away tears.'
+						'You reach down and help her back to her feet.  You brush her off and help her fix her makeup.  "Good, now get that cute ass back out on that road and earn us some money."'
+						'You give Mira a little slap on the ass and smile as you watch Mira start a new chapter of her life as your prostitute.'
+						
+						act 'Finish':gt'gadprostitutes','start'
+					end
+				end
+				! events to prostitute just Mira
+				act 'Watch Mira prostitute herself': gt 'gadprostitutes', 'just_mira'
+				! can do prostitution with Mira if Sveta is the village whore - this can be achieved by doing Mitka''s questline
+				!if gadriver_gang = 2 and mirapimp = 0 and PCloStyle = 4 and pcs_sleep > 0:
+					! act 'Prostitute yourself with Mira':gt 'gadprostitutes', 'with_mira'
+				!end
+			end
+			! can do prostitution without Mira if Sveta is the village whore - this can be achieved by doing Mitka''s questline
+			!if gadriver_gang = 2 and PCloStyle = 4 and pcs_sleep > 0:
+			!	act 'Prostitute yourself':gt 'gadprostitutes', 'without_mira'
+			!end
+			act 'Walk back to the highway': nroad = 10 & gt 'road'
+		end
+	else
+		'It is not a good time of day for prostitution. Try coming back later in the evening.'
+		act 'Walk back to the highway': nroad = 10 & gt 'road'
+	end
+end
 
-				act 'Finish':gt 'gadprostitutes', 'start'
-			else
+! Prostitution events for just Mira - SM
+if $ARGS[0] = 'just_mira':
+	gs 'Miroslava', 'miraclothes'
+	
+	if hour >= 16 and hour <= 23:
+		act 'Wait for Mira to attract a customer':
+			*clr & cla
+			minut += 30
+			gs 'stat'
+			
+			temp_gadpro = rand(1,10)
+			if temp_gadpro > 5:
+				miraprost += 1
+				if npc_QW['A60'] < 20: npc_QW['A60'] += 1 
+				
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
+				
+				'It isn''t long before a customer pulls up in a nice vehicle. Mira approaches the vehicle and starts talking to the driver.'
+				'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle. It pulls away, but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
+				
 				act 'Watch Mira and the customer':
-					pcs_dom += RAND(0,2)
-					cls
-					minut += 30
-					temp_gad_pro = RAND(0,5)
-					if temp_gad_pro = 0:
-						miraprost += 1
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/sex/mirawish2_2.jpg"></center>'
-						'It isn''t long before a customer pulls up in a nice vehicle. Mira approaches the vehicle and starts talking to the driver.'
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/miraprost.jpg"></center>'
-						'You can''t hear what she is saying but after only a few minutes the door opens and Mira steps into the vehicle. It pulls away, but doesn''t go far. You see it pull off the main road and head down a dirt road. Smiling and wanting to see the action, you run into the woods trying to head off the vehicle.'
-					elseif temp_gad_pro = 1:
-						miraprost += 1
-						cls
-						gs 'arousal', 'voyeur', 25
+					
+					temp_gadpro = rand(0,1)
+					if temp_gadpro = 0:
+						*clr & cla
+						gs 'arousal', 'voyeur', 10, 'exhibitionism'
 						gs 'stat'
+						
 						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1.mp4"></video></center>'
+						
 						'You walk up and look into the car. You see Mira giving one hell of a blowjob to her customer. Her head is bobbing up and down on his cock.'
-						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_1.mp4"></video></center>'
-						'You duck for cover as the guy suddenly gets out of the car and opens the passenger door, grabs Mira''s head and starts forcing his cock deep into her throat.'
-						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
-						'Eventually, the guy grunts and cums all over Mira''s face and into her mouth. The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
-						'Mira walks back towards the road counting the money he gave her as she absentmindedly licks the cum as it drips down her face. She smiles at you and shows you the money as you join her.'
-						'<center><img <<$set_imgh>> src="images/characters/village/mira/miramoney.jpg"></center>'
-					elseif temp_gad_pro = 2:
-						cls
-						pcs_horny += 20
-						minut += 20
+						
+						act 'Hide':
+							*clr & cla
+							gs 'arousal', 'voyeur', 10, 'exhibitionism'
+							gs 'stat'
+							
+							'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_1.mp4"></video></center>'
+							
+							'You duck for cover as the guy suddenly gets out of the car and opens the passenger door, grabs Mira''s head and starts forcing his cock deep into her throat.'
+							
+							act 'Keep watching':
+								*clr & cla
+								gs 'arousal', 'voyeur', 10, 'exhibitionism'
+								gs 'stat'
+								
+								'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost1_2.mp4"></video></center>'
+								'Eventually, the guy grunts and cums all over Mira''s face and into her mouth. The nicely dressed man pulls Mira out of the car, hands her a few bills and then drives off.'
+								'Mira walks back towards the road counting the money he gave her as she absentmindedly licks the cum as it drips down her face. She smiles at you and shows you the money as you join her.'
+								gs 'stat'
+								
+								act 'Finish':
+									*clr & cla
+									if mirapimp = 1: money += 500
+									gs 'arousal', 'end'
+									gs 'stat'
+									
+									gt 'gadprostitutes', 'just_mira'
+								end
+							end
+						end
+					elseif temp_gadpro = 1:
+						*clr & cla
+						gs 'arousal', 'voyeur', 10, 'exhibitionism'
 						gs 'stat'
+						
 						'<center><video autoplay loop src="images/characters/village/mira/miraprost2.mp4"></video></center>'
-						'You walk up and look into the van. You see Mira showing the john her tits and rubbing her pussy. You see a hungry gleam in the guys eyes, which Mira returns in force.'
-						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_1.mp4"></video></center>'
-						'Mira and her john jump into the back of the van and you watch as he start fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial ecstasy, partial pain, you know the John is hitting or entering her cervix.'
-						'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
-						'You have to duck behing some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
-						'<left><video autoplay loop src="images/locations/gadukino/sex/mira/miracumpump.mp4"></video></left>''<right><video autoplay loop src="images/locations/gadukino/sex/mira/miracumdump.mp4"></video></right>'
-						'After the wild sex, Mira and the john sit in the van and talk for a bit. He gives her a nice wad of cash and she starts walking to the village. Seeing you, she smiles and waves a fist full of bills.'
-						gs 'arousal', 'voyeur', 25
-						gs 'stat'
-					else
-						'Mira walks along the street showing off her legs to passing car and trucks, but no one stops to partake of her services.'
+						'You walk up and look into the van. You see Mira showing her customer her tits and rubbing her pussy. You see a hungry gleam in the guy''s eyes, which Mira returns right back.'
+						
+						act 'Keep watching':
+							*clr & cla
+							gs 'arousal', 'voyeur', 10, 'exhibitionism'
+							gs 'stat'
+							
+							'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_1.mp4"></video></center>'
+							
+							'Mira and the guy jump into the back of the van and you watch as he starts fucking her wet pussy. His hand covers her mouth as she screams in ecstasy. The guy pounds his 20cm cock deep into her pussy. From Mira''s grunts of partial ecstasy, partial pain, you know the guy is hitting or entering her cervix.'
+							
+							act 'Hide':
+								*clr & cla
+								gs 'arousal', 'voyeur', 10, 'exhibitionism'
+								gs 'stat'
+								
+								'<center><video autoplay loop src="images/characters/village/mira/sex/miraprost2_2.mp4"></video></center>'
+								
+								'You have to duck behind some bushes as they move outside the van. The guy continues to pound into Mira''s pussy until he cums...and cums...and cums. '
+								'After the wild sex, Mira and the guy sit in the van and talk for a bit. He gives her a nice wad of cash and she starts walking back towards the road. She smiles at you and shows you the money as you join her.'
+								
+								act 'Finish':
+									*clr & cla
+									if mirapimp = 1: money += 500
+									gs 'arousal', 'end'
+									gs 'stat'
+									
+									gt 'gadprostitutes', 'just_mira'
+								end
+							end
+						end
 					end
-					act 'Walk back to the village': gt 'gadukino'
 				end
-			end
-			act 'Walk back to the village':
-				gs 'arousal', 'end'
-				gs 'stat'
-				gt 'gadukino'
+			else
+				'<center><img <<$set_imgh>> src="images/characters/village/mira/mirawish2_1.jpg"></center>'
+				
+				'Mira walks along the road showing off her body to passing car and trucks, but no one stops to pick her up.'
+				
+				act 'Continue' :gt 'gadprostitutes', 'just_mira'
 			end
 		end
+		
+		act 'Leave Mira to her work': gt 'gadprostitutes', 'start'
 	else
-		'At this time no one will be here.'
+		'It is too late for Mira to work as a prostitute now.'
+		act 'Walk back to Gadukino together':MiraLoc = 0 & gt 'gadukino', ''
 	end
-	act 'Walk back to the village': gt 'gadukino'
 end
 
+! Prostitution events for Sveta and Mira together - SM
+!if $ARGS[0] = 'with_mira'
+!	if pcs_sleep <= 0: 'You are too tired to prostitute yourself.'
+!	if pcs_sleep > 0:
+!		act 'Try to attract a customer with Mira':
+!	
+!		end
+!	end
+!	act 'Stop looking for customers with Mira': gt 'gadprostitutes', 'start'
+!end
+
+! Prostitution events for Sveta alone - SM
+!if $ARGS[0] = 'without_mira'
+!	if pcs_sleep <= 0: 'You are too tired to prostitute yourself.'
+!	if pcs_sleep > 0:
+!		act 'Try to attract a customer':
+!			
+!		end
+!	end
+!
+!	act 'Stop looking for customers': gt 'gadprostitutes', 'start'
+!end
+
 --- gadprostitutes ---------------------------------
 

locations/gadroad.qsrc

@@ -1,64 +1,158 @@
 # gadroad
-$location_type = 'secluded'
-$metka = ''
-$loc = 'gadroad'
-gs 'gadukino_event', 'sound'
-$menu_loc = 'gadroad'
-$menu_arg = ''
-menu_off = 0
-clr
-gs'stat'
-!gs'time'
 
-'<center><H4>Forest road</H4></center>'
+if $ARGS[0] = '':
+	$loc = 'gadroad'
+	$metka = ''
+	$location_type = 'public_outdoors'
 
-if month >= 4 and month <= 10:
-	if hour >= 6 and hour < 22:
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
+	$menu_loc = 'gadroad'
+	$menu_arg = ''
+	menu_off = 0
+
+	CLOSE ALL
+	gs 'gadukino_event', 'sound'
+	gs'stat'
+
+	'<center><H4>Forest road</H4></center>'
+
+	if month >= 4 and month <= 10:
+		if hour >= 6 and hour < 22:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
+		end
 	else
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_night.jpg"></center>'
+		if hour >= 8 and hour < 18:
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_winter.jpg"></center>'
+		else
+			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_winter_night.jpg"></center>'
+		end
 	end
-else
-	if hour >= 8 and hour < 18:
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_winter.jpg"></center>'
-	else
-		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadroad_winter_night.jpg"></center>'
+	*nl
+	'A dirt road leading to the outskirts of Gadukino. You are surrounded by grainfields where the grains appear reaching all the way to the heavens.'
+	'The forest '+iif(meadow > 0, 'and meadow ','')+'can be found further down the road away from the village.'
+	*nl
+	! 10% chance of meeting Mitka once per day on the road when Sveta is not the village boys slut or whole villages whore
+	mitkarand = rand(1,10)
+	if mitka_first_drink > 0 and mitkaday ! daystart and hour >= 17 and hour < 20 and mitkarand = 1 and (npc_QW['A63'] < 11 or gadriver_gang > 2):
+		'<a href="exec:gt ''mitka''">Mitka</a> is smoking near the road, he smiles at you as you walk by.'
+	! Meet the boys to drink with them at 20 if Sveta has been invited by Mitka already
+	elseif mitka_first_drink > 0 and hour = 20 and alko < 10 and mitkadrinkday ! daystart:
+		'<a href="exec:gt ''gadroad'',''drinking_invite''">Mitka, Kolyamba, and Vasyan</a> are walking down the road towards the woods, drinking moonshine and talking loudly.'
+	! If Sveta is late to go drink with the boys if she already knows where the trailer is she can still get there
+	elseif mitka_first_drink = 2 and hour > 20 and alko < 10 and mitkadrinkday ! daystart:
+		! if Sveta did not bring Mira with her and Mira has met the boys already then there is a 50% chance she will show up too
+		if MiraLoc ! 5 and npc_QW['A60'] >= 1:
+			mirarand = rand(1,10)
+			if mirarand >= 6: 
+				MiraLoc = 5
+				'You can go drink with Mira, Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partywithMira''">trailer</a> hidden in the woods.'
+			else
+				'You can go drink with Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partyalone''">trailer</a> hidden in the woods.'
+			end
+		else
+			'You can go drink with the Mitka, Kolyamba and Vasyan at their <a href="exec:gt ''mitkabuh'',''partyalone''">trailer</a> hidden in the woods.'
+		end
 	end
-end
 
-'A dirt road leading to the forest. You are surrounded by grainfields where the grains appear reaching all the way to the heavens.'
+	act 'Go to Gadukino':minut += 20 & gt'gadukino'
+	act 'Go into the woods':minut += 30 & gt'gadforest','1'
+	if meadow > 0: act 'Go to the meadow':minut += 20 & gt 'Meadow'
+	act 'Go to the fields':minut += 10 & gt'gadfield','field'
+	if $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour >= 6 and hour < 22 and gadrunday ! daystart:
+		act 'Go for a run (1:00)':
+			*clr & cla
+			menu_off = 1
+			minut += 60
+			fat -= RAND(5,15)
+			run_exp += RAND(3,6)
+			pcs_sweat += 20
+			gadrunday = daystart
+			gs'stat'
 
-act 'Go to Gadukino':minut += 20 & gt'gadukino'
-act 'Go into the woods':minut += 30 & gt'gadforest','1'
-act 'Take a detour to the field':minut += 10 & gt'gadfield','field'
-if $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour >= 6 and hour < 22 and daygadrun ! daystart:
-	act 'Go for a run (1:00)':
-		cls
-		menu_off = 1
-		minut += 60
-		fat -= RAND(5,15)
-		run_exp += RAND(3,6)
-		pcs_sweat += 20
-		daygadrun = daystart
-		gs'stat'
-		!gs'time'
-		if month <= 3 or month >= 11:
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg4.jpg"></center>'
-		elseif month=9 or month=10 or month=4 or month=5:
-			'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg3.jpg"></center>'
-		else
-			if musle >= salo: 
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg1.jpg"></center>'
+			if month <= 3 or month >= 11:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg4.jpg"></center>'
+			elseif month=9 or month=10 or month=4 or month=5:
+				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg3.jpg"></center>'
 			else
-				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg2.jpg"></center>'
-			end	   
+				if musle >= salo: 
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg1.jpg"></center>'
+				else
+					'<center><img <<$set_imgh>> src="images/locations/gadukino/village/gadbeg2.jpg"></center>'
+				end    
+			end
+			'You run for an hour enjoying the scenery.'
+
+			act 'Finish':gt'gadroad'
 		end
-		'You run for an hour enjoying the scenery.'
+	elseif ($clothingworntype ! 'exercise' or $shoeworntype ! 'trainers') and hour >= 6 and hour < 22 and gadrunday ! daystart:
+		'You could go for a run here if you were wearing sports clothes and shoes.'
+	end
+end
+
+if $ARGS[0] = 'drinking_invite':
+	$loc = 'gadroad'
+	$metka = 'drinking_invite'
+	$location_type = 'secluded'
 
-		act 'Further':gt'gadroad'
+	$menu_loc = 'gadroad'
+	$menu_arg = 'drinking_invite'
+	menu_off = 1
+	
+	minut += 5
+	gs 'stat'
+	
+	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
+	'You quickly catch up to the boys who have already started drinking.'
+	!School girl Sveta
+	if StoryLine = 1:
+		! Sveta has never been drinking with Mitka before
+		if mitka_first_drink = 1:
+			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
+			'Kolyamba and Vasyan nod in agreement as they look you over.'
+			'"We know this great spot in the woods to hang out. No one ever bothers us there."'
+		else
+			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
+			'Kolyamba and Vasyan nod in agreement as they look you over.'
+		end
+	! Transformation or New In Town Sveta
+	else
+		if mitka_first_drink = 1:
+			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
+			'"These are my two best friends, Kolyamba and Vasyan. We have grown up in this village our whole lives and do just about everything together."'
+			'Kolyamba and Vasyan quickly introduce themselves and look you over.'
+			'"We know this great spot in the woods to hang out. No one ever bothers us there."'
+		else
+			'Mitka is the first to greet you, "Hey <<$pcs_nickname>>, glad you decided to join us today!"'
+			'Kolyamba and Vasyan nod in agreement as they look you over.'
+		end
+	end
+	'Mitka asks, "Are you ready to go?"'
+	
+	! if Sveta did not bring Mira with her and Mira has met the boys already then there is a 50% chance she will show up too
+	if MiraLoc ! 5 and npc_QW['A60'] >= 1:
+		mirarand = rand(1,10)
+		if mirarand >= 6: MiraLoc = 5
+		'Just as the words leave Mitka''s mouth, Mira comes bounding around the corner.'
+		'"Hey guys, thanks for the invite! <<$pcs_nickname>> is here too, awesome! Let''s go!"'
+	end
+	
+	! Mira is here and both her and Sveta are the town whores
+	! mitkabuh_group has the drinking events for group sex for 2 girls and 3 boys
+	if MiraLoc = 5 and npc_QW['A60'] >= 16 and gadriver_gang = 2:
+		act 'Go with them': minut += 15 & npc_drunk['A60'] = 0 & gt 'mitkabuh_group'
+	! Mira is here and neither or only 1 out 2 of them is the town whore
+	! mitkabuh has the drinking events for group sex for 1 girl and 3 boys or no sex at all if quest is not far enough along
+	elseif MiraLoc = 5:
+		act 'Go with them': minut += 15 & npc_drunk['A60'] = 0 & gt 'mitkabuh'
+	! Mira is not here so Sveta goes by herself
+	else
+		act 'Go with them': minut += 15 & gt 'mitkabuh'
+	end
+	! if Sveta came here to kick off Miras quest then she cannot leave otherwise Sveta is free to decline the offer
+	if npc_QW['A60'] > 0 or (MiraLoc ! 5 and npc_QW['A60'] = 0):
+		act 'No thanks, not tonight': gt 'gadroad'
 	end
-elseif ($clothingworntype ! 'exercise' or $shoeworntype ! 'trainers') and hour >= 6 and hour < 22 and daygadrun ! daystart:
-	'You could go for a run here if you were wearing sports clothes and shoes.'
 end
 
 --- gadroad ---------------------------------

locations/gadukino_event.qsrc

@@ -8,7 +8,6 @@ if $ARGS[0] = 'mira_apologise':
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
 	'Walking through the village you hear someone catching up to you. Turning around, you see Mira nearing you.'
-
 	act 'Continue':
 		*clr & cla
 		minut += 5
@@ -22,6 +21,7 @@ if $ARGS[0] = 'mira_apologise':
 		'"So what now?," you asked, looking at her.'
 		'"Well, if you want, I can make it up to you?" she answered a bit embarrassed.'
 		'While you pondered what to answer, Mira stares at you, biting her lip impatiently.'
+		
 		act 'Agree':
 			*clr & cla
 			minut += 5
@@ -40,7 +40,6 @@ if $ARGS[0] = 'mira_apologise':
 			*clr & cla
 			minut += 30
 			mirasex = 3
-
 			gs 'stat'
 			gs 'Miroslava', 'miraclothes'
 
@@ -80,11 +79,11 @@ if $ARGS[0] = 'mitka_apologise':
 			'"So you won''t have sex with Mira anymore?," you ask relieved.'
 			'"Don''t worry, Mira won''t mind." Mitka snickered.'
 			'"You must stop having sex with her." you look at Mitka with distrust.'
-			'"Well, what can I do. If she begs me to it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
+			'"Well, what can I do. If she begs me to do it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
 			'Mitka starts walking towards Kolyamba''s house. You watch him for a while, until he disappears behind a corner.'
-		else
+		elseif npc_QW['A60'] >= 3:
 			'"And you must stop having sex with Mira." you look at Mitka with distrust.'
-			'"Well, what can I do. If she begs me to it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
+			'"Well, what can I do. If she begs me to do it, I can''t promise I''ll say no." he laughed. "Well, I think we''re all set, I''ll try to avoid Mira... But if she begs me to fuck her I won''t say no."'
 			'Mitka starts walking towards Kolyamba''s house. You watch him for a while, until he disappears behind a corner.'
 		end
 		act 'Go back to the village':gt 'gadukino'
@@ -98,7 +97,7 @@ if $ARGS[0] = 'gang_apologise':
 	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/turn_back.jpg"></center>'
-	'Walking through the village you suddenly hear someone calling out to you by name. Turning back, you see that it is Uncle Stepan, coming your way. Remembering the recent events you pick up your pace. There is no way you want to relive the same thing again.'
+	'Walking through the village you suddenly hear someone calling out to you by name. Turning back, you see that it is Uncle Stepan, coming your way. Remembering the recent events you pick up your pace. There is no way you want to experience that again.'
 	'"<<$pcs_nickname>>, wait, I need to speak with you," Stepan yelled from afar, seeing that you are ready run away.'
 
 	act 'Wait':
@@ -106,13 +105,13 @@ if $ARGS[0] = 'gang_apologise':
 		minut += 5
 		gs 'stat'
 
-		'<center><b><font color = maroon>Uncle Styopa</font></b></center>'
+		'<center><b><font color = maroon>Uncle Stepan</font></b></center>'
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/uncle_stepan.jpg"></center>'
-		'For a moment you hesitated, wondering what he wants. While you contemplating to stay or run away, he caught up with you. He started nervously shifted from foot to foot, clearly not knowing how to begin the conversation. You looked puzzled at him thinking he would be prepared, when he finally speaks up.'
-		'"<<$pcs_nickname>>, -uh," he began, but immediately faltered. "In short, I''m trully sorry for what happened the other night... I don''t know what came over us, it was like a demon possessed me, I got aroused by Mitka''s drunken tales."'
+		'For a moment you hesitate, wondering what he wants. While you are contemplating to stay or run away, he caught up with you. He shifts nervously from foot to foot, clearly not knowing how to begin the conversation. You look puzzled at him thinking he would be prepared, when he finally speaks up.'
+		'"<<$pcs_nickname>>, -uh," he began, but immediately faltered. "In short, I''m trully sorry for what happened the other day... I don''t know what came over us, it was like a demon possessed me, I got aroused by Mitka''s drunken tales of you."'
 		'He looked at you with sorrow in his eyes. You did not expect that anyone of them would be sorry.'
-		'"I had a talk with the other men in the morning, and, uh," uncle Stepan losing his composure. "Well, in short, I decided that I wanted to talk to you, apologize and ask if you could forget about yesterday... I''m really sorry and I''m worried that we might have damaged you physically."'
-		'You looked skeptically at "your uncle", not really knowing if he''s joking or not.'
+		'"I had a talk with the other men in the morning, and, uh," Uncle Stepan losing his composure. "Well, in short, I decided that I wanted to talk to you, apologize and ask if you could forget about yesterday... I''m really sorry and I''m worried that we might have damaged you physically."'
+		'You look skeptically at your "uncle", not really knowing if he''s joking or not.'
 		act 'Continue':
 			*clr & cla
 			minut += 5
@@ -122,13 +121,13 @@ if $ARGS[0] = 'gang_apologise':
 			'Feeling that you''re still skeptical, Uncle Stepan reached into his sweatpants and pulled out a bundle, handing it over to you.'
 			'"Here," he showed the money in your hand. "It''s ten thousand rubles."'
 			'"What do you do want me to do with this?" you asked somewhat annoyed.'
-			'"I don''t know, you can do whatever you want with them," replied uncle Stepan. "Spend it on some treatment, or buy yourself something nice."'
-			'Not knowing what to choose, you look at the money, then at "your uncle."'
+			'"I don''t know, you can do whatever you want with it," replied Uncle Stepan. "Spend it on something relaxing, or buy yourself something nice."'
+			'Not knowing what to choose, you look at the money, then at your "uncle."'
 
 			act 'Take the money':
 				*clr & cla
 				minut += 5
-				pcs_dom -= 1
+				pcs_dom -= 5
 				gadriver_gang = 2
 				money += 10000
 				gs 'stat'
@@ -136,7 +135,7 @@ if $ARGS[0] = 'gang_apologise':
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/village/take_money.jpg"></center>'
 				'"Okay, I accept your money," you finally decide. "Let''s pretend nothing happened yesterday."'
 				'You take the money from his hand.'
-				'"That''s a relief..." Stepan says relieved. "I''ll be on my way."'
+				'"That''s a relief..." Stepan says. "I''ll be on my way."'
 				'You were about to turn and leave, when Uncle Stepan added:'
 				'"And yeah... <<$pcs_nickname>>, none of the men will fuck you like that again, so there''s no need to be afraid."'
 				'"I understand..." you answer, turning away and walking away from him.'
@@ -145,14 +144,14 @@ if $ARGS[0] = 'gang_apologise':
 			act 'Refuse':
 				*clr & cla
 				minut += 5
-				pcs_dom += 1
+				pcs_dom += 5
 				gadriver_gang = 3
 				gs 'stat'
 
 				'<center><img <<$set_imgh>> src="images/pc/speak_to_the_hand.jpg"></center>'
 				'"I don''t need your fucking money, I''m not a prostitute or a whore" you said in a firm voice, clearly annoyed, looking straight into Uncle Stepan eyes. "You think you can buy my silence with some money, are you really that dumb?"'
 				'He starts acting anxiously telling you once more to take the money. "I''ve already said it, I don''t want your money! But you don''t need to worry I won''t tell anyone what happened." you sternly tell him.'
-				'"That''s a relief..." Stepan says relieved. "I''ll be on my way."'
+				'"That''s a relief..." Stepan says. "I''ll be on my way."'
 				'Just as you were leaving, Uncle Stepan added:'
 				'"One last thing <<$pcs_nickname>>. None of the men will try to fuck you anymore. Mitka warned everyone that if it happens again their cannon would be shooting blanks for the rest of their life... If anyone approaches you, you come to me and I''ll sort it out."'
 				'"I understand..." you answer, turning away and walking away from him.'
@@ -183,8 +182,9 @@ if $ARGS[0] = 'gadriver_gang':
 	gs 'stat'
 
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang.jpg"></center>'
-	'You walked along the path, fully immersed in your inner thoughts, you didn''t immediately notice the crowd of drunken village men. Noticing you alone the men turn their attention towards you.'
-	'One of the men grabs you and forces you away from the village. They start stripping you, surround you on all sides, taking out their cocks, warming up for what''s supposed to come. You think about resisting, but considering your reputation in the village, you find it''s not worth fighting, plus there was no way you could fight against this many men so you humbly kneel.'
+	'You walk along the path, fully immersed in your inner thoughts. You don''t pay any attention to the crowd of drunken village men as you walk by. Noticing you alone the men turn their attention towards you.'
+	'One of the men grabs you and forces you away from the village. They start stripping you, surround you on all sides, taking out their cocks, warming up for what''s supposed to come.'
+	'As you humbly kneel, you think about resisting, but considering your reputation in the village, you find it''s not worth fighting, plus there was no way you could fight against this many men.'
 
 	act 'Suck the nearest cock':
 		*clr & cla
@@ -195,7 +195,7 @@ if $ARGS[0] = 'gadriver_gang':
 		guy += 1
 
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_oral1.jpg"></center>'
-		'You took the first available cock in your hand, jerking him off for a bit and then started sucking...'
+		'You take the first available cock in your hand, jerking him off for a bit and then started sucking...'
 		gs 'arousal', 'hj', 5, 'sub', 'gangbang'
 		gs 'arousal', 'bj', 5, 'sub', 'gangbang'
 		minut -= 5
@@ -208,7 +208,7 @@ if $ARGS[0] = 'gadriver_gang':
 			guy += 1
 
 			'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_oral2.jpg"></center>'
-			'You turned around and started sucking on the next cock...'
+			'You turn around and start sucking on the next cock...'
 			gs 'arousal', 'bj', 5, 'sub', 'gangbang'
 			gs 'stat'
 
@@ -219,10 +219,10 @@ if $ARGS[0] = 'gadriver_gang':
 				guy += 1
 
 				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_oral3.jpg"></center>'
-				'The men continued piling up, one after another. Some of the men got so impatient they shoved two cocks at you at once. You sucked each one of them off, embracing their penis head with your <<$liptalk>> lips, deepthroating them all. '
-
+				'The men continue lining up, one after another. Some of the men are so impatient they shoved two cocks at you at once. You sucked each one of them off, embracing their penis with your <<$liptalk>> lips, deepthroating them all.'
 				gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 				gs 'stat'
+				
 				act 'Make the first trio cum':
 					*clr & cla
 					minut += 5
@@ -231,19 +231,18 @@ if $ARGS[0] = 'gadriver_gang':
 					gs 'cum_call', 'stomach', $boy2, 1
 
 					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_cum1.jpg"></center>'
-					'It doesn''t take long before the first men finish, cumming in your mouth, on the face and chest. You continue sucking more men off, however...'
-
+					'It doesn''t take long before the first men finish, cumming in your mouth, and on your face and chest. You continue sucking more men off, however...'
 					gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 					gs 'stat'
-					act 'Continue':
+					
+					act 'Get penetrated':
 						*clr & cla
 						gs 'npcgeneratec', 0, 'some country man', rand(19,45)
 						gs 'boyStat', $npclastgenerated
 						guy += 1
 
 						'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog1.jpg"></center>'
-						'Feeling ecstatic, you didn''t even notice that you''ve changed position, teasing the men with your ass. While you were busy pleasing someone''s cock with your mouth, one of the men enetered your <<$vaginatipe2>> vagina from behind.'
-
+						'You are actually feeling a bit ecstatic from all of this, you didn''t even notice that you''ve changed position. Your ass sticks out in the air teasing the men. While you were busy pleasing someone''s cock with your mouth, one of the men enetered your <<$vaginatipe2>> vagina from behind.'
 						gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 						gs 'arousal', 'vaginal', 5, 'sub', 'gangbang'
 						minut -= 5
@@ -268,14 +267,14 @@ if $ARGS[0] = 'gadriver_gang':
 							pose = 1
 							if rand(1,2) = 1:gs 'dinsex','sexcum'
 
-							act 'Continue':
+							act 'Let another man fuck your ass':
 								*clr & cla
 								gs 'npcgeneratec', 0, 'drunk man', rand(19,45)
 								gs 'boyStat', $npclastgenerated
 								guy += 1
 
 								'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog3.jpg"></center>'
-								'The third man was in no hurry to start pounding your pussy, instead you felt his fingers exploring your <<$anustipe>> anus.'
+								'The third man was in no hurry to to start pounding your pussy, instead you felt his fingers exploring your <<$anustipe>> anus.'
 								if pcs_ass <= 5:'"Well, well what a tight hole you have here..." you hear a male voice. "Let me help you stretch it out."'
 								if pcs_ass <= 10:'You could only mumble in protest as your mouth was busy.'
 
@@ -293,7 +292,7 @@ if $ARGS[0] = 'gadriver_gang':
 									npc_sex[$boy] += 1
 
 									'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog2.jpg"></center>'
-									'The next man, not wanting to be worse than the man before, grabbed the cock and thrusted it in your anus and started pounding you relentlessly.'
+									'The next man, not wanting to be outdone by the man before, grabbed his cock, thrust it in your anus and started pounding you relentlessly.'
 
 									gs 'dinSex','boy_wants_anal','lubri'
 									gs 'dinsex','analsex'
@@ -302,7 +301,7 @@ if $ARGS[0] = 'gadriver_gang':
 									minut -= 5
 									gs 'stat'
 
-									act 'Continue':
+									act 'Lie down':
 										*clr & cla
 										gs 'boyStat', 'A171'
 										npc_sex[$boy] += 1
@@ -327,7 +326,7 @@ if $ARGS[0] = 'gadriver_gang':
 											guy += 1
 
 											'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_mis2.jpg"></center>'
-											'Your next "fan" steps up pounding your sore pussy.'
+											'Your next "fan" steps up to pound your sore pussy.'
 
 											gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 											gs 'arousal', 'vaginal', 5, 'sub', 'gangbang', 'rough'
@@ -337,14 +336,14 @@ if $ARGS[0] = 'gadriver_gang':
 											if rand(1,2) = 1:gs 'dinsex','sexcum'
 											gs 'stat'
 
-											act 'Continue':
+											act 'Watch Vasyan pound you':
 												*clr & cla
 												minut += 5
 												gs 'boyStat', 'A62'
 												npc_sex[$boy] += 1
 
 												'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_mis3.jpg"></center>'
-												'You see a familiar face again, Vasyan.'
+												'You see a familiar face again, this time it is Vasyan.'
 												'"Mitka and Kolyamba are also here somewhere waiting for their turn", he tells you before shoving his cock deep inside you.'
 
 												gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
@@ -356,7 +355,7 @@ if $ARGS[0] = 'gadriver_gang':
 												gs 'stat'
 												*pl
 
-												act 'Continue':
+												act 'Kneel for them':
 													*clr & cla
 													minut += 5
 													if pcs_health <= 100:pcs_health += 100
@@ -367,9 +366,9 @@ if $ARGS[0] = 'gadriver_gang':
 													gs 'stat'
 
 													'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_oral4.jpg"></center>'
-													'The men decide that your holes need a rest, so the next few men are only going to get oral pleasure. They tell you to get on your knees and ordered you to suck.'
+													'The men decide that your holes need a rest, so the next few men are only going to get oral pleasure. They tell you to get on your knees and order you to suck.'
 
-													act 'Continue':
+													act 'Make this group cum':
 														*clr & cla
 														gs 'cum_call', 'mouth', $boy, 1
 														swallow += 1
@@ -390,7 +389,7 @@ if $ARGS[0] = 'gadriver_gang':
 														'They finish and walk away.'
 														gs 'stat'
 
-														act 'Continue':
+														act 'Bend over':
 															*clr & cla
 															gs 'npcgeneratec', 0, 'man', rand(19,45)
 															gs 'boyStat', $npclastgenerated
@@ -408,7 +407,7 @@ if $ARGS[0] = 'gadriver_gang':
 															'The men cum and walk away feeling satisfied.'
 															gs 'stat'
 
-															act 'Continue':
+															act 'Please them all':
 																*clr & cla
 																gs 'npcgeneratec', 0, 'unfamiliar guy', rand(19,45)
 																gs 'boyStat', $npclastgenerated
@@ -442,7 +441,7 @@ if $ARGS[0] = 'gadriver_gang':
 																	minut -= 5
 																	gs 'stat'
 
-																	act 'Continue':
+																	act 'Slow down a little':
 																		*clr & cla
 																		gs 'npcgeneratec', 0, 'Drunk man', rand(19,45)
 																		gs 'boyStat', $npclastgenerated
@@ -474,14 +473,14 @@ if $ARGS[0] = 'gadriver_gang':
 																			minut -= 5
 																			gs 'stat'
 
-																			act 'Continue':
+																			act 'Look at Kolyamba':
 																				*clr & cla
 																				gs 'npcgeneratec', 0, 'a man', rand(19,45)
 																				gs 'boyStat', $npclastgenerated
 																				guy += 1
 
 																				'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_dog10.jpg"></center>'
-																				'You continue to get anally fucked, when the next man decided to take advantage of your pussy. In the corner of your eye, you notice in Kolyamba standing in the crowd eagerly awaiting his turn.'
+																				'You continue to get anally fucked, when the next man decided to take advantage of your pussy. In the corner of your eye, you notice Kolyamba standing in the crowd eagerly awaiting his turn.'
 
 																				gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 																				gs 'arousal', 'anal', 5, 'sub', 'gangbang'
@@ -491,7 +490,7 @@ if $ARGS[0] = 'gadriver_gang':
 																				if rand(1,2) = 1:gs 'dinsex','sexcum'
 																				gs 'stat'
 
-																				act 'Continue':
+																				act 'Kneel again':
 																					*clr & cla
 																					minut += 5
 																					if pcs_health <= 100:pcs_health += 100
@@ -499,7 +498,7 @@ if $ARGS[0] = 'gadriver_gang':
 																					'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_oral5.jpg"></center>'
 																					'You''re suddenly surprised to find that no one is using your pussy or ass.'
 																					'"I really hope that that was the last one..." you thought.'
-																					'This was just unfortunately wishful thinking. The men soon put you on your knees and then several men shoved their cocks in your face.'
+																					'This was just unfortunately wishful thinking. The men soon put you on your knees and then several men shove their cocks in your face.'
 
 																					act 'Continue':
 																						*clr & cla
@@ -518,7 +517,7 @@ if $ARGS[0] = 'gadriver_gang':
 																						if rand(1,2) = 1:gs 'dinsex','sexcum'
 																						gs 'stat'
 
-																						act 'Continue':
+																						act 'Lower yourself onto the next cock':
 																							*clr & cla
 																							gs 'npcgeneratec', 0, 'drunk guy', rand(19,45)
 																							gs 'boyStat', $npclastgenerated
@@ -591,7 +590,7 @@ if $ARGS[0] = 'gadriver_gang':
 																										minut -= 5
 																										gs 'stat'
 
-																										act 'Continue':
+																										act 'Plead for relief':
 																											*clr & cla
 																											minut += 5
 																											if pcs_health <= 100:pcs_health += 100
@@ -602,7 +601,7 @@ if $ARGS[0] = 'gadriver_gang':
 																											gs 'arousal', 'bj', 5, 'sub', 'gangbang', 'deepthroat'
 																											gs 'stat'
 
-																											act 'Continue':
+																											act 'Suck the last men off':
 																												*clr & cla
 																												minut += 5
 																												gs 'npcgeneratec', 0, 'stranger', rand(19,45)
@@ -620,7 +619,7 @@ if $ARGS[0] = 'gadriver_gang':
 
 																												'<center><img <<$set_imgh>> src="images/locations/gadukino/sex/river/gadriver_gang_cum3.jpg"></center>'
 																												'Like a panicked animal being pushed against a wall you gave it all, using all your might to please them. Your endeavor didn''t go unnoticed, some of men began cumming in your mouth and some of them on your face. There was so much sperm that your chest and abdomen also got covered.'
-																												act 'Continue':
+																												act 'Finally finish':
 																													*clr & cla
 																													minut += 5
 																													gs 'cum_call', 'mouth', $boy3, 1
@@ -700,7 +699,7 @@ if $ARGS[0] = 'gadukino_vasyan':
 
 	'<center><b><font color = maroon>Vasyan Paket</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
-	'Walking through the village you met Vasya. Seeing you, he smiled and waved you over to him. He kisses you on the lips and asks you to join him as he walked into the bushes next to the road.'
+	'Walking through the village you met Vasyan. Seeing you, he smiled and waved you over to him. He kisses you on the lips and asks you to join him as he walked into the bushes next to the road.'
 
 	act 'Go with him': gt 'mitkasex', 'gad1', 'A62'
 end
@@ -708,8 +707,6 @@ end
 if $ARGS[0] = 'gadukino_2boys':
 	menu_off = 1
 	minut += 5
-	gadboyday = daystart
-	mitboyrand = rand(1,3)
 	gs 'stat'
 
 	if month >= 6 and month <= 8:
@@ -717,10 +714,19 @@ if $ARGS[0] = 'gadukino_2boys':
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/2boys.2.jpg"></center>'
 	end
-	if mitboyrand = 1:'Walking through the village you met Mitka and Kolyamba. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
-	if mitboyrand = 2:'Walking through the village you met Mitka and Vasya. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
-	if mitboyrand = 3:'Walking through the village you met Kolyamba and Vasya. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
-
+	if $ARGS[1] = 1:
+		mitkaday = daystart
+		kolyambaday = daystart
+		'Walking through the village you met Mitka and Kolyamba. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
+	elseif $ARGS[1] = 2:
+		mitkaday = daystart
+		vasyanday = daystart
+		'Walking through the village you met Mitka and Vasyan. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
+	elseif $ARGS[1] = 3:
+		kolyambaday = daystart
+		vasyanday = daystart
+		'Walking through the village you met Kolyamba and Vasyan. Seeing you, they grin, grab you by the arms and drag you into the bushes.'
+	end
 	act 'Go with them': gt 'mitkasex', 'gad2'
 end
 
@@ -732,10 +738,10 @@ if $ARGS[0] = 'mira_mitka':
 
 	'<center><b><font color = maroon>Mitka Shkvoryen</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/mitka.jpg"></center>'
-	'Walking with Mira in the village you met Mitka. Seeing Mira, he started playing with his balls and said with a grin.'
-	'"Oh hey Mira, let''s go have some fun getting rid of this boner you just gave me."'
+	'Walking with Mira in the village you met Mitka. Seeing you and Mira, he starts playing with his balls and said with a grin.'
+	'"Oh hey girls, let''s go have some fun getting rid of this boner you both just gave me."'
 
-	act 'Go with them': gt 'mitkasex', 'forest1', 'A63'
+	act 'Go with him': gt 'mitkasex', 'forest1', 'A63'
 end
 
 if $ARGS[0] = 'mira_kolyamba':
@@ -746,9 +752,9 @@ if $ARGS[0] = 'mira_kolyamba':
 
 	'<center><b><font color = maroon>Kolyamba Pyut</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/kolyamba.jpg"></center>'
-	'Walking with Mira in the village you met Kolyamba. Seeing Mira, he started playing with his balls, dragging her into the bushes next to the road.'
+	'Walking with Mira in the village you met Kolyamba. Seeing you and Mira, he starts playing with his balls, and drags you both into the bushes next to the road.'
 
-	act 'Go with them': gt 'mitkasex', 'forest1', 'A61'
+	act 'Go with him': gt 'mitkasex', 'forest1', 'A61'
 end
 
 if $ARGS[0] = 'mira_vasyan':
@@ -759,7 +765,7 @@ if $ARGS[0] = 'mira_vasyan':
 
 	'<center><b><font color = maroon>Vasyan Paket</font></b></center>'
 	'<center><img <<$set_imgh>> src="images/locations/gadukino/village/vasyan.jpg"></center>'
-	'Walking with Mira in the village you met Vasyan. Seeing Mira, he smiled and dragged her into the bushes next to the road.'
+	'Walking with Mira in the village you met Vasyan. Seeing you and Mira, he smiles and drags you both into the bushes next to the road.'
 
 	act 'Go with them': gt 'mitkasex', 'forest1', 'A62'
 end
@@ -767,8 +773,6 @@ end
 if $ARGS[0] = 'mira_2boys':
 	menu_off = 1
 	minut += 5
-	gadboyday = daystart
-	mitboyrand = rand(1,3)
 	gs 'stat'
 
 	if month >= 6 and month <= 8:
@@ -776,17 +780,28 @@ if $ARGS[0] = 'mira_2boys':
 	else
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/2boys.2.jpg"></center>'
 	end
-	if mitboyrand = 1:'Walking with Mira in the village you met Mitka and Kolyamba. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
-	if mitboyrand = 2:'Walking with Mira in the village you met Mitka and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
-	if mitboyrand = 3:'Walking with Mira in the village you met Kolyamba and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
-
+	if $ARGS[1] = 1:
+		mitkaday = daystart
+		kolyambaday = daystart
+		'Walking with Mira in the village you met Mitka and Kolyamba. Seeing you and Mira, they smile at each other, and drag you both into the bushes.'
+	elseif $ARGS[1] = 2:
+		mitkaday = daystart
+		vasyanday = daystart
+		'Walking with Mira in the village you met Mitka and Vasyan. Seeing you and Mira, they smile at each other, and drag you both into the bushes.'
+	elseif $ARGS[1] = 3:
+		kolyambaday = daystart
+		vasyanday = daystart
+		'Walking with Mira in the village you met Kolyamba and Vasyan. Seeing you and Mira, they smile at each other, and drag you both into the bushes.'
+	end
 	act 'Go with them': gt 'mitkasex', 'forest2', $ARGS[1]
 end
 
 if $ARGS[0] = 'mira_3boys':
 	menu_off = 1
 	minut += 5
-	gadboyday = daystart
+	mitkaday = daystart
+	kolyambaday = daystart
+	vasyanday = daystart
 	gs 'stat'
 
 	if month >= 6 and month <= 8:
@@ -795,7 +810,7 @@ if $ARGS[0] = 'mira_3boys':
 		'<center><img <<$set_imgh>> src="images/locations/gadukino/village/drunk.jpg"></center>'
 	end
 
-	'Walking with Mira in the village you met Mitka, Kolyamba and Vasyan. Seeing Mira, they grin, grab her arms and drag her into the bushes.'
+	'Walking with Mira in the village you met Mitka, Kolyamba and Vasyan. Seeing you and Mira, they smile at each other, and drag you both into the bushes.'
 
 	act 'Go with them': gt 'mitkasex', 'forest3'
 end

locations/gameover.qsrc

@@ -1,9 +1,12 @@
 # gameover
 
+$loc = 'gameover'
+$metka = ''
 $menu_loc = 'gameover'
 $menu_arg = ''
 menu_off = 0
 gs 'stat'
+
 '<center><b><font color="maroon">GAME OVER</font></b></center>'
 
 if over = 1:

locations/gaptek.qsrc

@@ -252,7 +252,7 @@ if $ARGS[0] = 'buy_condoms':
 		gap_condom_count += 1
 		gaprezikday = daystart
 		gs 'stat'
-		if npc_QW['A29'] < 3:gaogorod += gap_condom_count
+		if npc_QW['A29'] < 3:gaogorod += 5
 		$gardmess = '<center><font color="green">You bought 5 <b>Condoms</b>.</font></center><br>You pay for the condoms and quickly put them in your pocket, before anyone sees you buy them.'
 		*nl
 		gt 'gaptek', 'garden'
@@ -270,7 +270,7 @@ if $ARGS[0] = 'buy_preg_test':
 		gap_preg_count += 1
 		gapregday = daystart
 		gs 'stat'
-		if npc_QW['A29'] < 3:gaogorod += gap_preg_count
+		if npc_QW['A29'] < 3:gaogorod += 5
 		$gardmess = '<center><font color="green">You bought 1 <b>Pregnancy test</b>.</font></center><br>You pay for the pregnancy tests and quickly put them in your pocket, before anyone sees you buy them.'
 		*nl
 		gt 'gaptek', 'garden'
@@ -289,7 +289,7 @@ if $ARGS[0] = 'buy_lube':
 		gap_lub_count += 1
 		galubriday = daystart
 		gs 'stat'
-		if npc_QW['A29'] < 3:gaogorod += gap_lub_count
+		if npc_QW['A29'] < 3:gaogorod += 3
 		$gardmess = '<center><font color="green">You bought 1 <b>Lubricant</b>.</font></center><br>You pay for the lubricant and quickly put the tubes in your pocket, before anyone sees you buy them.'
 		*nl
 		gt 'gaptek', 'garden'
@@ -306,6 +306,7 @@ if $ARGS[0] = 'buy_birth_control':
 		money -= 1870
 		gap_bc_count += 1
 		gatabletkiday = daystart
+		if npc_QW['A29'] < 3:gaogorod += 5
 		gs 'stat'
 		$gardmess = '<center><font color="green">You bought 1 <b>Birth control pills</b>.</font></center><br>You pay for the birth control pills and quickly put the strips in your pocket, before anyone sees you buy them.'
 		*nl
@@ -318,6 +319,7 @@ if $ARGS[0] = 'buy_enema':
 	money -= 1250
 	$gardmess = '<center><font color="green">You bought an Enema kit</font></center><br>You pay for the enema kit and quickly ask your aunt to put it in a paper bag, before the other customers see it.'
 	*nl
+	if npc_QW['A29'] < 3:gaogorod += 10
 	gt 'gaptek', 'garden'
 end
 

locations/gdk.qsrc

@@ -12,8 +12,13 @@ gs 'stat'
 
 act 'Leave': minut += 2 & gt 'pavResidential'
 
-if hour >= 20 and hour <= 23 and week >= 5 and week < 7:
+if hour >= 9 and hour < 20:
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk.jpg"></center>'
+else
 	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
+end
+
+if hour >= 20 and hour <= 23 and week >= 5 and week < 7:
 	'The entrance to the Community Centre is full of young people, the guys are just hanging around smoking and joking. The girls in small groups, all dressed up and gossiping. You see the bushes moving, Pavlovsks'' famous make out garden.'
 	'You hear people in the alley beside the club. <a href="exec:minut += 5 & gt ''ugel''">Investigate</a>.'
 	if gdkin_in = daystart:
@@ -25,36 +30,30 @@ if hour >= 20 and hour <= 23 and week >= 5 and week < 7:
 			gt 'gdkin'
 		end
 	end
-elseif hour >= 20 and hour <= 23:
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
-	'The Community Centre has sports facilities and offers classes in the evening.'
-	'It houses a small library. Open from 8h until 18h.'
-	'Upstairs, there are some hobby clubs available from 12h until 20h.'
-	'The sports section is open from 14h until 20h during the week and 10h until 20h during the weekend.'
-	'On Friday and Saturday evenings, from 20h to 23h, the main hall is used as a local club, with popular music and dancing. Entrance 25 <b>₽</b>.'
-end
-if hour >= 9 and hour < 20:
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk.jpg"></center>'
+else
 	'The Community Centre has sports facilities and offers classes in the evening.'
 	'It houses a small library. Open from 8h until 18h.'
 	'Upstairs, there are some hobby clubs available from 12h until 20h.'
 	'The sports section is open from 14h until 20h during the week and 10h until 20h during the weekend.'
-	'On Friday and Saturday evenings, from 20h to 23h, the main hall is used as a local club, with popular music and dancing. Entrance 25 <b>₽</b>.'
-elseif hour < 9:
-	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/dk_night.jpg"></center>'
-	'The Community Centre has sports facilities and offers classes in the evening.'
-	'It houses a small library. Open from 8h until 18h.'
-	'Upstairs, there are some hobby clubs available from 12h until 20h.'
-	'The sports section is open from 14h until 20h during the week and 10h until 20h during the weekend.'
-	'On Friday and Saturday evenings, from 20h to 23h, the main hall is used as a local club, with popular music and dancing. Entrance 25 <b>₽</b>.'
+	'On Friday and Saturday evenings, from 20h to midnight, the main hall is used as a local club, with popular music and dancing. Entrance 25 <b>₽</b>.'
 end
 
+
 if (week < 6 and hour >= 14 and hour < 20) or (week >= 6 and hour >= 10 and hour < 20):act 'Go to the sports section':gt 'gdksport', 'start'
 
 if hour >= 8 and hour < 18:act 'Go to the library':gt 'gdkbibl'
 
 if hour >= 12 and hour < 20:act 'Go upstairs to the hobby clubs':gt'gdkkru'
 
+if nerd_night_game = 1 and nerd_night_game_day = daystart and hour = 19:
+	act 'Wait for game night to start':
+		hour = 20
+		minut = 0
+		cls
+		gs'stat'
+		gt 'gdkbibl'
+	end
+end
 if nerd_night_game = 1 and nerd_night_game_day = daystart and hour = 20: act 'Go up stairs to the hobby clubs and <b>Join nerds</b>': gt 'gschool_socialchg','nerd game night'
 
 if hour >= 8:act 'Go to the toilets': gt 'gdktoilet', 'start'

locations/gdkbibl.qsrc

@@ -17,6 +17,17 @@ act 'Leave':gt 'gdk'
 
 act 'Go to the toilets': gt 'gdktoilet', 'start'
 
+if nerd_night_game = 1 and nerd_night_game_day = daystart and hour = 19:
+	act 'Wait for game night to start':
+		hour = 20
+		minut = 0
+		cls
+		gs'stat'
+		gt 'gdkbibl'
+	end
+end
+if nerd_night_game = 1 and nerd_night_game_day = daystart and hour = 20: act 'Join the <b>nerds</b>': gt 'gschool_socialchg','nerd game night'
+
 if hour >= 8 and hour < 18:
 	act 'Read a book on science (1:00)':
 		*clr & cla

locations/gdkin.qsrc

@@ -196,7 +196,7 @@ if $ARGS[0] = '':
 
 			act 'Continue':gt 'gdkin'
 		end
-		act 'Look for your classmates': gs 'SgrupDisco'
+		if StoryLine = 1 and SchoolAtestat = 0: act 'Look for your classmates': gs 'SgrupDisco'
 	elseif hour < 20:
 		'The Club closes. The main lights go on, the music fades and everyone beings to leave.'
 		act 'Go outside':gt 'gdk'

locations/gdksex.qsrc

@@ -66,7 +66,16 @@ if $ARGS[0] = 'outside':
 		end
 		act 'Have a beer':
 			*clr & cla
-			alko += rand(1,2)
+			frost = 0
+			alko += 1
+			fat += 3
+			pcs_health -= 5
+			pcs_energy -= 4
+			if pcs_hydra >= 100:
+				pcs_hydra += 5
+			else
+				pcs_hydra += 10
+			end
 			cumspclnt = 2
 			gs 'cum_cleanup'
 			pcs_breath = 0
@@ -89,14 +98,14 @@ if $ARGS[0] = 'outside':
 						if DPtipe = 2:
 							'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/grab.jpg"></center>'
 							'The guy is too drunk to notice your objections and slides a hand underneath your clothes, squeezing your boobs in his hands.'
-							gs 'gdksex', 'blowjob', 'unpaid'
+							act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 
 							act 'Don''t say anything':
 								*clr & cla
 								minut += 5
 								pcs_horny += 10
 
-								if boynumBlock = 0:boy += 1
+								if boynumBlock = 0:guy += 1
 
 								gs 'boymass', 'B'
 								bmSEX[Tboynum] += 1
@@ -130,7 +139,7 @@ if $ARGS[0] = 'outside':
 							end
 
 							'Your horniness has made you rather frisky as well! You moan softly when <<$boydesc>> exposes your boobs and begins to lick and suck on your nipples.'
-							gs 'gdksex', 'blowjob', 'unpaid'
+							act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 						end
 
 						gs 'gdksex', 'handjob'
@@ -380,7 +389,7 @@ if $ARGS[0] = 'outside':
 									if pcs_horny < 75 or pav_slut < 75: act 'Go back to the disco': gt 'gdkin'
 
 									gs 'gdksex', 'handjob'
-									gs 'gdksex', 'blowjob', 'unpaid'
+									act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 								end
 							end
 						end
@@ -411,21 +420,21 @@ if $ARGS[0] = 'outside':
 		end
 			gs 'gdksex', 'decline'
 			gs 'gdksex', 'handjob'
-			gs 'gdksex', 'blowjob', 'unpaid'
+			act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 	elseif (gdk_nice_guy = 1 and pav_slut >= 100 and pav_slut < 125) or (gdk_nice_guy = 0 and pav_slut >= 65 and pav_slut < 75):
 		'<<$boydesc>> says: "<<$pcs_nickname>>, my buddies told me you''re a <<$gnikname>>. I want to have some fun with you too!"'
 		'He pulls his cock out of his pants while he says it, and looks at you expectantly.'
 		
 		gs 'gdksex', 'decline'	
 		gs 'gdksex', 'handjob'
-		gs 'gdksex', 'blowjob', 'unpaid'	
+		act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'	
 	elseif (gdk_nice_guy = 1 and pav_slut >= 125) or (gdk_nice_guy = 0 and pav_slut >= 75):
 		gs 'boymass', 'B'
 		'<<$boydesc>> says: "<<$pcs_nickname>>, let''s cut the crap: the whole town knows you''re a <<$gnikname>>. I want a blowjob, here''s 100 <b>₽</b>."'
 		'He pulls his cock out of his pants while he says it, and looks at you expectantly.'
 		
 		gs 'gdksex', 'decline'
-		gs 'gdksex', 'blowjob', 'paid'
+		act 'Squat down before him': gt 'gdksex', 'blowjob', 'paid'
 	end
 
 	if (gdk_nice_guy = 1 and pav_slut >= 65) or (gdk_nice_guy = 0 and pav_slut >= 35):
@@ -470,7 +479,7 @@ if $ARGS[0] = 'outside':
 				if slutty > 10: 'You have done worse. You only say: "200 <b>₽</b>."'
 				'<<$boydesc>> looks a bit confused for a moment, but gives you 200 <b>₽</b>.'
 			
-				gs 'gdksex', 'blowjob', 'unpaid'
+				act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 			end
 		end
 	end
@@ -492,94 +501,92 @@ if $ARGS[0] = 'decline':
 end
 
 if $ARGS[0] = 'blowjob':
-	act 'Squat down before him':
+	*clr & cla
+	minut += 5
+	pcs_horny += 10
+	stat['bj'] += 1
+	if $ARGS[1] = 'paid': 
+		slutty += 1
+		money += 100
+		if gdk_nice_guy = 1:
+			pav_prostitute += rand (1,3)
+		elseif gdk_nice_guy = 0:
+			pav_prostitute += rand (3,9)
+		end
+	end
+	if boynumBlock = 0:guy += 1
+	if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1
+
+	sub += 1
+	gs 'boymass', 'B'
+	bmBJ[Tboynum] += 1
+	gs 'stat'
+	'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/boybj.jpg"></center>'
+	'You squat before him as you wrap your fingers around his shaft, and slowly begin to jerk him off.'
+
+	act 'Suck his dick':
 		*clr & cla
 		minut += 5
 		pcs_horny += 10
-		stat['bj'] += 1
-		if $ARGS[1] = 'paid': 
-			slutty += 1
-			money += 100
-			if gdk_nice_guy = 1:
-				pav_prostitute += rand (1,3)
-			elseif gdk_nice_guy = 0:
-				pav_prostitute += rand (3,9)
-			end
+
+		if gdk_nice_guy = 1:
+			pav_sex += rand(1,3)
+		elseif gdk_nice_guy = 0:
+			pav_sex += rand(3,9)
 		end
-		if boynumBlock = 0:guy += 1
-		if boynumBlock > 0 and bmTOTSEX[Tboynum] = 0:guy += 1
+			
+		bmGossip[Tboynum] = 2
 
-		sub += 1
-		gs 'boymass', 'B'
-		bmBJ[Tboynum] += 1
 		gs 'stat'
-		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/boybj.jpg"></center>'
-		'You squat before him as you wrap your fingers around his shaft, and slowly begin to jerk him off.'
+		'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/boybj2.jpg"></center>'
+		gs 'dinsex','dinrandbj'
 
-		act 'Suck his dick':
+		act 'Continue':
 			*clr & cla
 			minut += 5
 			pcs_horny += 10
-
-			if gdk_nice_guy = 1:
-				pav_sex += rand(1,3)
-			elseif gdk_nice_guy = 0:
-				pav_sex += rand(3,9)
-			end
-			
-			bmGossip[Tboynum] = 2
-
+			swallow += 1
+			spafinloc = 11
+			gs 'cum_manage'
+			spafinloc = 12
+			gs 'cum_manage'
+			spafinloc = 7
+			gs 'cum_manage'
 			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/boybj2.jpg"></center>'
-			gs 'dinsex','dinrandbj'
+			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/boybj3.jpg"></center>'
+			gs 'dinsex','dinrandswallow'
 
-			act 'Continue':
-				*clr & cla
-				minut += 5
-				pcs_horny += 10
-				swallow += 1
-				spafinloc = 11
-				gs 'cum_manage'
-				spafinloc = 12
-				gs 'cum_manage'
-				spafinloc = 7
-				gs 'cum_manage'
-				gs 'stat'
-				'<center><img <<$set_imgh>> src="images/locations/pavlovsk/community/disco/sex/boybj3.jpg"></center>'
-				gs 'dinsex','dinrandswallow'
-
-				act 'Leave':gt 'gdk'
-			end
+			act 'Leave':gt 'gdk'
 		end
+	end
 
-		act 'Turn around and let him fuck you':
-			*clr & cla
-			minut += 5
-			pcs_horny += 10
+	act 'Turn around and let him fuck you':
+		*clr & cla
+		minut += 5
+		pcs_horny += 10
 
-			if boynumBlock = 0:boy += 1
+		if boynumBlock = 0:guy += 1
 
-			bmSEX[Tboynum] += 1
-			gs 'boyStat', $bmNane[Tboynum]
-			pose = 1
+		bmSEX[Tboynum] += 1
+		gs 'boyStat', $bmNane[Tboynum]
+		pose = 1
 
-			if gdk_nice_guy = 1:
-				pav_sex += rand(1,3)
-			elseif gdk_nice_guy = 0:
-				pav_sex += rand(3,9)
-			end
+		if gdk_nice_guy = 1:
+			pav_sex += rand(1,3)
+		elseif gdk_nice_guy = 0:
+			pav_sex += rand(3,9)
+		end
 			
-			bmGossip[Tboynum] = 1
+		bmGossip[Tboynum] = 1
 
-			gs 'stat'
-			'<center><img <<$set_imgh>> src="images/shared/sex/public/boysex.jpg"></center>'
-			'You turn around, bend over, pull down your panties, and lean your hands against a wall for support. <<$boydesc>> immediately gets behind you.'
-			dynamic $sexstart
-			gs 'dinsex','vaginal_sex',10
-			gs 'dinsex','sexcum'
+		gs 'stat'
+		'<center><img <<$set_imgh>> src="images/shared/sex/public/boysex.jpg"></center>'
+		'You turn around, bend over, pull down your panties, and lean your hands against a wall for support. <<$boydesc>> immediately gets behind you.'
+		dynamic $sexstart
+		gs 'dinsex','vaginal_sex',10
+		gs 'dinsex','sexcum'
 
-			act 'Leave':gt 'gdk'
-		end
+		act 'Leave':gt 'gdk'
 	end
 end
 
@@ -607,7 +614,7 @@ if $ARGS[0] = 'handjob':
 				'<center><img <<$set_imgh>> src="images/shared/sex/handjob/hj.jpg"></center>'
 				'You begin to move your hand up and down his shaft slowly, but slowly pick up the pace while you kiss him dominantly.'
 				'<<$boydesc>> wants more however, and suddenly places his hands on your shoulder. He firmly pushes downwards, forcing you to squat before him.'
-				gs 'gdksex', 'blowjob', 'unpaid'
+				act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 			end
 		end
 	end
@@ -800,7 +807,7 @@ if $ARGS[0] = 'kissing':
 					if pcs_horny < 75 or pav_slut < 75: act 'Go back to the disco': gt 'gdkin'
 
 					gs 'gdksex', 'handjob'
-					gs 'gdksex', 'blowjob', 'unpaid'
+					act 'Squat down before him': gt 'gdksex', 'blowjob', 'unpaid'
 				end
 			end
 		end

locations/gdksport.qsrc

@@ -74,10 +74,10 @@ if $ARGS[0] = 'start':
 	*nl
 
 	if pcs_stam > 20 and $clothingworntype = 'exercise' and $shoeworntype = 'trainers' and hour < 18:
-		if gsAboBeg > 0 and pregTalkTrack = 0:
+		if gsAboBeg > 0 and npc_pregtalk['A131'] = 0:
 			act 'Take a track lesson, you have <<gsAboBeg>> lessons remaining':gt 'gdksport', 'racing2'
 		end
-		if gsAboVolley > 0 and volleysostav = 0 and pregTalkvball = 0:
+		if gsAboVolley > 0 and volleysostav = 0 and npc_pregtalk['A69'] = 0:
 			if week ! 5:
 				act 'Take a volleyball lesson, you have <<gsAboVolley>> lessons remaining':gt 'gdksport', 'vball2'
 			else
@@ -98,10 +98,10 @@ if $ARGS[0] = 'start':
 				act 'Play with the team':gt 'gdksport', 'vballreact'
 			end
 		end
-		if gsAboDance > 0 and albinaQWdance = 0 and pregTalkStarlets = 0:
+		if gsAboDance > 0 and albinaQWdance = 0 and npc_pregtalk['A23'] = 0:
 			act 'Take a dance lesson, you have <<gsAboDance>> lessons remaining':gt 'gdksport', 'dance2'
 		end
-		if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and pregTalkStarlets = 0 and startletsday ! daystart:
+		if albinaQWdance > 0 and AlbinaBlokDance = 0 and ZvezdEnd = 0 and npc_pregtalk['A23'] = 0 and startletsday ! daystart:
 			if pregtime >= 90:
 				act 'Train with Starlets':gt 'gdksport', 'Starletsreact'
 			else
@@ -1232,14 +1232,14 @@ if $ARGS[0] = 'Starletsreact':
 	cla
 	menu_off = 1
 	'As you approach the Starlets, Albina looks at you in disgust. Loudly enough for the whole team to hear, she says "<<$pcs_nickname>>, no one wants to see some pregnant whore dance. Leave. You''re done." Tears welling in your eyes, you leave, the sound of laughter and taunting following your departure.'
-	act 'Continue':pregtalkStarlets = 1 & gt 'gdk'
+	act 'Continue':npc_pregtalk['A23'] = 1 & gt 'gdk'
 end
 
 if $ARGS[0] = 'vballreact':
 	cla
 	menu_off = 1
 	'As you approach the team, your coach notices you and calls you aside. "<<$pcs_firstname>>, are you pregnant? I can''t let you play like that. Also, a pregnant teenager would definitely reflect poorly on me and the rest of the team. Sorry, but off the team." Tears welling in your eyes, you leave.'
-	act 'Continue':pregtalkvball = 1 & gt 'gdk'
+	act 'Continue':npc_pregtalk['A69'] = 1 & gt 'gdk'
 end
 
 

locations/gevent.qsrc

@@ -7,61 +7,65 @@ if $ARGS[0] = '1':
 	*clr & cla
 	menu_off = 1
 	dyadyamishaevent = 1
-	dick = 18
 	gs 'themes', 'indoors'
+	gs 'boyStat', 'A54'
 
-	'You agree to help, and leave the cafe with uncle Misha. When you reach his apartment, he takes you by the hand and pulls you to his bedroom, locking the door with a key behind him. Roughly grabbing you by your hair, he pulls you down to your knees and unbuttons his pants with his other hand. His erect cock springs to life, which he impatiently pushes against your pursed lips.'
-	'"Open your mouth, whore. You know why you are here", he commands, slapping your cheeks with his hand.'
-	'As you try to resist and keep your mouth shut, he starts rubbing the head of his engorged dick against your lips, spreading his precum over it with a lewd grin on his face. When he realizes you have no intentions of opening your mouth he slaps you harder and harder. After one particularly hard slap he leans over and snarls menacingly: "Stop testing my patience and open up, bitch. I''m not going to ask again."'
-	'Reluctantly you open your mouth, allowing his vile smelling dick access past your lips. He places the head of his dick firmly inside your mouth and continues to pressure you: "Go on bitch, suck it. You''ll regret it if you make me do all the work."'
-	'Thoroughly intimidated by his demands, you begin to suck him off obediently. He can tell your heart is not really into it and decides to help out, shoving his cock further and further down your throat until you''re nuzzling his hairy crotch. He leaves it in a few seconds more than you are comfortable with, making you gag. Watching you struggle puts an evil grin on his face and after a while he pulls his dick out of your mouth, a thick strand of saliva slowly dripping off it.'
-	'"Not bad <<$pcs_nickname>>, not bad. Lie down, I''m going to have some fun with you."'
-
-	act 'Lie down on the bed':
+	'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/rape.jpg"></center>'
+	'You agree to help, and leave the cafe with uncle Misha. When you reach his apartment, he takes you by the hand and pulls you to his bedroom, locking the door with a key behind him. Roughly grabbing you by your hair, he pulls you down to your knees and unbuttons his pants with his other hand.'
+	act 'Continue':
 		*clr & cla
-		'You are no longer resisting, having lost all hope of getting yourself out of this situation. Lying wearily on the bed, he quickly takes your clothes off and sits down at your feet, examining your pussy with his fingers as much as his eyes.'
-
-		if pcs_vag = 0 and stat['vaginal'] = 0:
-			cumprecheck = 1
-			gs 'cum_manage'
-			'"You''re still a virgin? We''ll have to fix that."'
-			'He mounts you and guides the head of his cock towards your virgin pussy, rubbing it against you for a little while before slamming his cock in all the way, breaking your hymen. It hurts so much! With no concerns for your feelings, he starts hammering his dick in you, while you meekly try to resist but fail to even inconvenience him. After raping your pussy for a few minutes, he pulls his dick out and forcibly thrusts it down your throat. You no longer have the strength to even fight it and just go along with whatever he wants to do, trying to appease him so he doesn''t think of anything worse to do instead. You quietly lick your blood off his dick trying to hide the disgust, and when he cums he pulls back just a bit. You can feel it spasm just as a warm liquid hits your tongue.'
-		else
-			cumprecheck = 1
-			gs 'cum_manage'
-			'"No longer a virgin, eh? No need for me to take it slow, then!"'
-			'He mounts you and guides the head of his cock towards your pussy, rubbing it against your opening for a little while before slamming his cock in all the way. He begins to fuck you with short, intense strokes.'
-
-			if dick - pcs_vag > 10 and dick - pcs_vag <= 7:'The rough handling uncle Misha gives you is feeling quite good, and you wish he''d fuck you even harder.'
-			if dick - pcs_vag > 6 and dick - pcs_vag <= 3:'Uncle Misha''s thrusts hurt a lot, and you wish for it to be over soon.'
-
-			'After raping your pussy for a few minutes, he pulls his dick out and forcibly thrusts it down your throat. You no longer have the strength to even fight it and just go along with whatever he wants to do, trying to appease him so he doesn''t think of anything worse to try instead. When he cums he pulls back just a bit, and you can feel it spasm as a warm liquid hits your tongue.'
-		end
-		
-		act 'Swallow his cum':
+		'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/bj.jpg"></center>'
+		'His erect cock springs to life, which he impatiently pushes against your pursed lips.'
+		'"Open your mouth, whore. You know why you are here", he commands, slapping your cheeks with his hand.'
+		'As you try to resist and keep your mouth shut, he starts rubbing the head of his engorged dick against your lips, spreading his precum over it with a lewd grin on his face. When he realizes you have no intentions of opening your mouth he slaps you harder and harder. After one particularly hard slap he leans over and snarls menacingly: "Stop testing my patience and open up, bitch. I''m not going to ask again."'
+		'Reluctantly you open your mouth, allowing his vile smelling dick access past your lips. He places the head of his dick firmly inside your mouth and continues to pressure you: "Go on bitch, suck it. You''ll regret it if you make me do all the work."'
+		'Thoroughly intimidated by his demands, you begin to suck him off obediently. He can tell your heart is not really into it and decides to help out, shoving his cock further and further down your throat until you''re nuzzling his hairy crotch. He leaves it in a few seconds more than you are comfortable with, making you gag. Watching you struggle puts an evil grin on his face and after a while he pulls his dick out of your mouth, a thick strand of saliva slowly dripping off it.'
+		'"Not bad <<$pcs_nickname>>, not bad. Lie down, I''m going to have some fun with you."'
+		gs 'arousal', 'bj', 25, 'rough', 'rape'
+
+		act 'Lie down on the bed':
 			*clr & cla
-			stat['vaginal'] += 1
-			stat['bj'] += 1
-			swallow += 1
-			spafinloc = 12
-			gs 'cum_manage'
-			pcs_throat += 1
-
-			if pcs_vag < dick:pcs_vag += 1
-
-			rape += 1
-			minut += 75
-			money += 500
-			gs 'stat'
-
-			'<center><img <<$set_imgh>> src="images/locations/pavlovsk/park/sex/1.jpg"></center>'
-			'His sperm tastes quite bitter as it hits your tongue. Nevertheless, knowing it is what he expects you to do, you swallow it and lick your lips clean like an obedient girl.'
-			'"You swallowed it, girl?" he asks, melodramatically patting your head as a sign of approval. He continues: "Very nice. Go ahead and get dressed, I''ll give you a present for your efforts."'
-			'Uncle Misha leaves the room as you get dressed, and while you quickly put your clothes back on you hope that ''present'' is not more punishment in some shape or form. To your surprise, his present is actually a bank note worth 500 <b>₽</b>.'
-			'"Go on child, go buy yourself some ice cream. I know you''re from a poor family, so if you''re ever in need of money you can come pay me a visit. There''s more where that came from."'
-			'Having had his fun, he gestures that you should get lost now. You quietly take the money from uncle Misha''s hand, and leave as he says.'
-
-			act 'Leave uncle Misha''s apartment':gt 'pod_ezd','etaj_2'
+			'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/sex.jpg"></center>'
+			'You are no longer resisting, having lost all hope of getting yourself out of this situation. Lying wearily on the bed, he quickly takes your clothes off and sits down at your feet, examining your pussy with his fingers as much as his eyes.'
+
+			if pcs_vag = 0 and stat['vaginal'] = 0:
+				cumprecheck = 1
+				gs 'cum_manage'
+				'"You''re still a virgin? We''ll have to fix that."'
+				'He mounts you and guides the head of his cock towards your virgin pussy, rubbing it against you for a little while before slamming his cock in all the way, breaking your hymen. It hurts so much! With no concerns for your feelings, he starts hammering his dick in you, while you meekly try to resist but fail to even inconvenience him.'
+				gs 'arousal', 'vaginal', 25, 'rough'
+				'After raping your pussy for a few minutes, he pulls his dick out and forcibly thrusts it down your throat. You no longer have the strength to even fight it and just go along with whatever he wants to do, trying to appease him so he doesn''t think of anything worse to do instead. You quietly lick your blood off his dick trying to hide the disgust, and when he cums he pulls back just a bit. You can feel it spasm just as a warm liquid hits your tongue.'
+			else
+				cumprecheck = 1
+				gs 'cum_manage'
+				'"No longer a virgin, eh? No need for me to take it slow, then!"'
+				'He mounts you and guides the head of his cock towards your pussy, rubbing it against your opening for a little while before slamming his cock in all the way. He begins to fuck you with short, intense strokes.'
+
+				if dick - pcs_vag > 10 and dick - pcs_vag <= 7:'The rough handling uncle Misha gives you is feeling quite good, and you wish he''d fuck you even harder.'
+				if dick - pcs_vag > 6 and dick - pcs_vag <= 3:'Uncle Misha''s thrusts hurt a lot, and you wish for it to be over soon.'
+				gs 'arousal', 'vaginal', 25, 'rough', 'rape'
+
+				'After raping your pussy for a few minutes, he pulls his dick out and forcibly thrusts it down your throat. You no longer have the strength to even fight it and just go along with whatever he wants to do, trying to appease him so he doesn''t think of anything worse to try instead. When he cums he pulls back just a bit, and you can feel it spasm as a warm liquid hits your tongue.'
+			end
+			
+			act 'Swallow his cum':
+				*clr & cla
+				swallow += 1
+				gs 'cum_call', 'mouth', 'A54'
+				minut += 5
+				money += 500
+				gs 'arousal', 'end'
+				gs 'stat'
+
+				'<center><img <<$set_imgh>> src="images/characters/pavlovsk/resident/misha/sex/cum.jpg"></center>'
+				'His sperm tastes quite bitter as it hits your tongue. Nevertheless, knowing it is what he expects you to do, you swallow it and lick your lips clean like an obedient girl.'
+				'"You swallowed it, girl?" he asks, melodramatically patting your head as a sign of approval. He continues: "Very nice. Go ahead and get dressed, I''ll give you a present for your efforts."'
+				'Uncle Misha leaves the room as you get dressed, and while you quickly put your clothes back on you hope that ''present'' is not more punishment in some shape or form. To your surprise, his present is actually a bank note worth 500 <b>₽</b>.'
+				'"Go on child, go buy yourself some ice cream. I know you''re from a poor family, so if you''re ever in need of money you can come pay me a visit. There''s more where that came from."'
+				'Having had his fun, he gestures that you should get lost now. You quietly take the money from uncle Misha''s hand, and leave as he says.'
+
+				act 'Leave uncle Misha''s apartment':gt 'pod_ezd','etaj_2'
+			end
 		end
 	end
 end